(((-I)*Csc[theta]*(((-1/2*I)*r*Sin[theta]*(1 - 7.500000000000001*^-9*
          (168/(E^(r^2/4)*r^3) - (21*((16*r)/E^(r^2/4) - (4*r^3)/E^(r^2/4)))/
            r^4 + (9*(16/E^(r^2/4) - (16*r^2)/E^(r^2/4) + 
              8*r^2*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 - 
           (2*((-40*r)/E^(r^2/4) + (8*r^3)/E^(r^2/4) + 
              16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 
              8*r^2*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + 
                   r^2/(4*E^(r^2/4))))/2)))/r^2 + 
           (-32/E^(r^2/4) + (32*r^2)/E^(r^2/4) + 32*(-1/2*1/E^(r^2/4) + r^2/
                (4*E^(r^2/4))) - 16*r^2*(-1/2*1/E^(r^2/4) + r^2/
                (4*E^(r^2/4))) + 32*r*(r/(2*E^(r^2/4)) - 
               (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 
             8*r^2*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - 
               (r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/
                      (4*E^(r^2/4))))/2))/2))/r)*Sin[theta]^2 + 
         3.0000000000000004*^-8*(24/(E^(r^2/4)*r^3) - 
           (3*((16*r)/E^(r^2/4) - (4*r^3)/E^(r^2/4)))/r^4 + 
           (16/E^(r^2/4) - (16*r^2)/E^(r^2/4) + 8*r^2*(-1/2*1/E^(r^2/4) + r^2/
                (4*E^(r^2/4))))/r^3)*(-1 + 3*Sin[theta]^2))*
        ((-1.0000000000000001*^-16*
           ((3*((21*((16*r)/E^(r^2/4) - (4*r^3)/E^(r^2/4)))/r^5 - 
                (21*(16/E^(r^2/4) - (16*r^2)/E^(r^2/4) + 8*r^2*
                    (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^4 + 
                (9*((-40*r)/E^(r^2/4) + (8*r^3)/E^(r^2/4) + 16*r*
                    (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 8*r^2*
                    (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/
                         (4*E^(r^2/4))))/2)))/r^3 - (2*(-32/E^(r^2/4) + 
                   (32*r^2)/E^(r^2/4) + 32*(-1/2*1/E^(r^2/4) + r^2/
                      (4*E^(r^2/4))) - 16*r^2*(-1/2*1/E^(r^2/4) + 
                     r^2/(4*E^(r^2/4))) + 32*r*(r/(2*E^(r^2/4)) - 
                     (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 
                   8*r^2*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - 
                     (r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/
                          (4*E^(r^2/4))))/2))/2)))/r^2 + ((80*r)/E^(r^2/4) - 
                  (16*r^3)/E^(r^2/4) - 32*r*(-1/2*1/E^(r^2/4) + 
                    r^2/(4*E^(r^2/4))) + 64*(r/(2*E^(r^2/4)) - 
                    (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) - 
                  16*r^2*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + 
                       r^2/(4*E^(r^2/4))))/2) + 32*r*(1/(2*E^(r^2/4)) - 
                    r^2/(4*E^(r^2/4)) + (1/(2*E^(r^2/4)) - r^2/(4*E^(r^2/4)))/
                     2 - (r*((3*r)/(4*E^(r^2/4)) - r^3/(8*E^(r^2/4))))/2) + 
                  16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - 
                    (r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/
                          (4*E^(r^2/4))))/2))/2) + 8*r^2*(-1/4*r/E^(r^2/4) + 
                    (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/4 + 
                    (3*(-1/2*r/E^(r^2/4) + (r*(-1/2*1/E^(r^2/4) + r^2/
                          (4*E^(r^2/4))))/2))/2 - (r*(3/(4*E^(r^2/4)) - 
                       (3*r^2)/(8*E^(r^2/4)) - (r*(r/(2*E^(r^2/4)) - 
                          (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2))/2))/
                     2))/r)*Sin[theta]^2)/4 + 3*((3*((16*r)/E^(r^2/4) - 
                  (4*r^3)/E^(r^2/4)))/r^5 - (3*(16/E^(r^2/4) - (16*r^2)/
                   E^(r^2/4) + 8*r^2*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/
                r^4 + ((-40*r)/E^(r^2/4) + (8*r^3)/E^(r^2/4) + 
                 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 
                 8*r^2*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + 
                      r^2/(4*E^(r^2/4))))/2))/r^3)*(1 - 3*Sin[theta]^2))^2)/
          (-2 + 3.0000000000000004*^-8*(24/(E^(r^2/4)*r^3) - 
              (3*((16*r)/E^(r^2/4) - (4*r^3)/E^(r^2/4)))/r^4 + 
              (16/E^(r^2/4) - (16*r^2)/E^(r^2/4) + 8*r^2*(-1/2*1/E^(r^2/4) + 
                  r^2/(4*E^(r^2/4))))/r^3)*(-1 + 3*Cos[2*theta]) + 
            1.5000000000000002*^-8*(168/(E^(r^2/4)*r^3) - 
              (21*((16*r)/E^(r^2/4) - (4*r^3)/E^(r^2/4)))/r^4 + 
              (9*(16/E^(r^2/4) - (16*r^2)/E^(r^2/4) + 8*r^2*
                  (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 - 
              (2*((-40*r)/E^(r^2/4) + (8*r^3)/E^(r^2/4) + 16*r*
                  (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 8*r^2*
                  (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/
                       (4*E^(r^2/4))))/2)))/r^2 + (-32/E^(r^2/4) + 
                (32*r^2)/E^(r^2/4) + 32*(-1/2*1/E^(r^2/4) + 
                  r^2/(4*E^(r^2/4))) - 16*r^2*(-1/2*1/E^(r^2/4) + 
                  r^2/(4*E^(r^2/4))) + 32*r*(r/(2*E^(r^2/4)) - 
                  (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 
                8*r^2*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - 
                  (r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/
                         (4*E^(r^2/4))))/2))/2))/r)*Sin[theta]^2)^2 - 
         (1.*^-8*(-5.*^-9*(3*((3*((16*r)/E^(r^2/4) - (4*r^3)/E^(r^2/4)))/
                  r^5 - (3*(16/E^(r^2/4) - (16*r^2)/E^(r^2/4) + 8*r^2*
                     (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^4 + 
                 ((-40*r)/E^(r^2/4) + (8*r^3)/E^(r^2/4) + 16*r*
                    (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 8*r^2*
                    (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/
                         (4*E^(r^2/4))))/2))/r^3)*(-1 + 3*Cos[2*theta]) + 
               (3*((21*((16*r)/E^(r^2/4) - (4*r^3)/E^(r^2/4)))/r^5 - 
                  (21*(16/E^(r^2/4) - (16*r^2)/E^(r^2/4) + 8*r^2*
                      (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^4 + 
                  (9*((-40*r)/E^(r^2/4) + (8*r^3)/E^(r^2/4) + 16*r*
                      (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 8*r^2*
                      (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/
                          (4*E^(r^2/4))))/2)))/r^3 - (2*(-32/E^(r^2/4) + 
                     (32*r^2)/E^(r^2/4) + 32*(-1/2*1/E^(r^2/4) + r^2/
                        (4*E^(r^2/4))) - 16*r^2*(-1/2*1/E^(r^2/4) + 
                       r^2/(4*E^(r^2/4))) + 32*r*(r/(2*E^(r^2/4)) - 
                       (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 
                     8*r^2*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - 
                       (r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/
                          (4*E^(r^2/4))))/2))/2)))/r^2 + ((80*r)/E^(r^2/4) - 
                    (16*r^3)/E^(r^2/4) - 32*r*(-1/2*1/E^(r^2/4) + 
                      r^2/(4*E^(r^2/4))) + 64*(r/(2*E^(r^2/4)) - 
                      (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) - 
                    16*r^2*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + 
                         r^2/(4*E^(r^2/4))))/2) + 32*r*(1/(2*E^(r^2/4)) - 
                      r^2/(4*E^(r^2/4)) + (1/(2*E^(r^2/4)) - r^2/
                         (4*E^(r^2/4)))/2 - (r*((3*r)/(4*E^(r^2/4)) - 
                         r^3/(8*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - 
                      (3*r^2)/(8*E^(r^2/4)) - (r*(r/(2*E^(r^2/4)) - 
                         (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2))/2) + 
                    8*r^2*(-1/4*r/E^(r^2/4) + (r*(-1/2*1/E^(r^2/4) + 
                         r^2/(4*E^(r^2/4))))/4 + (3*(-1/2*r/E^(r^2/4) + 
                         (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2))/2 - 
                      (r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - 
                         (r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/
                          (4*E^(r^2/4))))/2))/2))/2))/r)*Sin[theta]^2)/2)^2 + 
            (-2 + 3.0000000000000004*^-8*(24/(E^(r^2/4)*r^3) - 
                (3*((16*r)/E^(r^2/4) - (4*r^3)/E^(r^2/4)))/r^4 + 
                (16/E^(r^2/4) - (16*r^2)/E^(r^2/4) + 8*r^2*
                   (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/r^3)*(-1 + 
                3*Cos[2*theta]) + 1.5000000000000002*^-8*(168/(E^(r^2/4)*
                  r^3) - (21*((16*r)/E^(r^2/4) - (4*r^3)/E^(r^2/4)))/r^4 + 
                (9*(16/E^(r^2/4) - (16*r^2)/E^(r^2/4) + 8*r^2*
                    (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 - 
                (2*((-40*r)/E^(r^2/4) + (8*r^3)/E^(r^2/4) + 16*r*
                    (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 8*r^2*
                    (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/
                         (4*E^(r^2/4))))/2)))/r^2 + (-32/E^(r^2/4) + 
                  (32*r^2)/E^(r^2/4) + 32*(-1/2*1/E^(r^2/4) + r^2/
                     (4*E^(r^2/4))) - 16*r^2*(-1/2*1/E^(r^2/4) + 
                    r^2/(4*E^(r^2/4))) + 32*r*(r/(2*E^(r^2/4)) - 
                    (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 
                  8*r^2*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - 
                    (r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/
                          (4*E^(r^2/4))))/2))/2))/r)*Sin[theta]^2)*
             ((3*((21*(16/E^(r^2/4) - (16*r^2)/E^(r^2/4) + 8*r^2*
                     (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^5 - 
                 (21*((-40*r)/E^(r^2/4) + (8*r^3)/E^(r^2/4) + 16*r*
                     (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 8*r^2*
                     (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*(-32/E^(r^2/4) + 
                    (32*r^2)/E^(r^2/4) + 32*(-1/2*1/E^(r^2/4) + r^2/
                       (4*E^(r^2/4))) - 16*r^2*(-1/2*1/E^(r^2/4) + 
                      r^2/(4*E^(r^2/4))) + 32*r*(r/(2*E^(r^2/4)) - 
                      (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 
                    8*r^2*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - 
                      (r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/
                          (4*E^(r^2/4))))/2))/2)))/r^3 - 
                 (2*((80*r)/E^(r^2/4) - (16*r^3)/E^(r^2/4) - 32*r*
                     (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 
                    64*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/
                          (4*E^(r^2/4))))/2) - 16*r^2*(r/(2*E^(r^2/4)) - 
                      (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 
                    32*r*(1/(2*E^(r^2/4)) - r^2/(4*E^(r^2/4)) + 
                      (1/(2*E^(r^2/4)) - r^2/(4*E^(r^2/4)))/2 - 
                      (r*((3*r)/(4*E^(r^2/4)) - r^3/(8*E^(r^2/4))))/2) + 
                    16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - 
                      (r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/
                          (4*E^(r^2/4))))/2))/2) + 8*r^2*(-1/4*r/E^(r^2/4) + 
                      (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/4 + 
                      (3*(-1/2*r/E^(r^2/4) + (r*(-1/2*1/E^(r^2/4) + r^2/
                          (4*E^(r^2/4))))/2))/2 - (r*(3/(4*E^(r^2/4)) - 
                         (3*r^2)/(8*E^(r^2/4)) - (r*(r/(2*E^(r^2/4)) - 
                          (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2))/2))/
                       2)))/r^2 + (64/E^(r^2/4) - (64*r^2)/E^(r^2/4) - 
                   64*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*r^2*
                    (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) - 64*r*
                    (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/
                         (4*E^(r^2/4))))/2) + 64*(1/(2*E^(r^2/4)) - 
                     r^2/(4*E^(r^2/4)) + (1/(2*E^(r^2/4)) - r^2/
                        (4*E^(r^2/4)))/2 - (r*((3*r)/(4*E^(r^2/4)) - 
                        r^3/(8*E^(r^2/4))))/2) + 48*(3/(4*E^(r^2/4)) - 
                     (3*r^2)/(8*E^(r^2/4)) - (r*(r/(2*E^(r^2/4)) - 
                        (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2))/2) - 
                   16*r^2*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - 
                     (r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/
                          (4*E^(r^2/4))))/2))/2) + 32*r*((-5*r)/
                      (4*E^(r^2/4)) + r^3/(8*E^(r^2/4)) + 
                     (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2 - 
                     (r*(3/(4*E^(r^2/4)) - (5*r^2)/(8*E^(r^2/4)) + 
                        (r^2*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/4))/2) + 
                   32*r*(-1/4*r/E^(r^2/4) + (r*(-1/2*1/E^(r^2/4) + 
                        r^2/(4*E^(r^2/4))))/4 + (3*(-1/2*r/E^(r^2/4) + 
                        (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2))/2 - 
                     (r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - 
                        (r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/
                          (4*E^(r^2/4))))/2))/2))/2) + 8*r^2*
                    (-1/8*1/E^(r^2/4) + r^2/(16*E^(r^2/4)) + 
                     (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))/2 + 
                     (r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/
                          (4*E^(r^2/4))))/2))/4 + 2*(-3/(4*E^(r^2/4)) + 
                       (3*r^2)/(8*E^(r^2/4)) + (r*(r/(2*E^(r^2/4)) - 
                          (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2))/2) - 
                     (r*(-1/4*r/E^(r^2/4) + (r*(-1/2*1/E^(r^2/4) + r^2/
                          (4*E^(r^2/4))))/4 + (3*(-1/2*r/E^(r^2/4) + 
                          (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2))/2 - 
                        (r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - 
                          (r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + 
                          r^2/(4*E^(r^2/4))))/2))/2))/2))/2))/r)*
                Sin[theta]^2)/4 + 3*((3*(16/E^(r^2/4) - (16*r^2)/E^(r^2/4) + 
                   8*r^2*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^5 - 
                (3*((-40*r)/E^(r^2/4) + (8*r^3)/E^(r^2/4) + 16*r*
                    (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 8*r^2*
                    (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/
                         (4*E^(r^2/4))))/2)))/r^4 + (-32/E^(r^2/4) + 
                  (32*r^2)/E^(r^2/4) + 32*(-1/2*1/E^(r^2/4) + r^2/
                     (4*E^(r^2/4))) - 16*r^2*(-1/2*1/E^(r^2/4) + 
                    r^2/(4*E^(r^2/4))) + 32*r*(r/(2*E^(r^2/4)) - 
                    (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 
                  8*r^2*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - 
                    (r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/
                          (4*E^(r^2/4))))/2))/2))/r^3)*(1 - 
                3*Sin[theta]^2))))/(-2 + 3.0000000000000004*^-8*
             (24/(E^(r^2/4)*r^3) - (3*((16*r)/E^(r^2/4) - (4*r^3)/E^(r^2/4)))/
               r^4 + (16/E^(r^2/4) - (16*r^2)/E^(r^2/4) + 8*r^2*
                 (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/r^3)*
             (-1 + 3*Cos[2*theta]) + 1.5000000000000002*^-8*
             (168/(E^(r^2/4)*r^3) - (21*((16*r)/E^(r^2/4) - (4*r^3)/
                  E^(r^2/4)))/r^4 + (9*(16/E^(r^2/4) - (16*r^2)/E^(r^2/4) + 
                 8*r^2*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 - 
              (2*((-40*r)/E^(r^2/4) + (8*r^3)/E^(r^2/4) + 16*r*
                  (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 8*r^2*
                  (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/
                       (4*E^(r^2/4))))/2)))/r^2 + (-32/E^(r^2/4) + 
                (32*r^2)/E^(r^2/4) + 32*(-1/2*1/E^(r^2/4) + 
                  r^2/(4*E^(r^2/4))) - 16*r^2*(-1/2*1/E^(r^2/4) + 
                  r^2/(4*E^(r^2/4))) + 32*r*(r/(2*E^(r^2/4)) - 
                  (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 
                8*r^2*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - 
                  (r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/
                         (4*E^(r^2/4))))/2))/2))/r)*Sin[theta]^2)^2))/
       Sqrt[2] + ((I/2)*r*Sin[theta]*(1 - 7.500000000000001*^-9*
          (168/(E^(r^2/4)*r^3) - (21*((16*r)/E^(r^2/4) - (4*r^3)/E^(r^2/4)))/
            r^4 + (9*(16/E^(r^2/4) - (16*r^2)/E^(r^2/4) + 
              8*r^2*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 - 
           (2*((-40*r)/E^(r^2/4) + (8*r^3)/E^(r^2/4) + 
              16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 
              8*r^2*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + 
                   r^2/(4*E^(r^2/4))))/2)))/r^2 + 
           (-32/E^(r^2/4) + (32*r^2)/E^(r^2/4) + 32*(-1/2*1/E^(r^2/4) + r^2/
                (4*E^(r^2/4))) - 16*r^2*(-1/2*1/E^(r^2/4) + r^2/
                (4*E^(r^2/4))) + 32*r*(r/(2*E^(r^2/4)) - 
               (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 
             8*r^2*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - 
               (r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/
                      (4*E^(r^2/4))))/2))/2))/r)*Sin[theta]^2 + 
         3.0000000000000004*^-8*(24/(E^(r^2/4)*r^3) - 
           (3*((16*r)/E^(r^2/4) - (4*r^3)/E^(r^2/4)))/r^4 + 
           (16/E^(r^2/4) - (16*r^2)/E^(r^2/4) + 8*r^2*(-1/2*1/E^(r^2/4) + r^2/
                (4*E^(r^2/4))))/r^3)*(-1 + 3*Sin[theta]^2))*
        ((5.*^-9*(7.500000000000001*^-9*(-840/(E^(r^2/4)*r^4) + 
              (105*((16*r)/E^(r^2/4) - (4*r^3)/E^(r^2/4)))/r^5 - 
              (48*(16/E^(r^2/4) - (16*r^2)/E^(r^2/4) + 8*r^2*
                  (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^4 + 
              (13*((-40*r)/E^(r^2/4) + (8*r^3)/E^(r^2/4) + 16*r*
                  (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 8*r^2*
                  (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/
                       (4*E^(r^2/4))))/2)))/r^3 - (3*(-32/E^(r^2/4) + 
                 (32*r^2)/E^(r^2/4) + 32*(-1/2*1/E^(r^2/4) + 
                   r^2/(4*E^(r^2/4))) - 16*r^2*(-1/2*1/E^(r^2/4) + 
                   r^2/(4*E^(r^2/4))) + 32*r*(r/(2*E^(r^2/4)) - 
                   (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 
                 8*r^2*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - 
                   (r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/
                          (4*E^(r^2/4))))/2))/2)))/r^2 + ((80*r)/E^(r^2/4) - 
                (16*r^3)/E^(r^2/4) - 32*r*(-1/2*1/E^(r^2/4) + 
                  r^2/(4*E^(r^2/4))) + 64*(r/(2*E^(r^2/4)) - 
                  (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) - 
                16*r^2*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + 
                     r^2/(4*E^(r^2/4))))/2) + 32*r*(1/(2*E^(r^2/4)) - 
                  r^2/(4*E^(r^2/4)) + (1/(2*E^(r^2/4)) - r^2/(4*E^(r^2/4)))/
                   2 - (r*((3*r)/(4*E^(r^2/4)) - r^3/(8*E^(r^2/4))))/2) + 
                16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - 
                  (r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/
                         (4*E^(r^2/4))))/2))/2) + 8*r^2*(-1/4*r/E^(r^2/4) + 
                  (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/4 + 
                  (3*(-1/2*r/E^(r^2/4) + (r*(-1/2*1/E^(r^2/4) + r^2/
                         (4*E^(r^2/4))))/2))/2 - (r*(3/(4*E^(r^2/4)) - 
                     (3*r^2)/(8*E^(r^2/4)) - (r*(r/(2*E^(r^2/4)) - 
                        (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2))/2))/
                   2))/r)*((3*((21*((16*r)/E^(r^2/4) - (4*r^3)/E^(r^2/4)))/
                  r^5 - (21*(16/E^(r^2/4) - (16*r^2)/E^(r^2/4) + 8*r^2*
                     (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^4 + 
                 (9*((-40*r)/E^(r^2/4) + (8*r^3)/E^(r^2/4) + 16*r*
                     (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 8*r^2*
                     (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/
                          (4*E^(r^2/4))))/2)))/r^3 - (2*(-32/E^(r^2/4) + 
                    (32*r^2)/E^(r^2/4) + 32*(-1/2*1/E^(r^2/4) + r^2/
                       (4*E^(r^2/4))) - 16*r^2*(-1/2*1/E^(r^2/4) + 
                      r^2/(4*E^(r^2/4))) + 32*r*(r/(2*E^(r^2/4)) - 
                      (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 
                    8*r^2*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - 
                      (r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/
                          (4*E^(r^2/4))))/2))/2)))/r^2 + ((80*r)/E^(r^2/4) - 
                   (16*r^3)/E^(r^2/4) - 32*r*(-1/2*1/E^(r^2/4) + 
                     r^2/(4*E^(r^2/4))) + 64*(r/(2*E^(r^2/4)) - 
                     (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) - 
                   16*r^2*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + 
                        r^2/(4*E^(r^2/4))))/2) + 32*r*(1/(2*E^(r^2/4)) - 
                     r^2/(4*E^(r^2/4)) + (1/(2*E^(r^2/4)) - r^2/
                        (4*E^(r^2/4)))/2 - (r*((3*r)/(4*E^(r^2/4)) - 
                        r^3/(8*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - 
                     (3*r^2)/(8*E^(r^2/4)) - (r*(r/(2*E^(r^2/4)) - 
                        (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2))/2) + 
                   8*r^2*(-1/4*r/E^(r^2/4) + (r*(-1/2*1/E^(r^2/4) + 
                        r^2/(4*E^(r^2/4))))/4 + (3*(-1/2*r/E^(r^2/4) + 
                        (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2))/2 - 
                     (r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - 
                        (r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/
                          (4*E^(r^2/4))))/2))/2))/2))/r))/4 + 
              3*((3*((16*r)/E^(r^2/4) - (4*r^3)/E^(r^2/4)))/r^5 - 
                (3*(16/E^(r^2/4) - (16*r^2)/E^(r^2/4) + 8*r^2*
                    (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^4 + 
                ((-40*r)/E^(r^2/4) + (8*r^3)/E^(r^2/4) + 16*r*
                   (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 8*r^2*
                   (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/
                        (4*E^(r^2/4))))/2))/r^3)*(-3 + Csc[theta]^2)) + 
            3.0000000000000004*^-8*(-120/(E^(r^2/4)*r^4) + 
              (15*((16*r)/E^(r^2/4) - (4*r^3)/E^(r^2/4)))/r^5 - 
              (6*(16/E^(r^2/4) - (16*r^2)/E^(r^2/4) + 8*r^2*
                  (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^4 + 
              ((-40*r)/E^(r^2/4) + (8*r^3)/E^(r^2/4) + 16*r*
                 (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 8*r^2*
                 (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/
                      (4*E^(r^2/4))))/2))/r^3)*(-3 + Csc[theta]^2)*
             ((3*((21*((16*r)/E^(r^2/4) - (4*r^3)/E^(r^2/4)))/r^5 - 
                 (21*(16/E^(r^2/4) - (16*r^2)/E^(r^2/4) + 8*r^2*
                     (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^4 + 
                 (9*((-40*r)/E^(r^2/4) + (8*r^3)/E^(r^2/4) + 16*r*
                     (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 8*r^2*
                     (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/
                          (4*E^(r^2/4))))/2)))/r^3 - (2*(-32/E^(r^2/4) + 
                    (32*r^2)/E^(r^2/4) + 32*(-1/2*1/E^(r^2/4) + r^2/
                       (4*E^(r^2/4))) - 16*r^2*(-1/2*1/E^(r^2/4) + 
                      r^2/(4*E^(r^2/4))) + 32*r*(r/(2*E^(r^2/4)) - 
                      (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 
                    8*r^2*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - 
                      (r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/
                          (4*E^(r^2/4))))/2))/2)))/r^2 + ((80*r)/E^(r^2/4) - 
                   (16*r^3)/E^(r^2/4) - 32*r*(-1/2*1/E^(r^2/4) + 
                     r^2/(4*E^(r^2/4))) + 64*(r/(2*E^(r^2/4)) - 
                     (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) - 
                   16*r^2*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + 
                        r^2/(4*E^(r^2/4))))/2) + 32*r*(1/(2*E^(r^2/4)) - 
                     r^2/(4*E^(r^2/4)) + (1/(2*E^(r^2/4)) - r^2/
                        (4*E^(r^2/4)))/2 - (r*((3*r)/(4*E^(r^2/4)) - 
                        r^3/(8*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - 
                     (3*r^2)/(8*E^(r^2/4)) - (r*(r/(2*E^(r^2/4)) - 
                        (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2))/2) + 
                   8*r^2*(-1/4*r/E^(r^2/4) + (r*(-1/2*1/E^(r^2/4) + 
                        r^2/(4*E^(r^2/4))))/4 + (3*(-1/2*r/E^(r^2/4) + 
                        (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2))/2 - 
                     (r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - 
                        (r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/
                          (4*E^(r^2/4))))/2))/2))/2))/r))/4 + 
              3*((3*((16*r)/E^(r^2/4) - (4*r^3)/E^(r^2/4)))/r^5 - 
                (3*(16/E^(r^2/4) - (16*r^2)/E^(r^2/4) + 8*r^2*
                    (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^4 + 
                ((-40*r)/E^(r^2/4) + (8*r^3)/E^(r^2/4) + 16*r*
                   (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 8*r^2*
                   (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/
                        (4*E^(r^2/4))))/2))/r^3)*(-3 + Csc[theta]^2)) - 
            (7.500000000000001*^-9*(168/(E^(r^2/4)*r^3) - 
                (21*((16*r)/E^(r^2/4) - (4*r^3)/E^(r^2/4)))/r^4 + 
                (9*(16/E^(r^2/4) - (16*r^2)/E^(r^2/4) + 8*r^2*
                    (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 - 
                (2*((-40*r)/E^(r^2/4) + (8*r^3)/E^(r^2/4) + 16*r*
                    (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 8*r^2*
                    (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/
                         (4*E^(r^2/4))))/2)))/r^2 + (-32/E^(r^2/4) + 
                  (32*r^2)/E^(r^2/4) + 32*(-1/2*1/E^(r^2/4) + r^2/
                     (4*E^(r^2/4))) - 16*r^2*(-1/2*1/E^(r^2/4) + 
                    r^2/(4*E^(r^2/4))) + 32*r*(r/(2*E^(r^2/4)) - 
                    (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 
                  8*r^2*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - 
                    (r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/
                          (4*E^(r^2/4))))/2))/2))/r) - Csc[theta]^2 + 
              3.0000000000000004*^-8*(24/(E^(r^2/4)*r^3) - 
                (3*((16*r)/E^(r^2/4) - (4*r^3)/E^(r^2/4)))/r^4 + 
                (16/E^(r^2/4) - (16*r^2)/E^(r^2/4) + 8*r^2*
                   (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/r^3)*(-3 + 
                Csc[theta]^2))*((3*((-105*((16*r)/E^(r^2/4) - (4*r^3)/
                     E^(r^2/4)))/r^6 + (105*(16/E^(r^2/4) - (16*r^2)/
                     E^(r^2/4) + 8*r^2*(-1/2*1/E^(r^2/4) + r^2/
                       (4*E^(r^2/4)))))/r^5 - (48*((-40*r)/E^(r^2/4) + 
                    (8*r^3)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + 
                      r^2/(4*E^(r^2/4))) + 8*r^2*(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*(-32/E^(r^2/4) + (32*r^2)/E^(r^2/4) + 
                    32*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) - 16*r^2*
                     (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*r*
                     (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/
                          (4*E^(r^2/4))))/2) + 8*r^2*(3/(4*E^(r^2/4)) - 
                      (3*r^2)/(8*E^(r^2/4)) - (r*(r/(2*E^(r^2/4)) - 
                         (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2))/2)))/
                  r^3 - (3*((80*r)/E^(r^2/4) - (16*r^3)/E^(r^2/4) - 
                    32*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 
                    64*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/
                          (4*E^(r^2/4))))/2) - 16*r^2*(r/(2*E^(r^2/4)) - 
                      (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 
                    32*r*(1/(2*E^(r^2/4)) - r^2/(4*E^(r^2/4)) + 
                      (1/(2*E^(r^2/4)) - r^2/(4*E^(r^2/4)))/2 - 
                      (r*((3*r)/(4*E^(r^2/4)) - r^3/(8*E^(r^2/4))))/2) + 
                    16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - 
                      (r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/
                          (4*E^(r^2/4))))/2))/2) + 8*r^2*(-1/4*r/E^(r^2/4) + 
                      (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/4 + 
                      (3*(-1/2*r/E^(r^2/4) + (r*(-1/2*1/E^(r^2/4) + r^2/
                          (4*E^(r^2/4))))/2))/2 - (r*(3/(4*E^(r^2/4)) - 
                         (3*r^2)/(8*E^(r^2/4)) - (r*(r/(2*E^(r^2/4)) - 
                          (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2))/2))/
                       2)))/r^2 + (64/E^(r^2/4) - (64*r^2)/E^(r^2/4) - 
                   64*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*r^2*
                    (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) - 64*r*
                    (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/
                         (4*E^(r^2/4))))/2) + 64*(1/(2*E^(r^2/4)) - 
                     r^2/(4*E^(r^2/4)) + (1/(2*E^(r^2/4)) - r^2/
                        (4*E^(r^2/4)))/2 - (r*((3*r)/(4*E^(r^2/4)) - 
                        r^3/(8*E^(r^2/4))))/2) + 48*(3/(4*E^(r^2/4)) - 
                     (3*r^2)/(8*E^(r^2/4)) - (r*(r/(2*E^(r^2/4)) - 
                        (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2))/2) - 
                   16*r^2*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - 
                     (r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/
                          (4*E^(r^2/4))))/2))/2) + 32*r*((-5*r)/
                      (4*E^(r^2/4)) + r^3/(8*E^(r^2/4)) + 
                     (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2 - 
                     (r*(3/(4*E^(r^2/4)) - (5*r^2)/(8*E^(r^2/4)) + 
                        (r^2*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/4))/2) + 
                   32*r*(-1/4*r/E^(r^2/4) + (r*(-1/2*1/E^(r^2/4) + 
                        r^2/(4*E^(r^2/4))))/4 + (3*(-1/2*r/E^(r^2/4) + 
                        (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2))/2 - 
                     (r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - 
                        (r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/
                          (4*E^(r^2/4))))/2))/2))/2) + 8*r^2*
                    (-1/8*1/E^(r^2/4) + r^2/(16*E^(r^2/4)) + 
                     (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))/2 + 
                     (r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/
                          (4*E^(r^2/4))))/2))/4 + 2*(-3/(4*E^(r^2/4)) + 
                       (3*r^2)/(8*E^(r^2/4)) + (r*(r/(2*E^(r^2/4)) - 
                          (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2))/2) - 
                     (r*(-1/4*r/E^(r^2/4) + (r*(-1/2*1/E^(r^2/4) + r^2/
                          (4*E^(r^2/4))))/4 + (3*(-1/2*r/E^(r^2/4) + 
                          (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2))/2 - 
                        (r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - 
                          (r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + 
                          r^2/(4*E^(r^2/4))))/2))/2))/2))/2))/r))/4 + 
              3*((-15*((16*r)/E^(r^2/4) - (4*r^3)/E^(r^2/4)))/r^6 + 
                (15*(16/E^(r^2/4) - (16*r^2)/E^(r^2/4) + 8*r^2*
                    (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^5 - 
                (6*((-40*r)/E^(r^2/4) + (8*r^3)/E^(r^2/4) + 16*r*
                    (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 8*r^2*
                    (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/
                         (4*E^(r^2/4))))/2)))/r^4 + (-32/E^(r^2/4) + 
                  (32*r^2)/E^(r^2/4) + 32*(-1/2*1/E^(r^2/4) + r^2/
                     (4*E^(r^2/4))) - 16*r^2*(-1/2*1/E^(r^2/4) + 
                    r^2/(4*E^(r^2/4))) + 32*r*(r/(2*E^(r^2/4)) - 
                    (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 
                  8*r^2*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - 
                    (r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/
                          (4*E^(r^2/4))))/2))/2))/r^3)*(-3 + Csc[theta]^2))))/
          (7.500000000000001*^-9*(168/(E^(r^2/4)*r^3) - 
              (21*((16*r)/E^(r^2/4) - (4*r^3)/E^(r^2/4)))/r^4 + 
              (9*(16/E^(r^2/4) - (16*r^2)/E^(r^2/4) + 8*r^2*
                  (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 - 
              (2*((-40*r)/E^(r^2/4) + (8*r^3)/E^(r^2/4) + 16*r*
                  (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 8*r^2*
                  (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/
                       (4*E^(r^2/4))))/2)))/r^2 + (-32/E^(r^2/4) + 
                (32*r^2)/E^(r^2/4) + 32*(-1/2*1/E^(r^2/4) + 
                  r^2/(4*E^(r^2/4))) - 16*r^2*(-1/2*1/E^(r^2/4) + 
                  r^2/(4*E^(r^2/4))) + 32*r*(r/(2*E^(r^2/4)) - 
                  (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 
                8*r^2*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - 
                  (r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/
                         (4*E^(r^2/4))))/2))/2))/r) - Csc[theta]^2 + 
            3.0000000000000004*^-8*(24/(E^(r^2/4)*r^3) - 
              (3*((16*r)/E^(r^2/4) - (4*r^3)/E^(r^2/4)))/r^4 + 
              (16/E^(r^2/4) - (16*r^2)/E^(r^2/4) + 8*r^2*(-1/2*1/E^(r^2/4) + 
                  r^2/(4*E^(r^2/4))))/r^3)*(-3 + Csc[theta]^2))^2 - 
         (5.*^-9*(-9.000000000000001*^-8*r*(-120/(E^(r^2/4)*r^4) + 
              (15*((16*r)/E^(r^2/4) - (4*r^3)/E^(r^2/4)))/r^5 - 
              (6*(16/E^(r^2/4) - (16*r^2)/E^(r^2/4) + 8*r^2*
                  (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^4 + 
              ((-40*r)/E^(r^2/4) + (8*r^3)/E^(r^2/4) + 16*r*
                 (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 8*r^2*
                 (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/
                      (4*E^(r^2/4))))/2))/r^3) + 1.5000000000000002*^-8*
             (168/(E^(r^2/4)*r^3) - (21*((16*r)/E^(r^2/4) - (4*r^3)/
                  E^(r^2/4)))/r^4 + (9*(16/E^(r^2/4) - (16*r^2)/E^(r^2/4) + 
                 8*r^2*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 - 
              (2*((-40*r)/E^(r^2/4) + (8*r^3)/E^(r^2/4) + 16*r*
                  (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 8*r^2*
                  (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/
                       (4*E^(r^2/4))))/2)))/r^2 + (-32/E^(r^2/4) + 
                (32*r^2)/E^(r^2/4) + 32*(-1/2*1/E^(r^2/4) + 
                  r^2/(4*E^(r^2/4))) - 16*r^2*(-1/2*1/E^(r^2/4) + 
                  r^2/(4*E^(r^2/4))) + 32*r*(r/(2*E^(r^2/4)) - 
                  (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 
                8*r^2*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - 
                  (r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/
                         (4*E^(r^2/4))))/2))/2))/r) + 7.500000000000001*^-9*r*
             (-840/(E^(r^2/4)*r^4) + (105*((16*r)/E^(r^2/4) - (4*r^3)/
                  E^(r^2/4)))/r^5 - (48*(16/E^(r^2/4) - (16*r^2)/E^(r^2/4) + 
                 8*r^2*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^4 + 
              (13*((-40*r)/E^(r^2/4) + (8*r^3)/E^(r^2/4) + 16*r*
                  (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 8*r^2*
                  (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/
                       (4*E^(r^2/4))))/2)))/r^3 - (3*(-32/E^(r^2/4) + 
                 (32*r^2)/E^(r^2/4) + 32*(-1/2*1/E^(r^2/4) + 
                   r^2/(4*E^(r^2/4))) - 16*r^2*(-1/2*1/E^(r^2/4) + 
                   r^2/(4*E^(r^2/4))) + 32*r*(r/(2*E^(r^2/4)) - 
                   (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 
                 8*r^2*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - 
                   (r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/
                          (4*E^(r^2/4))))/2))/2)))/r^2 + ((80*r)/E^(r^2/4) - 
                (16*r^3)/E^(r^2/4) - 32*r*(-1/2*1/E^(r^2/4) + 
                  r^2/(4*E^(r^2/4))) + 64*(r/(2*E^(r^2/4)) - 
                  (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) - 
                16*r^2*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + 
                     r^2/(4*E^(r^2/4))))/2) + 32*r*(1/(2*E^(r^2/4)) - 
                  r^2/(4*E^(r^2/4)) + (1/(2*E^(r^2/4)) - r^2/(4*E^(r^2/4)))/
                   2 - (r*((3*r)/(4*E^(r^2/4)) - r^3/(8*E^(r^2/4))))/2) + 
                16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - 
                  (r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/
                         (4*E^(r^2/4))))/2))/2) + 8*r^2*(-1/4*r/E^(r^2/4) + 
                  (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/4 + 
                  (3*(-1/2*r/E^(r^2/4) + (r*(-1/2*1/E^(r^2/4) + r^2/
                         (4*E^(r^2/4))))/2))/2 - (r*(3/(4*E^(r^2/4)) - 
                     (3*r^2)/(8*E^(r^2/4)) - (r*(r/(2*E^(r^2/4)) - 
                        (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2))/2))/
                   2))/r) - 2*Csc[theta]^2 + 3.0000000000000004*^-8*r*
             (-120/(E^(r^2/4)*r^4) + (15*((16*r)/E^(r^2/4) - (4*r^3)/
                  E^(r^2/4)))/r^5 - (6*(16/E^(r^2/4) - (16*r^2)/E^(r^2/4) + 
                 8*r^2*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^4 + 
              ((-40*r)/E^(r^2/4) + (8*r^3)/E^(r^2/4) + 16*r*
                 (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 8*r^2*
                 (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/
                      (4*E^(r^2/4))))/2))/r^3)*Csc[theta]^2 + 
            6.000000000000001*^-8*(24/(E^(r^2/4)*r^3) - 
              (3*((16*r)/E^(r^2/4) - (4*r^3)/E^(r^2/4)))/r^4 + 
              (16/E^(r^2/4) - (16*r^2)/E^(r^2/4) + 8*r^2*(-1/2*1/E^(r^2/4) + 
                  r^2/(4*E^(r^2/4))))/r^3)*(-3 + Csc[theta]^2))*
           ((3*((21*((16*r)/E^(r^2/4) - (4*r^3)/E^(r^2/4)))/r^5 - 
               (21*(16/E^(r^2/4) - (16*r^2)/E^(r^2/4) + 8*r^2*
                   (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^4 + 
               (9*((-40*r)/E^(r^2/4) + (8*r^3)/E^(r^2/4) + 16*r*
                   (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 8*r^2*
                   (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/
                        (4*E^(r^2/4))))/2)))/r^3 - (2*(-32/E^(r^2/4) + 
                  (32*r^2)/E^(r^2/4) + 32*(-1/2*1/E^(r^2/4) + r^2/
                     (4*E^(r^2/4))) - 16*r^2*(-1/2*1/E^(r^2/4) + 
                    r^2/(4*E^(r^2/4))) + 32*r*(r/(2*E^(r^2/4)) - 
                    (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 
                  8*r^2*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - 
                    (r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/
                          (4*E^(r^2/4))))/2))/2)))/r^2 + ((80*r)/E^(r^2/4) - 
                 (16*r^3)/E^(r^2/4) - 32*r*(-1/2*1/E^(r^2/4) + 
                   r^2/(4*E^(r^2/4))) + 64*(r/(2*E^(r^2/4)) - 
                   (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) - 
                 16*r^2*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + 
                      r^2/(4*E^(r^2/4))))/2) + 32*r*(1/(2*E^(r^2/4)) - 
                   r^2/(4*E^(r^2/4)) + (1/(2*E^(r^2/4)) - r^2/(4*E^(r^2/4)))/
                    2 - (r*((3*r)/(4*E^(r^2/4)) - r^3/(8*E^(r^2/4))))/2) + 
                 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - 
                   (r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/
                          (4*E^(r^2/4))))/2))/2) + 8*r^2*(-1/4*r/E^(r^2/4) + 
                   (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/4 + 
                   (3*(-1/2*r/E^(r^2/4) + (r*(-1/2*1/E^(r^2/4) + r^2/
                          (4*E^(r^2/4))))/2))/2 - (r*(3/(4*E^(r^2/4)) - 
                      (3*r^2)/(8*E^(r^2/4)) - (r*(r/(2*E^(r^2/4)) - 
                         (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2))/2))/
                    2))/r)*Sin[theta]^2)/4 + 
            3*((3*((16*r)/E^(r^2/4) - (4*r^3)/E^(r^2/4)))/r^5 - 
              (3*(16/E^(r^2/4) - (16*r^2)/E^(r^2/4) + 8*r^2*
                  (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^4 + 
              ((-40*r)/E^(r^2/4) + (8*r^3)/E^(r^2/4) + 16*r*
                 (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 8*r^2*
                 (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/
                      (4*E^(r^2/4))))/2))/r^3)*(1 - 3*Sin[theta]^2)))/
          (r*(7.500000000000001*^-9*(168/(E^(r^2/4)*r^3) - 
              (21*((16*r)/E^(r^2/4) - (4*r^3)/E^(r^2/4)))/r^4 + 
              (9*(16/E^(r^2/4) - (16*r^2)/E^(r^2/4) + 8*r^2*
                  (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 - 
              (2*((-40*r)/E^(r^2/4) + (8*r^3)/E^(r^2/4) + 16*r*
                  (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 8*r^2*
                  (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/
                       (4*E^(r^2/4))))/2)))/r^2 + (-32/E^(r^2/4) + 
                (32*r^2)/E^(r^2/4) + 32*(-1/2*1/E^(r^2/4) + 
                  r^2/(4*E^(r^2/4))) - 16*r^2*(-1/2*1/E^(r^2/4) + 
                  r^2/(4*E^(r^2/4))) + 32*r*(r/(2*E^(r^2/4)) - 
                  (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 
                8*r^2*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - 
                  (r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/
                         (4*E^(r^2/4))))/2))/2))/r) - Csc[theta]^2 + 
            3.0000000000000004*^-8*(24/(E^(r^2/4)*r^3) - 
              (3*((16*r)/E^(r^2/4) - (4*r^3)/E^(r^2/4)))/r^4 + 
              (16/E^(r^2/4) - (16*r^2)/E^(r^2/4) + 8*r^2*(-1/2*1/E^(r^2/4) + 
                  r^2/(4*E^(r^2/4))))/r^3)*(-3 + Csc[theta]^2))*
           (-2 + 3.0000000000000004*^-8*(24/(E^(r^2/4)*r^3) - 
              (3*((16*r)/E^(r^2/4) - (4*r^3)/E^(r^2/4)))/r^4 + 
              (16/E^(r^2/4) - (16*r^2)/E^(r^2/4) + 8*r^2*(-1/2*1/E^(r^2/4) + 
                  r^2/(4*E^(r^2/4))))/r^3)*(-1 + 3*Cos[2*theta]) + 
            1.5000000000000002*^-8*(168/(E^(r^2/4)*r^3) - 
              (21*((16*r)/E^(r^2/4) - (4*r^3)/E^(r^2/4)))/r^4 + 
              (9*(16/E^(r^2/4) - (16*r^2)/E^(r^2/4) + 8*r^2*
                  (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 - 
              (2*((-40*r)/E^(r^2/4) + (8*r^3)/E^(r^2/4) + 16*r*
                  (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 8*r^2*
                  (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/
                       (4*E^(r^2/4))))/2)))/r^2 + (-32/E^(r^2/4) + 
                (32*r^2)/E^(r^2/4) + 32*(-1/2*1/E^(r^2/4) + 
                  r^2/(4*E^(r^2/4))) - 16*r^2*(-1/2*1/E^(r^2/4) + 
                  r^2/(4*E^(r^2/4))) + 32*r*(r/(2*E^(r^2/4)) - 
                  (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 
                8*r^2*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - 
                  (r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/
                         (4*E^(r^2/4))))/2))/2))/r)*Sin[theta]^2)) + 
         (5.*^-9*(-9.000000000000001*^-8*r*(-120/(E^(r^2/4)*r^4) + 
              (15*((16*r)/E^(r^2/4) - (4*r^3)/E^(r^2/4)))/r^5 - 
              (6*(16/E^(r^2/4) - (16*r^2)/E^(r^2/4) + 8*r^2*
                  (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^4 + 
              ((-40*r)/E^(r^2/4) + (8*r^3)/E^(r^2/4) + 16*r*
                 (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 8*r^2*
                 (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/
                      (4*E^(r^2/4))))/2))/r^3) + 1.5000000000000002*^-8*
             (168/(E^(r^2/4)*r^3) - (21*((16*r)/E^(r^2/4) - (4*r^3)/
                  E^(r^2/4)))/r^4 + (9*(16/E^(r^2/4) - (16*r^2)/E^(r^2/4) + 
                 8*r^2*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 - 
              (2*((-40*r)/E^(r^2/4) + (8*r^3)/E^(r^2/4) + 16*r*
                  (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 8*r^2*
                  (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/
                       (4*E^(r^2/4))))/2)))/r^2 + (-32/E^(r^2/4) + 
                (32*r^2)/E^(r^2/4) + 32*(-1/2*1/E^(r^2/4) + 
                  r^2/(4*E^(r^2/4))) - 16*r^2*(-1/2*1/E^(r^2/4) + 
                  r^2/(4*E^(r^2/4))) + 32*r*(r/(2*E^(r^2/4)) - 
                  (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 
                8*r^2*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - 
                  (r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/
                         (4*E^(r^2/4))))/2))/2))/r) + 7.500000000000001*^-9*r*
             (-840/(E^(r^2/4)*r^4) + (105*((16*r)/E^(r^2/4) - (4*r^3)/
                  E^(r^2/4)))/r^5 - (48*(16/E^(r^2/4) - (16*r^2)/E^(r^2/4) + 
                 8*r^2*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^4 + 
              (13*((-40*r)/E^(r^2/4) + (8*r^3)/E^(r^2/4) + 16*r*
                  (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 8*r^2*
                  (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/
                       (4*E^(r^2/4))))/2)))/r^3 - (3*(-32/E^(r^2/4) + 
                 (32*r^2)/E^(r^2/4) + 32*(-1/2*1/E^(r^2/4) + 
                   r^2/(4*E^(r^2/4))) - 16*r^2*(-1/2*1/E^(r^2/4) + 
                   r^2/(4*E^(r^2/4))) + 32*r*(r/(2*E^(r^2/4)) - 
                   (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 
                 8*r^2*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - 
                   (r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/
                          (4*E^(r^2/4))))/2))/2)))/r^2 + ((80*r)/E^(r^2/4) - 
                (16*r^3)/E^(r^2/4) - 32*r*(-1/2*1/E^(r^2/4) + 
                  r^2/(4*E^(r^2/4))) + 64*(r/(2*E^(r^2/4)) - 
                  (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) - 
                16*r^2*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + 
                     r^2/(4*E^(r^2/4))))/2) + 32*r*(1/(2*E^(r^2/4)) - 
                  r^2/(4*E^(r^2/4)) + (1/(2*E^(r^2/4)) - r^2/(4*E^(r^2/4)))/
                   2 - (r*((3*r)/(4*E^(r^2/4)) - r^3/(8*E^(r^2/4))))/2) + 
                16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - 
                  (r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/
                         (4*E^(r^2/4))))/2))/2) + 8*r^2*(-1/4*r/E^(r^2/4) + 
                  (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/4 + 
                  (3*(-1/2*r/E^(r^2/4) + (r*(-1/2*1/E^(r^2/4) + r^2/
                         (4*E^(r^2/4))))/2))/2 - (r*(3/(4*E^(r^2/4)) - 
                     (3*r^2)/(8*E^(r^2/4)) - (r*(r/(2*E^(r^2/4)) - 
                        (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2))/2))/
                   2))/r) - 2*Csc[theta]^2 + 3.0000000000000004*^-8*r*
             (-120/(E^(r^2/4)*r^4) + (15*((16*r)/E^(r^2/4) - (4*r^3)/
                  E^(r^2/4)))/r^5 - (6*(16/E^(r^2/4) - (16*r^2)/E^(r^2/4) + 
                 8*r^2*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^4 + 
              ((-40*r)/E^(r^2/4) + (8*r^3)/E^(r^2/4) + 16*r*
                 (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 8*r^2*
                 (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/
                      (4*E^(r^2/4))))/2))/r^3)*Csc[theta]^2 + 
            6.000000000000001*^-8*(24/(E^(r^2/4)*r^3) - 
              (3*((16*r)/E^(r^2/4) - (4*r^3)/E^(r^2/4)))/r^4 + 
              (16/E^(r^2/4) - (16*r^2)/E^(r^2/4) + 8*r^2*(-1/2*1/E^(r^2/4) + 
                  r^2/(4*E^(r^2/4))))/r^3)*(-3 + Csc[theta]^2))*
           (-9.*^-8*(-48/(E^(r^2/4)*r^3) + (6*((16*r)/E^(r^2/4) - 
                 (4*r^3)/E^(r^2/4)))/r^4 - (3*(16/E^(r^2/4) - (16*r^2)/
                  E^(r^2/4) + 8*r^2*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/
               r^3 + ((-40*r)/E^(r^2/4) + (8*r^3)/E^(r^2/4) + 
                16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 
                8*r^2*(r/(2*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) - 
                 (4*r^3)/E^(r^2/4)))/r^5 + (6*(16/E^(r^2/4) - (16*r^2)/
                  E^(r^2/4) + 8*r^2*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/
               r^4 - (3*((-40*r)/E^(r^2/4) + (8*r^3)/E^(r^2/4) + 
                 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 
                 8*r^2*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + 
                      r^2/(4*E^(r^2/4))))/2)))/r^3 + (-32/E^(r^2/4) + 
                (32*r^2)/E^(r^2/4) + 32*(-1/2*1/E^(r^2/4) + 
                  r^2/(4*E^(r^2/4))) - 16*r^2*(-1/2*1/E^(r^2/4) + 
                  r^2/(4*E^(r^2/4))) + 32*r*(r/(2*E^(r^2/4)) - 
                  (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 
                8*r^2*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - 
                  (r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/
                         (4*E^(r^2/4))))/2))/2))/r^2)*Cos[theta]^2*
             Sin[theta]^2 - (3*((3*((16*r)/E^(r^2/4) - (4*r^3)/E^(r^2/4)))/
                r^5 - (3*(16/E^(r^2/4) - (16*r^2)/E^(r^2/4) + 8*r^2*
                   (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^4 + 
               ((-40*r)/E^(r^2/4) + (8*r^3)/E^(r^2/4) + 16*r*
                  (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 8*r^2*
                  (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/
                       (4*E^(r^2/4))))/2))/r^3)*(1 + 3*Cos[2*theta])*
              (-1 + 3.0000000000000004*^-8*(24/(E^(r^2/4)*r^3) - 
                 (3*((16*r)/E^(r^2/4) - (4*r^3)/E^(r^2/4)))/r^4 + 
                 (16/E^(r^2/4) - (16*r^2)/E^(r^2/4) + 8*r^2*
                    (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/r^3) - 
               7.500000000000001*^-9*(168/(E^(r^2/4)*r^3) - 
                 (21*((16*r)/E^(r^2/4) - (4*r^3)/E^(r^2/4)))/r^4 + 
                 (9*(16/E^(r^2/4) - (16*r^2)/E^(r^2/4) + 8*r^2*
                     (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 - 
                 (2*((-40*r)/E^(r^2/4) + (8*r^3)/E^(r^2/4) + 16*r*
                     (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 8*r^2*
                     (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/
                          (4*E^(r^2/4))))/2)))/r^2 + (-32/E^(r^2/4) + 
                   (32*r^2)/E^(r^2/4) + 32*(-1/2*1/E^(r^2/4) + r^2/
                      (4*E^(r^2/4))) - 16*r^2*(-1/2*1/E^(r^2/4) + 
                     r^2/(4*E^(r^2/4))) + 32*r*(r/(2*E^(r^2/4)) - 
                     (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 
                   8*r^2*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - 
                     (r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/
                          (4*E^(r^2/4))))/2))/2))/r)*Sin[theta]^2))/2))/
          (r*(7.500000000000001*^-9*(168/(E^(r^2/4)*r^3) - 
              (21*((16*r)/E^(r^2/4) - (4*r^3)/E^(r^2/4)))/r^4 + 
              (9*(16/E^(r^2/4) - (16*r^2)/E^(r^2/4) + 8*r^2*
                  (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 - 
              (2*((-40*r)/E^(r^2/4) + (8*r^3)/E^(r^2/4) + 16*r*
                  (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 8*r^2*
                  (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/
                       (4*E^(r^2/4))))/2)))/r^2 + (-32/E^(r^2/4) + 
                (32*r^2)/E^(r^2/4) + 32*(-1/2*1/E^(r^2/4) + 
                  r^2/(4*E^(r^2/4))) - 16*r^2*(-1/2*1/E^(r^2/4) + 
                  r^2/(4*E^(r^2/4))) + 32*r*(r/(2*E^(r^2/4)) - 
                  (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 
                8*r^2*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - 
                  (r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/
                         (4*E^(r^2/4))))/2))/2))/r) - Csc[theta]^2 + 
            3.0000000000000004*^-8*(24/(E^(r^2/4)*r^3) - 
              (3*((16*r)/E^(r^2/4) - (4*r^3)/E^(r^2/4)))/r^4 + 
              (16/E^(r^2/4) - (16*r^2)/E^(r^2/4) + 8*r^2*(-1/2*1/E^(r^2/4) + 
                  r^2/(4*E^(r^2/4))))/r^3)*(-3 + Csc[theta]^2))*
           (2 - 9.*^-16*(24/(E^(r^2/4)*r^3) - (3*((16*r)/E^(r^2/4) - 
                  (4*r^3)/E^(r^2/4)))/r^4 + (16/E^(r^2/4) - (16*r^2)/
                  E^(r^2/4) + 8*r^2*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/
                r^3)^2*(1 + 3*Cos[2*theta]) + 1.5000000000000002*^-8*
             (168/(E^(r^2/4)*r^3) - (21*((16*r)/E^(r^2/4) - (4*r^3)/
                  E^(r^2/4)))/r^4 + (9*(16/E^(r^2/4) - (16*r^2)/E^(r^2/4) + 
                 8*r^2*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 - 
              (2*((-40*r)/E^(r^2/4) + (8*r^3)/E^(r^2/4) + 16*r*
                  (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 8*r^2*
                  (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/
                       (4*E^(r^2/4))))/2)))/r^2 + (-32/E^(r^2/4) + 
                (32*r^2)/E^(r^2/4) + 32*(-1/2*1/E^(r^2/4) + 
                  r^2/(4*E^(r^2/4))) - 16*r^2*(-1/2*1/E^(r^2/4) + 
                  r^2/(4*E^(r^2/4))) + 32*r*(r/(2*E^(r^2/4)) - 
                  (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 
                8*r^2*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - 
                  (r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/
                         (4*E^(r^2/4))))/2))/2))/r)*Sin[theta]^2 + 
            3.0000000000000004*^-8*(24/(E^(r^2/4)*r^3) - 
              (3*((16*r)/E^(r^2/4) - (4*r^3)/E^(r^2/4)))/r^4 + 
              (16/E^(r^2/4) - (16*r^2)/E^(r^2/4) + 8*r^2*(-1/2*1/E^(r^2/4) + 
                  r^2/(4*E^(r^2/4))))/r^3)*(-1 + 3*Cos[2*theta] + 
              7.500000000000001*^-9*(168/(E^(r^2/4)*r^3) - 
                (21*((16*r)/E^(r^2/4) - (4*r^3)/E^(r^2/4)))/r^4 + 
                (9*(16/E^(r^2/4) - (16*r^2)/E^(r^2/4) + 8*r^2*
                    (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 - 
                (2*((-40*r)/E^(r^2/4) + (8*r^3)/E^(r^2/4) + 16*r*
                    (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 8*r^2*
                    (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/
                         (4*E^(r^2/4))))/2)))/r^2 + (-32/E^(r^2/4) + 
                  (32*r^2)/E^(r^2/4) + 32*(-1/2*1/E^(r^2/4) + r^2/
                     (4*E^(r^2/4))) - 16*r^2*(-1/2*1/E^(r^2/4) + 
                    r^2/(4*E^(r^2/4))) + 32*r*(r/(2*E^(r^2/4)) - 
                    (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 
                  8*r^2*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - 
                    (r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/
                          (4*E^(r^2/4))))/2))/2))/r)*(1 + 3*Cos[2*theta])*
               Sin[theta]^2) - 4.5*^-16*(-48/(E^(r^2/4)*r^3) + 
               (6*((16*r)/E^(r^2/4) - (4*r^3)/E^(r^2/4)))/r^4 - 
               (3*(16/E^(r^2/4) - (16*r^2)/E^(r^2/4) + 8*r^2*
                   (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + 
               ((-40*r)/E^(r^2/4) + (8*r^3)/E^(r^2/4) + 16*r*
                  (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 8*r^2*
                  (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/
                       (4*E^(r^2/4))))/2))/r^2)^2*Sin[2*theta]^2)) + 
         (1.5000000000000002*^-8*Cos[theta]*(-3.0000000000000004*^-8*
             ((3*((16*r)/E^(r^2/4) - (4*r^3)/E^(r^2/4)))/r^5 - 
              (3*(16/E^(r^2/4) - (16*r^2)/E^(r^2/4) + 8*r^2*
                  (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^4 + 
              ((-40*r)/E^(r^2/4) + (8*r^3)/E^(r^2/4) + 16*r*
                 (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 8*r^2*
                 (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/
                      (4*E^(r^2/4))))/2))/r^3)*(-48/(E^(r^2/4)*r^3) + 
              (6*((16*r)/E^(r^2/4) - (4*r^3)/E^(r^2/4)))/r^4 - 
              (3*(16/E^(r^2/4) - (16*r^2)/E^(r^2/4) + 8*r^2*
                  (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + 
              ((-40*r)/E^(r^2/4) + (8*r^3)/E^(r^2/4) + 16*r*
                 (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 8*r^2*
                 (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/
                      (4*E^(r^2/4))))/2))/r^2)*(1 + 3*Cos[2*theta]) + 
            ((-6*((16*r)/E^(r^2/4) - (4*r^3)/E^(r^2/4)))/r^5 + 
              (6*(16/E^(r^2/4) - (16*r^2)/E^(r^2/4) + 8*r^2*
                  (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^4 - 
              (3*((-40*r)/E^(r^2/4) + (8*r^3)/E^(r^2/4) + 16*r*
                  (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 8*r^2*
                  (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/
                       (4*E^(r^2/4))))/2)))/r^3 + (-32/E^(r^2/4) + 
                (32*r^2)/E^(r^2/4) + 32*(-1/2*1/E^(r^2/4) + 
                  r^2/(4*E^(r^2/4))) - 16*r^2*(-1/2*1/E^(r^2/4) + 
                  r^2/(4*E^(r^2/4))) + 32*r*(r/(2*E^(r^2/4)) - 
                  (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 
                8*r^2*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - 
                  (r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/
                         (4*E^(r^2/4))))/2))/2))/r^2)*
             (2 + 3.0000000000000004*^-8*(24/(E^(r^2/4)*r^3) - 
                (3*((16*r)/E^(r^2/4) - (4*r^3)/E^(r^2/4)))/r^4 + 
                (16/E^(r^2/4) - (16*r^2)/E^(r^2/4) + 8*r^2*
                   (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/r^3)*(1 + 
                3*Cos[2*theta])))*(1.5000000000000002*^-8*
             (168/(E^(r^2/4)*r^3) - (21*((16*r)/E^(r^2/4) - (4*r^3)/
                  E^(r^2/4)))/r^4 + (9*(16/E^(r^2/4) - (16*r^2)/E^(r^2/4) + 
                 8*r^2*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 - 
              (2*((-40*r)/E^(r^2/4) + (8*r^3)/E^(r^2/4) + 16*r*
                  (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 8*r^2*
                  (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/
                       (4*E^(r^2/4))))/2)))/r^2 + (-32/E^(r^2/4) + 
                (32*r^2)/E^(r^2/4) + 32*(-1/2*1/E^(r^2/4) + 
                  r^2/(4*E^(r^2/4))) - 16*r^2*(-1/2*1/E^(r^2/4) + 
                  r^2/(4*E^(r^2/4))) + 32*r*(r/(2*E^(r^2/4)) - 
                  (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 
                8*r^2*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - 
                  (r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/
                         (4*E^(r^2/4))))/2))/2))/r)*Cos[theta] - 
            Cot[theta]*Csc[theta] + 3*(24/(E^(r^2/4)*r^3) - 
              (3*((16*r)/E^(r^2/4) - (4*r^3)/E^(r^2/4)))/r^4 + 
              (16/E^(r^2/4) - (16*r^2)/E^(r^2/4) + 8*r^2*(-1/2*1/E^(r^2/4) + 
                  r^2/(4*E^(r^2/4))))/r^3)*(-6.000000000000001*^-8*Cos[
                theta] + 1.*^-8*Cot[theta]*Csc[theta])))/
          (r*(7.500000000000001*^-9*(168/(E^(r^2/4)*r^3) - 
              (21*((16*r)/E^(r^2/4) - (4*r^3)/E^(r^2/4)))/r^4 + 
              (9*(16/E^(r^2/4) - (16*r^2)/E^(r^2/4) + 8*r^2*
                  (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 - 
              (2*((-40*r)/E^(r^2/4) + (8*r^3)/E^(r^2/4) + 16*r*
                  (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 8*r^2*
                  (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/
                       (4*E^(r^2/4))))/2)))/r^2 + (-32/E^(r^2/4) + 
                (32*r^2)/E^(r^2/4) + 32*(-1/2*1/E^(r^2/4) + 
                  r^2/(4*E^(r^2/4))) - 16*r^2*(-1/2*1/E^(r^2/4) + 
                  r^2/(4*E^(r^2/4))) + 32*r*(r/(2*E^(r^2/4)) - 
                  (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 
                8*r^2*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - 
                  (r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/
                         (4*E^(r^2/4))))/2))/2))/r) - Csc[theta]^2 + 
            3.0000000000000004*^-8*(24/(E^(r^2/4)*r^3) - 
              (3*((16*r)/E^(r^2/4) - (4*r^3)/E^(r^2/4)))/r^4 + 
              (16/E^(r^2/4) - (16*r^2)/E^(r^2/4) + 8*r^2*(-1/2*1/E^(r^2/4) + 
                  r^2/(4*E^(r^2/4))))/r^3)*(-3 + Csc[theta]^2))*
           (-2 + 9.*^-16*(24/(E^(r^2/4)*r^3) - (3*((16*r)/E^(r^2/4) - 
                  (4*r^3)/E^(r^2/4)))/r^4 + (16/E^(r^2/4) - (16*r^2)/
                  E^(r^2/4) + 8*r^2*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/
                r^3)^2*(1 + 3*Cos[2*theta]) - 1.5000000000000002*^-8*
             (168/(E^(r^2/4)*r^3) - (21*((16*r)/E^(r^2/4) - (4*r^3)/
                  E^(r^2/4)))/r^4 + (9*(16/E^(r^2/4) - (16*r^2)/E^(r^2/4) + 
                 8*r^2*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 - 
              (2*((-40*r)/E^(r^2/4) + (8*r^3)/E^(r^2/4) + 16*r*
                  (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 8*r^2*
                  (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/
                       (4*E^(r^2/4))))/2)))/r^2 + (-32/E^(r^2/4) + 
                (32*r^2)/E^(r^2/4) + 32*(-1/2*1/E^(r^2/4) + 
                  r^2/(4*E^(r^2/4))) - 16*r^2*(-1/2*1/E^(r^2/4) + 
                  r^2/(4*E^(r^2/4))) + 32*r*(r/(2*E^(r^2/4)) - 
                  (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 
                8*r^2*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - 
                  (r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/
                         (4*E^(r^2/4))))/2))/2))/r)*Sin[theta]^2 - 
            3.0000000000000004*^-8*(24/(E^(r^2/4)*r^3) - 
              (3*((16*r)/E^(r^2/4) - (4*r^3)/E^(r^2/4)))/r^4 + 
              (16/E^(r^2/4) - (16*r^2)/E^(r^2/4) + 8*r^2*(-1/2*1/E^(r^2/4) + 
                  r^2/(4*E^(r^2/4))))/r^3)*(-1 + 3*Cos[2*theta] + 
              7.500000000000001*^-9*(168/(E^(r^2/4)*r^3) - 
                (21*((16*r)/E^(r^2/4) - (4*r^3)/E^(r^2/4)))/r^4 + 
                (9*(16/E^(r^2/4) - (16*r^2)/E^(r^2/4) + 8*r^2*
                    (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 - 
                (2*((-40*r)/E^(r^2/4) + (8*r^3)/E^(r^2/4) + 16*r*
                    (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 8*r^2*
                    (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/
                         (4*E^(r^2/4))))/2)))/r^2 + (-32/E^(r^2/4) + 
                  (32*r^2)/E^(r^2/4) + 32*(-1/2*1/E^(r^2/4) + r^2/
                     (4*E^(r^2/4))) - 16*r^2*(-1/2*1/E^(r^2/4) + 
                    r^2/(4*E^(r^2/4))) + 32*r*(r/(2*E^(r^2/4)) - 
                    (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 
                  8*r^2*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - 
                    (r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/
                          (4*E^(r^2/4))))/2))/2))/r)*(1 + 3*Cos[2*theta])*
               Sin[theta]^2) + 4.5*^-16*(-48/(E^(r^2/4)*r^3) + 
               (6*((16*r)/E^(r^2/4) - (4*r^3)/E^(r^2/4)))/r^4 - 
               (3*(16/E^(r^2/4) - (16*r^2)/E^(r^2/4) + 8*r^2*
                   (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + 
               ((-40*r)/E^(r^2/4) + (8*r^3)/E^(r^2/4) + 16*r*
                  (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 8*r^2*
                  (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/
                       (4*E^(r^2/4))))/2))/r^2)^2*Sin[2*theta]^2))))/
       Sqrt[2]))/(Sqrt[2]*r) + 
   (-1/2*(-3.0000000000000004*^-8*r*(-48/(E^(r^2/4)*r^3) + 
          (6*((16*r)/E^(r^2/4) - (4*r^3)/E^(r^2/4)))/r^4 - 
          (3*(16/E^(r^2/4) - (16*r^2)/E^(r^2/4) + 8*r^2*(-1/2*1/E^(r^2/4) + 
               r^2/(4*E^(r^2/4)))))/r^3 + ((-40*r)/E^(r^2/4) + 
            (8*r^3)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 
            8*r^2*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + 
                 r^2/(4*E^(r^2/4))))/2))/r^2)*Cos[theta]*Sin[theta]*
         ((1.5000000000000002*^-8*Cos[theta]*Sin[theta]*
            (((-6*((16*r)/E^(r^2/4) - (4*r^3)/E^(r^2/4)))/r^5 + 
               (6*(16/E^(r^2/4) - (16*r^2)/E^(r^2/4) + 8*r^2*
                   (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^4 - 
               (3*((-40*r)/E^(r^2/4) + (8*r^3)/E^(r^2/4) + 16*r*
                   (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 8*r^2*
                   (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/
                        (4*E^(r^2/4))))/2)))/r^3 + (-32/E^(r^2/4) + 
                 (32*r^2)/E^(r^2/4) + 32*(-1/2*1/E^(r^2/4) + 
                   r^2/(4*E^(r^2/4))) - 16*r^2*(-1/2*1/E^(r^2/4) + 
                   r^2/(4*E^(r^2/4))) + 32*r*(r/(2*E^(r^2/4)) - 
                   (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 
                 8*r^2*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - 
                   (r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/
                          (4*E^(r^2/4))))/2))/2))/r^2)*
              (1 - 3.0000000000000004*^-8*(24/(E^(r^2/4)*r^3) - 
                 (3*((16*r)/E^(r^2/4) - (4*r^3)/E^(r^2/4)))/r^4 + 
                 (16/E^(r^2/4) - (16*r^2)/E^(r^2/4) + 8*r^2*
                    (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/r^3) + 
               7.500000000000001*^-9*(168/(E^(r^2/4)*r^3) - 
                 (21*((16*r)/E^(r^2/4) - (4*r^3)/E^(r^2/4)))/r^4 + 
                 (9*(16/E^(r^2/4) - (16*r^2)/E^(r^2/4) + 8*r^2*
                     (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 - 
                 (2*((-40*r)/E^(r^2/4) + (8*r^3)/E^(r^2/4) + 16*r*
                     (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 8*r^2*
                     (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/
                          (4*E^(r^2/4))))/2)))/r^2 + (-32/E^(r^2/4) + 
                   (32*r^2)/E^(r^2/4) + 32*(-1/2*1/E^(r^2/4) + r^2/
                      (4*E^(r^2/4))) - 16*r^2*(-1/2*1/E^(r^2/4) + 
                     r^2/(4*E^(r^2/4))) + 32*r*(r/(2*E^(r^2/4)) - 
                     (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 
                   8*r^2*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - 
                     (r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/
                          (4*E^(r^2/4))))/2))/2))/r)*Sin[theta]^2) + 
             1.*^-8*(-48/(E^(r^2/4)*r^3) + (6*((16*r)/E^(r^2/4) - 
                  (4*r^3)/E^(r^2/4)))/r^4 - (3*(16/E^(r^2/4) - (16*r^2)/
                   E^(r^2/4) + 8*r^2*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/
                r^3 + ((-40*r)/E^(r^2/4) + (8*r^3)/E^(r^2/4) + 
                 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 
                 8*r^2*(r/(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) - (4*r^3)/E^(r^2/4)))/r^5 - 
                 (3*(16/E^(r^2/4) - (16*r^2)/E^(r^2/4) + 8*r^2*
                     (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^4 + 
                 ((-40*r)/E^(r^2/4) + (8*r^3)/E^(r^2/4) + 16*r*
                    (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 8*r^2*
                    (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/
                         (4*E^(r^2/4))))/2))/r^3) - 
               (3*((21*((16*r)/E^(r^2/4) - (4*r^3)/E^(r^2/4)))/r^5 - 
                  (21*(16/E^(r^2/4) - (16*r^2)/E^(r^2/4) + 8*r^2*
                      (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^4 + 
                  (9*((-40*r)/E^(r^2/4) + (8*r^3)/E^(r^2/4) + 16*r*
                      (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 8*r^2*
                      (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/
                          (4*E^(r^2/4))))/2)))/r^3 - (2*(-32/E^(r^2/4) + 
                     (32*r^2)/E^(r^2/4) + 32*(-1/2*1/E^(r^2/4) + r^2/
                        (4*E^(r^2/4))) - 16*r^2*(-1/2*1/E^(r^2/4) + 
                       r^2/(4*E^(r^2/4))) + 32*r*(r/(2*E^(r^2/4)) - 
                       (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 
                     8*r^2*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - 
                       (r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/
                          (4*E^(r^2/4))))/2))/2)))/r^2 + ((80*r)/E^(r^2/4) - 
                    (16*r^3)/E^(r^2/4) - 32*r*(-1/2*1/E^(r^2/4) + 
                      r^2/(4*E^(r^2/4))) + 64*(r/(2*E^(r^2/4)) - 
                      (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) - 
                    16*r^2*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + 
                         r^2/(4*E^(r^2/4))))/2) + 32*r*(1/(2*E^(r^2/4)) - 
                      r^2/(4*E^(r^2/4)) + (1/(2*E^(r^2/4)) - r^2/
                         (4*E^(r^2/4)))/2 - (r*((3*r)/(4*E^(r^2/4)) - 
                         r^3/(8*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - 
                      (3*r^2)/(8*E^(r^2/4)) - (r*(r/(2*E^(r^2/4)) - 
                         (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2))/2) + 
                    8*r^2*(-1/4*r/E^(r^2/4) + (r*(-1/2*1/E^(r^2/4) + 
                         r^2/(4*E^(r^2/4))))/4 + (3*(-1/2*r/E^(r^2/4) + 
                         (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2))/2 - 
                      (r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - 
                         (r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/
                          (4*E^(r^2/4))))/2))/2))/2))/r)*Sin[theta]^2)/4))*
            (r*(2 - 6.000000000000001*^-8*(24/(E^(r^2/4)*r^3) - 
                 (3*((16*r)/E^(r^2/4) - (4*r^3)/E^(r^2/4)))/r^4 + 
                 (16/E^(r^2/4) - (16*r^2)/E^(r^2/4) + 8*r^2*
                    (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/r^3) - 
               3.0000000000000004*^-8*r*(-120/(E^(r^2/4)*r^4) + 
                 (15*((16*r)/E^(r^2/4) - (4*r^3)/E^(r^2/4)))/r^5 - 
                 (6*(16/E^(r^2/4) - (16*r^2)/E^(r^2/4) + 8*r^2*
                     (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^4 + 
                 ((-40*r)/E^(r^2/4) + (8*r^3)/E^(r^2/4) + 16*r*
                    (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 8*r^2*
                    (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/
                         (4*E^(r^2/4))))/2))/r^3) + 1.5000000000000002*^-8*
                (168/(E^(r^2/4)*r^3) - (21*((16*r)/E^(r^2/4) - (4*r^3)/
                     E^(r^2/4)))/r^4 + (9*(16/E^(r^2/4) - (16*r^2)/
                     E^(r^2/4) + 8*r^2*(-1/2*1/E^(r^2/4) + r^2/
                       (4*E^(r^2/4)))))/r^3 - (2*((-40*r)/E^(r^2/4) + 
                    (8*r^3)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + 
                      r^2/(4*E^(r^2/4))) + 8*r^2*(r/(2*E^(r^2/4)) - 
                      (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2)))/r^2 + 
                 (-32/E^(r^2/4) + (32*r^2)/E^(r^2/4) + 32*(-1/2*1/E^(r^2/4) + 
                     r^2/(4*E^(r^2/4))) - 16*r^2*(-1/2*1/E^(r^2/4) + 
                     r^2/(4*E^(r^2/4))) + 32*r*(r/(2*E^(r^2/4)) - 
                     (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 
                   8*r^2*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - 
                     (r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/
                          (4*E^(r^2/4))))/2))/2))/r)*Sin[theta]^2 + 
               7.500000000000001*^-9*r*(-840/(E^(r^2/4)*r^4) + 
                 (105*((16*r)/E^(r^2/4) - (4*r^3)/E^(r^2/4)))/r^5 - 
                 (48*(16/E^(r^2/4) - (16*r^2)/E^(r^2/4) + 8*r^2*
                     (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^4 + 
                 (13*((-40*r)/E^(r^2/4) + (8*r^3)/E^(r^2/4) + 16*r*
                     (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 8*r^2*
                     (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/
                          (4*E^(r^2/4))))/2)))/r^3 - (3*(-32/E^(r^2/4) + 
                    (32*r^2)/E^(r^2/4) + 32*(-1/2*1/E^(r^2/4) + r^2/
                       (4*E^(r^2/4))) - 16*r^2*(-1/2*1/E^(r^2/4) + 
                      r^2/(4*E^(r^2/4))) + 32*r*(r/(2*E^(r^2/4)) - 
                      (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 
                    8*r^2*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - 
                      (r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/
                          (4*E^(r^2/4))))/2))/2)))/r^2 + ((80*r)/E^(r^2/4) - 
                   (16*r^3)/E^(r^2/4) - 32*r*(-1/2*1/E^(r^2/4) + 
                     r^2/(4*E^(r^2/4))) + 64*(r/(2*E^(r^2/4)) - 
                     (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) - 
                   16*r^2*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + 
                        r^2/(4*E^(r^2/4))))/2) + 32*r*(1/(2*E^(r^2/4)) - 
                     r^2/(4*E^(r^2/4)) + (1/(2*E^(r^2/4)) - r^2/
                        (4*E^(r^2/4)))/2 - (r*((3*r)/(4*E^(r^2/4)) - 
                        r^3/(8*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - 
                     (3*r^2)/(8*E^(r^2/4)) - (r*(r/(2*E^(r^2/4)) - 
                        (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2))/2) + 
                   8*r^2*(-1/4*r/E^(r^2/4) + (r*(-1/2*1/E^(r^2/4) + 
                        r^2/(4*E^(r^2/4))))/4 + (3*(-1/2*r/E^(r^2/4) + 
                        (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2))/2 - 
                     (r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - 
                        (r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/
                          (4*E^(r^2/4))))/2))/2))/2))/r)*Sin[theta]^2)*
              (-1 + 3.0000000000000004*^-8*(24/(E^(r^2/4)*r^3) - 
                 (3*((16*r)/E^(r^2/4) - (4*r^3)/E^(r^2/4)))/r^4 + 
                 (16/E^(r^2/4) - (16*r^2)/E^(r^2/4) + 8*r^2*
                    (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/r^3)*
                (-2 + 3*Sin[theta]^2)) + 1.35*^-15*r*(24/(E^(r^2/4)*r^3) - 
               (3*((16*r)/E^(r^2/4) - (4*r^3)/E^(r^2/4)))/r^4 + 
               (16/E^(r^2/4) - (16*r^2)/E^(r^2/4) + 8*r^2*(-1/2*1/E^(r^2/4) + 
                   r^2/(4*E^(r^2/4))))/r^3)*(-48/(E^(r^2/4)*r^3) + 
               (6*((16*r)/E^(r^2/4) - (4*r^3)/E^(r^2/4)))/r^4 - 
               (3*(16/E^(r^2/4) - (16*r^2)/E^(r^2/4) + 8*r^2*
                   (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + 
               ((-40*r)/E^(r^2/4) + (8*r^3)/E^(r^2/4) + 16*r*
                  (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 8*r^2*
                  (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/
                       (4*E^(r^2/4))))/2))/r^2)*Sin[2*theta]^2))/
           (r*(9.*^-16*(-48/(E^(r^2/4)*r^3) + (6*((16*r)/E^(r^2/4) - 
                   (4*r^3)/E^(r^2/4)))/r^4 - (3*(16/E^(r^2/4) - (16*r^2)/
                    E^(r^2/4) + 8*r^2*(-1/2*1/E^(r^2/4) + r^2/
                      (4*E^(r^2/4)))))/r^3 + ((-40*r)/E^(r^2/4) + 
                  (8*r^3)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + 
                    r^2/(4*E^(r^2/4))) + 8*r^2*(r/(2*E^(r^2/4)) - 
                    (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2))/r^2)^2*
              Cos[theta]^2*Sin[theta]^2 - (1 - 3.0000000000000004*^-8*
                (24/(E^(r^2/4)*r^3) - (3*((16*r)/E^(r^2/4) - (4*r^3)/
                     E^(r^2/4)))/r^4 + (16/E^(r^2/4) - (16*r^2)/E^(r^2/4) + 
                   8*r^2*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/r^3) + 
               7.500000000000001*^-9*(168/(E^(r^2/4)*r^3) - 
                 (21*((16*r)/E^(r^2/4) - (4*r^3)/E^(r^2/4)))/r^4 + 
                 (9*(16/E^(r^2/4) - (16*r^2)/E^(r^2/4) + 8*r^2*
                     (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 - 
                 (2*((-40*r)/E^(r^2/4) + (8*r^3)/E^(r^2/4) + 16*r*
                     (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 8*r^2*
                     (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/
                          (4*E^(r^2/4))))/2)))/r^2 + (-32/E^(r^2/4) + 
                   (32*r^2)/E^(r^2/4) + 32*(-1/2*1/E^(r^2/4) + r^2/
                      (4*E^(r^2/4))) - 16*r^2*(-1/2*1/E^(r^2/4) + 
                     r^2/(4*E^(r^2/4))) + 32*r*(r/(2*E^(r^2/4)) - 
                     (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 
                   8*r^2*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - 
                     (r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/
                          (4*E^(r^2/4))))/2))/2))/r)*Sin[theta]^2)*
              (1 + 3.0000000000000004*^-8*(24/(E^(r^2/4)*r^3) - 
                 (3*((16*r)/E^(r^2/4) - (4*r^3)/E^(r^2/4)))/r^4 + 
                 (16/E^(r^2/4) - (16*r^2)/E^(r^2/4) + 8*r^2*
                    (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/r^3)*
                (2 - 3*Sin[theta]^2)))*(2 - 9.*^-16*(24/(E^(r^2/4)*r^3) - 
                (3*((16*r)/E^(r^2/4) - (4*r^3)/E^(r^2/4)))/r^4 + 
                (16/E^(r^2/4) - (16*r^2)/E^(r^2/4) + 8*r^2*
                   (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/r^3)^2*
              (1 + 3*Cos[2*theta]) + 1.5000000000000002*^-8*
              (168/(E^(r^2/4)*r^3) - (21*((16*r)/E^(r^2/4) - (4*r^3)/
                   E^(r^2/4)))/r^4 + (9*(16/E^(r^2/4) - (16*r^2)/E^(r^2/4) + 
                  8*r^2*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 - 
               (2*((-40*r)/E^(r^2/4) + (8*r^3)/E^(r^2/4) + 16*r*
                   (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 8*r^2*
                   (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/
                        (4*E^(r^2/4))))/2)))/r^2 + (-32/E^(r^2/4) + 
                 (32*r^2)/E^(r^2/4) + 32*(-1/2*1/E^(r^2/4) + 
                   r^2/(4*E^(r^2/4))) - 16*r^2*(-1/2*1/E^(r^2/4) + 
                   r^2/(4*E^(r^2/4))) + 32*r*(r/(2*E^(r^2/4)) - 
                   (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 
                 8*r^2*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - 
                   (r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/
                          (4*E^(r^2/4))))/2))/2))/r)*Sin[theta]^2 + 
             3.0000000000000004*^-8*(24/(E^(r^2/4)*r^3) - 
               (3*((16*r)/E^(r^2/4) - (4*r^3)/E^(r^2/4)))/r^4 + 
               (16/E^(r^2/4) - (16*r^2)/E^(r^2/4) + 8*r^2*(-1/2*1/E^(r^2/4) + 
                   r^2/(4*E^(r^2/4))))/r^3)*(-1 + 3*Cos[2*theta] + 
               7.500000000000001*^-9*(168/(E^(r^2/4)*r^3) - 
                 (21*((16*r)/E^(r^2/4) - (4*r^3)/E^(r^2/4)))/r^4 + 
                 (9*(16/E^(r^2/4) - (16*r^2)/E^(r^2/4) + 8*r^2*
                     (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 - 
                 (2*((-40*r)/E^(r^2/4) + (8*r^3)/E^(r^2/4) + 16*r*
                     (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 8*r^2*
                     (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/
                          (4*E^(r^2/4))))/2)))/r^2 + (-32/E^(r^2/4) + 
                   (32*r^2)/E^(r^2/4) + 32*(-1/2*1/E^(r^2/4) + r^2/
                      (4*E^(r^2/4))) - 16*r^2*(-1/2*1/E^(r^2/4) + 
                     r^2/(4*E^(r^2/4))) + 32*r*(r/(2*E^(r^2/4)) - 
                     (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 
                   8*r^2*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - 
                     (r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/
                          (4*E^(r^2/4))))/2))/2))/r)*(1 + 3*Cos[2*theta])*
                Sin[theta]^2) - 4.5*^-16*(-48/(E^(r^2/4)*r^3) + 
                (6*((16*r)/E^(r^2/4) - (4*r^3)/E^(r^2/4)))/r^4 - 
                (3*(16/E^(r^2/4) - (16*r^2)/E^(r^2/4) + 8*r^2*
                    (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + 
                ((-40*r)/E^(r^2/4) + (8*r^3)/E^(r^2/4) + 16*r*
                   (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 8*r^2*
                   (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/
                        (4*E^(r^2/4))))/2))/r^2)^2*Sin[2*theta]^2)) + 
          (1.5000000000000002*^-8*Cos[theta]*(-3.0000000000000004*^-8*
              ((3*((16*r)/E^(r^2/4) - (4*r^3)/E^(r^2/4)))/r^5 - 
               (3*(16/E^(r^2/4) - (16*r^2)/E^(r^2/4) + 8*r^2*
                   (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^4 + 
               ((-40*r)/E^(r^2/4) + (8*r^3)/E^(r^2/4) + 16*r*
                  (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 8*r^2*
                  (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/
                       (4*E^(r^2/4))))/2))/r^3)*(-48/(E^(r^2/4)*r^3) + 
               (6*((16*r)/E^(r^2/4) - (4*r^3)/E^(r^2/4)))/r^4 - 
               (3*(16/E^(r^2/4) - (16*r^2)/E^(r^2/4) + 8*r^2*
                   (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + 
               ((-40*r)/E^(r^2/4) + (8*r^3)/E^(r^2/4) + 16*r*
                  (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 8*r^2*
                  (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/
                       (4*E^(r^2/4))))/2))/r^2)*(1 + 3*Cos[2*theta]) + 
             ((-6*((16*r)/E^(r^2/4) - (4*r^3)/E^(r^2/4)))/r^5 + 
               (6*(16/E^(r^2/4) - (16*r^2)/E^(r^2/4) + 8*r^2*
                   (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^4 - 
               (3*((-40*r)/E^(r^2/4) + (8*r^3)/E^(r^2/4) + 16*r*
                   (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 8*r^2*
                   (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/
                        (4*E^(r^2/4))))/2)))/r^3 + (-32/E^(r^2/4) + 
                 (32*r^2)/E^(r^2/4) + 32*(-1/2*1/E^(r^2/4) + 
                   r^2/(4*E^(r^2/4))) - 16*r^2*(-1/2*1/E^(r^2/4) + 
                   r^2/(4*E^(r^2/4))) + 32*r*(r/(2*E^(r^2/4)) - 
                   (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 
                 8*r^2*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - 
                   (r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/
                          (4*E^(r^2/4))))/2))/2))/r^2)*
              (2 + 3.0000000000000004*^-8*(24/(E^(r^2/4)*r^3) - 
                 (3*((16*r)/E^(r^2/4) - (4*r^3)/E^(r^2/4)))/r^4 + 
                 (16/E^(r^2/4) - (16*r^2)/E^(r^2/4) + 8*r^2*
                    (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/r^3)*
                (1 + 3*Cos[2*theta])))*Sin[theta]*
            (1.8*^-15*(24/(E^(r^2/4)*r^3) - (3*((16*r)/E^(r^2/4) - 
                   (4*r^3)/E^(r^2/4)))/r^4 + (16/E^(r^2/4) - (16*r^2)/
                   E^(r^2/4) + 8*r^2*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/
                 r^3)^2 + (1 + 7.500000000000001*^-9*(168/(E^(r^2/4)*r^3) - 
                 (21*((16*r)/E^(r^2/4) - (4*r^3)/E^(r^2/4)))/r^4 + 
                 (9*(16/E^(r^2/4) - (16*r^2)/E^(r^2/4) + 8*r^2*
                     (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 - 
                 (2*((-40*r)/E^(r^2/4) + (8*r^3)/E^(r^2/4) + 16*r*
                     (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 8*r^2*
                     (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/
                          (4*E^(r^2/4))))/2)))/r^2 + (-32/E^(r^2/4) + 
                   (32*r^2)/E^(r^2/4) + 32*(-1/2*1/E^(r^2/4) + r^2/
                      (4*E^(r^2/4))) - 16*r^2*(-1/2*1/E^(r^2/4) + 
                     r^2/(4*E^(r^2/4))) + 32*r*(r/(2*E^(r^2/4)) - 
                     (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 
                   8*r^2*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - 
                     (r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/
                          (4*E^(r^2/4))))/2))/2))/r)*Sin[theta]^2)*
              (2 - 3.0000000000000004*^-8*r*(-120/(E^(r^2/4)*r^4) + 
                 (15*((16*r)/E^(r^2/4) - (4*r^3)/E^(r^2/4)))/r^5 - 
                 (6*(16/E^(r^2/4) - (16*r^2)/E^(r^2/4) + 8*r^2*
                     (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^4 + 
                 ((-40*r)/E^(r^2/4) + (8*r^3)/E^(r^2/4) + 16*r*
                    (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 8*r^2*
                    (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/
                         (4*E^(r^2/4))))/2))/r^3) + 1.5000000000000002*^-8*
                (168/(E^(r^2/4)*r^3) - (21*((16*r)/E^(r^2/4) - (4*r^3)/
                     E^(r^2/4)))/r^4 + (9*(16/E^(r^2/4) - (16*r^2)/
                     E^(r^2/4) + 8*r^2*(-1/2*1/E^(r^2/4) + r^2/
                       (4*E^(r^2/4)))))/r^3 - (2*((-40*r)/E^(r^2/4) + 
                    (8*r^3)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + 
                      r^2/(4*E^(r^2/4))) + 8*r^2*(r/(2*E^(r^2/4)) - 
                      (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2)))/r^2 + 
                 (-32/E^(r^2/4) + (32*r^2)/E^(r^2/4) + 32*(-1/2*1/E^(r^2/4) + 
                     r^2/(4*E^(r^2/4))) - 16*r^2*(-1/2*1/E^(r^2/4) + 
                     r^2/(4*E^(r^2/4))) + 32*r*(r/(2*E^(r^2/4)) - 
                     (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 
                   8*r^2*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - 
                     (r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/
                          (4*E^(r^2/4))))/2))/2))/r)*Sin[theta]^2 + 
               7.500000000000001*^-9*r*(-840/(E^(r^2/4)*r^4) + 
                 (105*((16*r)/E^(r^2/4) - (4*r^3)/E^(r^2/4)))/r^5 - 
                 (48*(16/E^(r^2/4) - (16*r^2)/E^(r^2/4) + 8*r^2*
                     (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^4 + 
                 (13*((-40*r)/E^(r^2/4) + (8*r^3)/E^(r^2/4) + 16*r*
                     (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 8*r^2*
                     (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/
                          (4*E^(r^2/4))))/2)))/r^3 - (3*(-32/E^(r^2/4) + 
                    (32*r^2)/E^(r^2/4) + 32*(-1/2*1/E^(r^2/4) + r^2/
                       (4*E^(r^2/4))) - 16*r^2*(-1/2*1/E^(r^2/4) + 
                      r^2/(4*E^(r^2/4))) + 32*r*(r/(2*E^(r^2/4)) - 
                      (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 
                    8*r^2*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - 
                      (r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/
                          (4*E^(r^2/4))))/2))/2)))/r^2 + ((80*r)/E^(r^2/4) - 
                   (16*r^3)/E^(r^2/4) - 32*r*(-1/2*1/E^(r^2/4) + 
                     r^2/(4*E^(r^2/4))) + 64*(r/(2*E^(r^2/4)) - 
                     (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) - 
                   16*r^2*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + 
                        r^2/(4*E^(r^2/4))))/2) + 32*r*(1/(2*E^(r^2/4)) - 
                     r^2/(4*E^(r^2/4)) + (1/(2*E^(r^2/4)) - r^2/
                        (4*E^(r^2/4)))/2 - (r*((3*r)/(4*E^(r^2/4)) - 
                        r^3/(8*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - 
                     (3*r^2)/(8*E^(r^2/4)) - (r*(r/(2*E^(r^2/4)) - 
                        (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2))/2) + 
                   8*r^2*(-1/4*r/E^(r^2/4) + (r*(-1/2*1/E^(r^2/4) + 
                        r^2/(4*E^(r^2/4))))/4 + (3*(-1/2*r/E^(r^2/4) + 
                        (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2))/2 - 
                     (r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - 
                        (r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/
                          (4*E^(r^2/4))))/2))/2))/2))/r)*Sin[theta]^2) - 
             3.0000000000000004*^-8*(24/(E^(r^2/4)*r^3) - 
               (3*((16*r)/E^(r^2/4) - (4*r^3)/E^(r^2/4)))/r^4 + 
               (16/E^(r^2/4) - (16*r^2)/E^(r^2/4) + 8*r^2*(-1/2*1/E^(r^2/4) + 
                   r^2/(4*E^(r^2/4))))/r^3)*(4 - 3.0000000000000004*^-8*r*
                (-120/(E^(r^2/4)*r^4) + (15*((16*r)/E^(r^2/4) - (4*r^3)/
                     E^(r^2/4)))/r^5 - (6*(16/E^(r^2/4) - (16*r^2)/
                     E^(r^2/4) + 8*r^2*(-1/2*1/E^(r^2/4) + r^2/
                       (4*E^(r^2/4)))))/r^4 + ((-40*r)/E^(r^2/4) + 
                   (8*r^3)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + 
                     r^2/(4*E^(r^2/4))) + 8*r^2*(r/(2*E^(r^2/4)) - 
                     (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2))/r^3) + 
               6.000000000000001*^-8*(-48/(E^(r^2/4)*r^3) + 
                 (6*((16*r)/E^(r^2/4) - (4*r^3)/E^(r^2/4)))/r^4 - 
                 (3*(16/E^(r^2/4) - (16*r^2)/E^(r^2/4) + 8*r^2*
                     (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + 
                 ((-40*r)/E^(r^2/4) + (8*r^3)/E^(r^2/4) + 16*r*
                    (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 8*r^2*
                    (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/
                         (4*E^(r^2/4))))/2))/r^2)*Cos[2*theta] + 
               3.0000000000000004*^-8*(168/(E^(r^2/4)*r^3) - 
                 (21*((16*r)/E^(r^2/4) - (4*r^3)/E^(r^2/4)))/r^4 + 
                 (9*(16/E^(r^2/4) - (16*r^2)/E^(r^2/4) + 8*r^2*
                     (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 - 
                 (2*((-40*r)/E^(r^2/4) + (8*r^3)/E^(r^2/4) + 16*r*
                     (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 8*r^2*
                     (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/
                          (4*E^(r^2/4))))/2)))/r^2 + (-32/E^(r^2/4) + 
                   (32*r^2)/E^(r^2/4) + 32*(-1/2*1/E^(r^2/4) + r^2/
                      (4*E^(r^2/4))) - 16*r^2*(-1/2*1/E^(r^2/4) + 
                     r^2/(4*E^(r^2/4))) + 32*r*(r/(2*E^(r^2/4)) - 
                     (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 
                   8*r^2*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - 
                     (r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/
                          (4*E^(r^2/4))))/2))/2))/r)*Sin[theta]^2 + 
               7.500000000000001*^-9*r*(-840/(E^(r^2/4)*r^4) + 
                 (105*((16*r)/E^(r^2/4) - (4*r^3)/E^(r^2/4)))/r^5 - 
                 (48*(16/E^(r^2/4) - (16*r^2)/E^(r^2/4) + 8*r^2*
                     (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^4 + 
                 (13*((-40*r)/E^(r^2/4) + (8*r^3)/E^(r^2/4) + 16*r*
                     (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 8*r^2*
                     (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/
                          (4*E^(r^2/4))))/2)))/r^3 - (3*(-32/E^(r^2/4) + 
                    (32*r^2)/E^(r^2/4) + 32*(-1/2*1/E^(r^2/4) + r^2/
                       (4*E^(r^2/4))) - 16*r^2*(-1/2*1/E^(r^2/4) + 
                      r^2/(4*E^(r^2/4))) + 32*r*(r/(2*E^(r^2/4)) - 
                      (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 
                    8*r^2*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - 
                      (r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/
                          (4*E^(r^2/4))))/2))/2)))/r^2 + ((80*r)/E^(r^2/4) - 
                   (16*r^3)/E^(r^2/4) - 32*r*(-1/2*1/E^(r^2/4) + 
                     r^2/(4*E^(r^2/4))) + 64*(r/(2*E^(r^2/4)) - 
                     (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) - 
                   16*r^2*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + 
                        r^2/(4*E^(r^2/4))))/2) + 32*r*(1/(2*E^(r^2/4)) - 
                     r^2/(4*E^(r^2/4)) + (1/(2*E^(r^2/4)) - r^2/
                        (4*E^(r^2/4)))/2 - (r*((3*r)/(4*E^(r^2/4)) - 
                        r^3/(8*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - 
                     (3*r^2)/(8*E^(r^2/4)) - (r*(r/(2*E^(r^2/4)) - 
                        (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2))/2) + 
                   8*r^2*(-1/4*r/E^(r^2/4) + (r*(-1/2*1/E^(r^2/4) + 
                        r^2/(4*E^(r^2/4))))/4 + (3*(-1/2*r/E^(r^2/4) + 
                        (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2))/2 - 
                     (r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - 
                        (r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/
                          (4*E^(r^2/4))))/2))/2))/2))/r)*Sin[theta]^2) + 
             6.000000000000001*^-8*(-48/(E^(r^2/4)*r^3) + 
               (6*((16*r)/E^(r^2/4) - (4*r^3)/E^(r^2/4)))/r^4 - 
               (3*(16/E^(r^2/4) - (16*r^2)/E^(r^2/4) + 8*r^2*
                   (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + 
               ((-40*r)/E^(r^2/4) + (8*r^3)/E^(r^2/4) + 16*r*
                  (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 8*r^2*
                  (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/
                       (4*E^(r^2/4))))/2))/r^2)*(Cos[2*theta] - 
               7.500000000000001*^-9*(168/(E^(r^2/4)*r^3) - 
                 (21*((16*r)/E^(r^2/4) - (4*r^3)/E^(r^2/4)))/r^4 + 
                 (9*(16/E^(r^2/4) - (16*r^2)/E^(r^2/4) + 8*r^2*
                     (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 - 
                 (2*((-40*r)/E^(r^2/4) + (8*r^3)/E^(r^2/4) + 16*r*
                     (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 8*r^2*
                     (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/
                          (4*E^(r^2/4))))/2)))/r^2 + (-32/E^(r^2/4) + 
                   (32*r^2)/E^(r^2/4) + 32*(-1/2*1/E^(r^2/4) + r^2/
                      (4*E^(r^2/4))) - 16*r^2*(-1/2*1/E^(r^2/4) + 
                     r^2/(4*E^(r^2/4))) + 32*r*(r/(2*E^(r^2/4)) - 
                     (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 
                   8*r^2*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - 
                     (r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/
                          (4*E^(r^2/4))))/2))/2))/r)*Sin[theta]^4)))/
           ((-2 + 9.*^-16*(24/(E^(r^2/4)*r^3) - (3*((16*r)/E^(r^2/4) - 
                   (4*r^3)/E^(r^2/4)))/r^4 + (16/E^(r^2/4) - (16*r^2)/
                   E^(r^2/4) + 8*r^2*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/
                 r^3)^2*(1 + 3*Cos[2*theta]) - 1.5000000000000002*^-8*
              (168/(E^(r^2/4)*r^3) - (21*((16*r)/E^(r^2/4) - (4*r^3)/
                   E^(r^2/4)))/r^4 + (9*(16/E^(r^2/4) - (16*r^2)/E^(r^2/4) + 
                  8*r^2*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 - 
               (2*((-40*r)/E^(r^2/4) + (8*r^3)/E^(r^2/4) + 16*r*
                   (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 8*r^2*
                   (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/
                        (4*E^(r^2/4))))/2)))/r^2 + (-32/E^(r^2/4) + 
                 (32*r^2)/E^(r^2/4) + 32*(-1/2*1/E^(r^2/4) + 
                   r^2/(4*E^(r^2/4))) - 16*r^2*(-1/2*1/E^(r^2/4) + 
                   r^2/(4*E^(r^2/4))) + 32*r*(r/(2*E^(r^2/4)) - 
                   (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 
                 8*r^2*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - 
                   (r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/
                          (4*E^(r^2/4))))/2))/2))/r)*Sin[theta]^2 - 
             6.000000000000001*^-8*(24/(E^(r^2/4)*r^3) - 
               (3*((16*r)/E^(r^2/4) - (4*r^3)/E^(r^2/4)))/r^4 + 
               (16/E^(r^2/4) - (16*r^2)/E^(r^2/4) + 8*r^2*(-1/2*1/E^(r^2/4) + 
                   r^2/(4*E^(r^2/4))))/r^3)*(1 - 3*Sin[theta]^2 + 
               3.7500000000000005*^-9*(168/(E^(r^2/4)*r^3) - 
                 (21*((16*r)/E^(r^2/4) - (4*r^3)/E^(r^2/4)))/r^4 + 
                 (9*(16/E^(r^2/4) - (16*r^2)/E^(r^2/4) + 8*r^2*
                     (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 - 
                 (2*((-40*r)/E^(r^2/4) + (8*r^3)/E^(r^2/4) + 16*r*
                     (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 8*r^2*
                     (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/
                          (4*E^(r^2/4))))/2)))/r^2 + (-32/E^(r^2/4) + 
                   (32*r^2)/E^(r^2/4) + 32*(-1/2*1/E^(r^2/4) + r^2/
                      (4*E^(r^2/4))) - 16*r^2*(-1/2*1/E^(r^2/4) + 
                     r^2/(4*E^(r^2/4))) + 32*r*(r/(2*E^(r^2/4)) - 
                     (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 
                   8*r^2*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - 
                     (r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/
                          (4*E^(r^2/4))))/2))/2))/r)*(1 + 3*Cos[2*theta])*
                Sin[theta]^2) + 4.5*^-16*(-48/(E^(r^2/4)*r^3) + 
                (6*((16*r)/E^(r^2/4) - (4*r^3)/E^(r^2/4)))/r^4 - 
                (3*(16/E^(r^2/4) - (16*r^2)/E^(r^2/4) + 8*r^2*
                    (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + 
                ((-40*r)/E^(r^2/4) + (8*r^3)/E^(r^2/4) + 16*r*
                   (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 8*r^2*
                   (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/
                        (4*E^(r^2/4))))/2))/r^2)^2*Sin[2*theta]^2)*
            (-2 + 9.*^-16*(24/(E^(r^2/4)*r^3) - (3*((16*r)/E^(r^2/4) - 
                   (4*r^3)/E^(r^2/4)))/r^4 + (16/E^(r^2/4) - (16*r^2)/
                   E^(r^2/4) + 8*r^2*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/
                 r^3)^2*(1 + 3*Cos[2*theta]) - 1.5000000000000002*^-8*
              (168/(E^(r^2/4)*r^3) - (21*((16*r)/E^(r^2/4) - (4*r^3)/
                   E^(r^2/4)))/r^4 + (9*(16/E^(r^2/4) - (16*r^2)/E^(r^2/4) + 
                  8*r^2*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 - 
               (2*((-40*r)/E^(r^2/4) + (8*r^3)/E^(r^2/4) + 16*r*
                   (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 8*r^2*
                   (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/
                        (4*E^(r^2/4))))/2)))/r^2 + (-32/E^(r^2/4) + 
                 (32*r^2)/E^(r^2/4) + 32*(-1/2*1/E^(r^2/4) + 
                   r^2/(4*E^(r^2/4))) - 16*r^2*(-1/2*1/E^(r^2/4) + 
                   r^2/(4*E^(r^2/4))) + 32*r*(r/(2*E^(r^2/4)) - 
                   (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 
                 8*r^2*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - 
                   (r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/
                          (4*E^(r^2/4))))/2))/2))/r)*Sin[theta]^2 - 
             3.0000000000000004*^-8*(24/(E^(r^2/4)*r^3) - 
               (3*((16*r)/E^(r^2/4) - (4*r^3)/E^(r^2/4)))/r^4 + 
               (16/E^(r^2/4) - (16*r^2)/E^(r^2/4) + 8*r^2*(-1/2*1/E^(r^2/4) + 
                   r^2/(4*E^(r^2/4))))/r^3)*(-1 + 3*Cos[2*theta] + 
               7.500000000000001*^-9*(168/(E^(r^2/4)*r^3) - 
                 (21*((16*r)/E^(r^2/4) - (4*r^3)/E^(r^2/4)))/r^4 + 
                 (9*(16/E^(r^2/4) - (16*r^2)/E^(r^2/4) + 8*r^2*
                     (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 - 
                 (2*((-40*r)/E^(r^2/4) + (8*r^3)/E^(r^2/4) + 16*r*
                     (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 8*r^2*
                     (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/
                          (4*E^(r^2/4))))/2)))/r^2 + (-32/E^(r^2/4) + 
                   (32*r^2)/E^(r^2/4) + 32*(-1/2*1/E^(r^2/4) + r^2/
                      (4*E^(r^2/4))) - 16*r^2*(-1/2*1/E^(r^2/4) + 
                     r^2/(4*E^(r^2/4))) + 32*r*(r/(2*E^(r^2/4)) - 
                     (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 
                   8*r^2*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - 
                     (r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/
                          (4*E^(r^2/4))))/2))/2))/r)*(1 + 3*Cos[2*theta])*
                Sin[theta]^2) + 4.5*^-16*(-48/(E^(r^2/4)*r^3) + 
                (6*((16*r)/E^(r^2/4) - (4*r^3)/E^(r^2/4)))/r^4 - 
                (3*(16/E^(r^2/4) - (16*r^2)/E^(r^2/4) + 8*r^2*
                    (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + 
                ((-40*r)/E^(r^2/4) + (8*r^3)/E^(r^2/4) + 16*r*
                   (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 8*r^2*
                   (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/
                        (4*E^(r^2/4))))/2))/r^2)^2*Sin[2*theta]^2)) + 
          (7.500000000000001*^-9*Sin[2*theta]*
            (-8.*^-8*(9.*^-8*(24/(E^(r^2/4)*r^3) - (3*((16*r)/E^(r^2/4) - 
                     (4*r^3)/E^(r^2/4)))/r^4 + (16/E^(r^2/4) - (16*r^2)/
                     E^(r^2/4) + 8*r^2*(-1/2*1/E^(r^2/4) + r^2/
                       (4*E^(r^2/4))))/r^3)^2 + (168/(E^(r^2/4)*r^3) - 
                 (21*((16*r)/E^(r^2/4) - (4*r^3)/E^(r^2/4)))/r^4 + 
                 (9*(16/E^(r^2/4) - (16*r^2)/E^(r^2/4) + 8*r^2*
                     (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 - 
                 (2*((-40*r)/E^(r^2/4) + (8*r^3)/E^(r^2/4) + 16*r*
                     (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 8*r^2*
                     (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/
                          (4*E^(r^2/4))))/2)))/r^2 + (-32/E^(r^2/4) + 
                   (32*r^2)/E^(r^2/4) + 32*(-1/2*1/E^(r^2/4) + r^2/
                      (4*E^(r^2/4))) - 16*r^2*(-1/2*1/E^(r^2/4) + 
                     r^2/(4*E^(r^2/4))) + 32*r*(r/(2*E^(r^2/4)) - 
                     (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 
                   8*r^2*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - 
                     (r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/
                          (4*E^(r^2/4))))/2))/2))/r)/4 - 
               3.0000000000000004*^-8*(-48/(E^(r^2/4)*r^3) + 
                  (6*((16*r)/E^(r^2/4) - (4*r^3)/E^(r^2/4)))/r^4 - 
                  (3*(16/E^(r^2/4) - (16*r^2)/E^(r^2/4) + 8*r^2*
                      (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + 
                  ((-40*r)/E^(r^2/4) + (8*r^3)/E^(r^2/4) + 16*r*
                     (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 8*r^2*
                     (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/
                          (4*E^(r^2/4))))/2))/r^2)^2*Cos[2*theta] + 3*
                (24/(E^(r^2/4)*r^3) - (3*((16*r)/E^(r^2/4) - (4*r^3)/
                     E^(r^2/4)))/r^4 + (16/E^(r^2/4) - (16*r^2)/E^(r^2/4) + 
                   8*r^2*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/r^3)*
                (-1 + 2.5*^-9*(168/(E^(r^2/4)*r^3) - (21*((16*r)/E^(r^2/4) - 
                      (4*r^3)/E^(r^2/4)))/r^4 + (9*(16/E^(r^2/4) - (16*r^2)/
                       E^(r^2/4) + 8*r^2*(-1/2*1/E^(r^2/4) + r^2/
                         (4*E^(r^2/4)))))/r^3 - (2*((-40*r)/E^(r^2/4) + 
                      (8*r^3)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + 
                        r^2/(4*E^(r^2/4))) + 8*r^2*(r/(2*E^(r^2/4)) - 
                        (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2)))/r^2 + 
                   (-32/E^(r^2/4) + (32*r^2)/E^(r^2/4) + 32*(-1/2*
                        1/E^(r^2/4) + r^2/(4*E^(r^2/4))) - 16*r^2*
                      (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*r*
                      (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/
                          (4*E^(r^2/4))))/2) + 8*r^2*(3/(4*E^(r^2/4)) - 
                       (3*r^2)/(8*E^(r^2/4)) - (r*(r/(2*E^(r^2/4)) - 
                          (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2))/2))/
                    r)*(-1 + 3*Cos[2*theta])))*(-9.*^-8*
                (-48/(E^(r^2/4)*r^3) + (6*((16*r)/E^(r^2/4) - (4*r^3)/
                     E^(r^2/4)))/r^4 - (3*(16/E^(r^2/4) - (16*r^2)/
                     E^(r^2/4) + 8*r^2*(-1/2*1/E^(r^2/4) + r^2/
                       (4*E^(r^2/4)))))/r^3 + ((-40*r)/E^(r^2/4) + 
                   (8*r^3)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + 
                     r^2/(4*E^(r^2/4))) + 8*r^2*(r/(2*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) - (4*r^3)/E^(r^2/4)))/r^5 + 
                 (6*(16/E^(r^2/4) - (16*r^2)/E^(r^2/4) + 8*r^2*
                     (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^4 - 
                 (3*((-40*r)/E^(r^2/4) + (8*r^3)/E^(r^2/4) + 16*r*
                     (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 8*r^2*
                     (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/
                          (4*E^(r^2/4))))/2)))/r^3 + (-32/E^(r^2/4) + 
                   (32*r^2)/E^(r^2/4) + 32*(-1/2*1/E^(r^2/4) + r^2/
                      (4*E^(r^2/4))) - 16*r^2*(-1/2*1/E^(r^2/4) + 
                     r^2/(4*E^(r^2/4))) + 32*r*(r/(2*E^(r^2/4)) - 
                     (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 
                   8*r^2*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - 
                     (r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/
                          (4*E^(r^2/4))))/2))/2))/r^2)*Cos[theta]^2*
                Sin[theta]^2 - (3*((3*((16*r)/E^(r^2/4) - (4*r^3)/E^(r^2/4)))/
                   r^5 - (3*(16/E^(r^2/4) - (16*r^2)/E^(r^2/4) + 8*r^2*
                      (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^4 + 
                  ((-40*r)/E^(r^2/4) + (8*r^3)/E^(r^2/4) + 16*r*
                     (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 8*r^2*
                     (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/
                          (4*E^(r^2/4))))/2))/r^3)*(1 + 3*Cos[2*theta])*
                 (-1 + 3.0000000000000004*^-8*(24/(E^(r^2/4)*r^3) - 
                    (3*((16*r)/E^(r^2/4) - (4*r^3)/E^(r^2/4)))/r^4 + 
                    (16/E^(r^2/4) - (16*r^2)/E^(r^2/4) + 8*r^2*
                       (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/r^3) - 
                  7.500000000000001*^-9*(168/(E^(r^2/4)*r^3) - 
                    (21*((16*r)/E^(r^2/4) - (4*r^3)/E^(r^2/4)))/r^4 + 
                    (9*(16/E^(r^2/4) - (16*r^2)/E^(r^2/4) + 8*r^2*
                        (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 - 
                    (2*((-40*r)/E^(r^2/4) + (8*r^3)/E^(r^2/4) + 16*r*
                        (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 8*r^2*
                        (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/
                          (4*E^(r^2/4))))/2)))/r^2 + (-32/E^(r^2/4) + 
                      (32*r^2)/E^(r^2/4) + 32*(-1/2*1/E^(r^2/4) + r^2/
                         (4*E^(r^2/4))) - 16*r^2*(-1/2*1/E^(r^2/4) + 
                        r^2/(4*E^(r^2/4))) + 32*r*(r/(2*E^(r^2/4)) - 
                        (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 
                      8*r^2*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - 
                        (r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/
                          (4*E^(r^2/4))))/2))/2))/r)*Sin[theta]^2))/2) + 
             (3*((3*((16*r)/E^(r^2/4) - (4*r^3)/E^(r^2/4)))/r^5 - 
                 (3*(16/E^(r^2/4) - (16*r^2)/E^(r^2/4) + 8*r^2*
                     (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^4 + 
                 ((-40*r)/E^(r^2/4) + (8*r^3)/E^(r^2/4) + 16*r*
                    (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 8*r^2*
                    (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/
                         (4*E^(r^2/4))))/2))/r^3)*(1 - 3.0000000000000004*^-8*
                  (24/(E^(r^2/4)*r^3) - (3*((16*r)/E^(r^2/4) - (4*r^3)/
                       E^(r^2/4)))/r^4 + (16/E^(r^2/4) - (16*r^2)/E^(r^2/4) + 
                     8*r^2*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/r^3) + 
                 ((168/(E^(r^2/4)*r^3) - (21*((16*r)/E^(r^2/4) - (4*r^3)/
                        E^(r^2/4)))/r^4 + (9*(16/E^(r^2/4) - (16*r^2)/
                        E^(r^2/4) + 8*r^2*(-1/2*1/E^(r^2/4) + r^2/
                          (4*E^(r^2/4)))))/r^3 - (2*((-40*r)/E^(r^2/4) + 
                       (8*r^3)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + 
                         r^2/(4*E^(r^2/4))) + 8*r^2*(r/(2*E^(r^2/4)) - 
                         (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2)))/
                     r^2 + (-32/E^(r^2/4) + (32*r^2)/E^(r^2/4) + 
                      32*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) - 16*r^2*
                       (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*r*
                       (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/
                          (4*E^(r^2/4))))/2) + 8*r^2*(3/(4*E^(r^2/4)) - 
                        (3*r^2)/(8*E^(r^2/4)) - (r*(r/(2*E^(r^2/4)) - 
                          (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2))/2))/
                     r)*(1.*^-8 - 3.0000000000000004*^-8*Cos[2*theta]))/4) + 
               3.0000000000000004*^-8*(-48/(E^(r^2/4)*r^3) + 
                 (6*((16*r)/E^(r^2/4) - (4*r^3)/E^(r^2/4)))/r^4 - 
                 (3*(16/E^(r^2/4) - (16*r^2)/E^(r^2/4) + 8*r^2*
                     (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + 
                 ((-40*r)/E^(r^2/4) + (8*r^3)/E^(r^2/4) + 16*r*
                    (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 8*r^2*
                    (r/(2*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) - 
                    (4*r^3)/E^(r^2/4)))/r^5 + (6*(16/E^(r^2/4) - (16*r^2)/
                     E^(r^2/4) + 8*r^2*(-1/2*1/E^(r^2/4) + r^2/
                       (4*E^(r^2/4)))))/r^4 - (3*((-40*r)/E^(r^2/4) + 
                    (8*r^3)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + 
                      r^2/(4*E^(r^2/4))) + 8*r^2*(r/(2*E^(r^2/4)) - 
                      (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2)))/r^3 + 
                 (-32/E^(r^2/4) + (32*r^2)/E^(r^2/4) + 32*(-1/2*1/E^(r^2/4) + 
                     r^2/(4*E^(r^2/4))) - 16*r^2*(-1/2*1/E^(r^2/4) + 
                     r^2/(4*E^(r^2/4))) + 32*r*(r/(2*E^(r^2/4)) - 
                     (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 
                   8*r^2*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - 
                     (r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/
                          (4*E^(r^2/4))))/2))/2))/r^2)*Cos[2*theta])*
              (-8 + 3.6*^-15*(24/(E^(r^2/4)*r^3) - (3*((16*r)/E^(r^2/4) - 
                     (4*r^3)/E^(r^2/4)))/r^4 + (16/E^(r^2/4) - (16*r^2)/
                     E^(r^2/4) + 8*r^2*(-1/2*1/E^(r^2/4) + r^2/
                       (4*E^(r^2/4))))/r^3)^2*(1 + 3*Cos[2*theta]) - 
               6.000000000000001*^-8*(168/(E^(r^2/4)*r^3) - 
                 (21*((16*r)/E^(r^2/4) - (4*r^3)/E^(r^2/4)))/r^4 + 
                 (9*(16/E^(r^2/4) - (16*r^2)/E^(r^2/4) + 8*r^2*
                     (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 - 
                 (2*((-40*r)/E^(r^2/4) + (8*r^3)/E^(r^2/4) + 16*r*
                     (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 8*r^2*
                     (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/
                          (4*E^(r^2/4))))/2)))/r^2 + (-32/E^(r^2/4) + 
                   (32*r^2)/E^(r^2/4) + 32*(-1/2*1/E^(r^2/4) + r^2/
                      (4*E^(r^2/4))) - 16*r^2*(-1/2*1/E^(r^2/4) + 
                     r^2/(4*E^(r^2/4))) + 32*r*(r/(2*E^(r^2/4)) - 
                     (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 
                   8*r^2*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - 
                     (r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/
                          (4*E^(r^2/4))))/2))/2))/r)*Sin[theta]^2 + 
               3.0000000000000004*^-8*(24/(E^(r^2/4)*r^3) - 
                 (3*((16*r)/E^(r^2/4) - (4*r^3)/E^(r^2/4)))/r^4 + 
                 (16/E^(r^2/4) - (16*r^2)/E^(r^2/4) + 8*r^2*
                    (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/r^3)*
                (4 - 12*Cos[2*theta] - 3.0000000000000004*^-8*
                  (168/(E^(r^2/4)*r^3) - (21*((16*r)/E^(r^2/4) - (4*r^3)/
                       E^(r^2/4)))/r^4 + (9*(16/E^(r^2/4) - (16*r^2)/
                       E^(r^2/4) + 8*r^2*(-1/2*1/E^(r^2/4) + r^2/
                         (4*E^(r^2/4)))))/r^3 - (2*((-40*r)/E^(r^2/4) + 
                      (8*r^3)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + 
                        r^2/(4*E^(r^2/4))) + 8*r^2*(r/(2*E^(r^2/4)) - 
                        (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2)))/r^2 + 
                   (-32/E^(r^2/4) + (32*r^2)/E^(r^2/4) + 32*(-1/2*
                        1/E^(r^2/4) + r^2/(4*E^(r^2/4))) - 16*r^2*
                      (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*r*
                      (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/
                          (4*E^(r^2/4))))/2) + 8*r^2*(3/(4*E^(r^2/4)) - 
                       (3*r^2)/(8*E^(r^2/4)) - (r*(r/(2*E^(r^2/4)) - 
                          (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2))/2))/
                    r)*(1 + 3*Cos[2*theta])*Sin[theta]^2) + 1.8*^-15*
                (-48/(E^(r^2/4)*r^3) + (6*((16*r)/E^(r^2/4) - (4*r^3)/
                      E^(r^2/4)))/r^4 - (3*(16/E^(r^2/4) - (16*r^2)/
                      E^(r^2/4) + 8*r^2*(-1/2*1/E^(r^2/4) + r^2/
                        (4*E^(r^2/4)))))/r^3 + ((-40*r)/E^(r^2/4) + 
                    (8*r^3)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + 
                      r^2/(4*E^(r^2/4))) + 8*r^2*(r/(2*E^(r^2/4)) - 
                      (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2))/r^2)^2*
                Sin[2*theta]^2)))/(2 - 9.*^-16*(24/(E^(r^2/4)*r^3) - 
                (3*((16*r)/E^(r^2/4) - (4*r^3)/E^(r^2/4)))/r^4 + 
                (16/E^(r^2/4) - (16*r^2)/E^(r^2/4) + 8*r^2*
                   (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/r^3)^2*
              (1 + 3*Cos[2*theta]) + 1.5000000000000002*^-8*
              (168/(E^(r^2/4)*r^3) - (21*((16*r)/E^(r^2/4) - (4*r^3)/
                   E^(r^2/4)))/r^4 + (9*(16/E^(r^2/4) - (16*r^2)/E^(r^2/4) + 
                  8*r^2*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 - 
               (2*((-40*r)/E^(r^2/4) + (8*r^3)/E^(r^2/4) + 16*r*
                   (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 8*r^2*
                   (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/
                        (4*E^(r^2/4))))/2)))/r^2 + (-32/E^(r^2/4) + 
                 (32*r^2)/E^(r^2/4) + 32*(-1/2*1/E^(r^2/4) + 
                   r^2/(4*E^(r^2/4))) - 16*r^2*(-1/2*1/E^(r^2/4) + 
                   r^2/(4*E^(r^2/4))) + 32*r*(r/(2*E^(r^2/4)) - 
                   (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 
                 8*r^2*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - 
                   (r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/
                          (4*E^(r^2/4))))/2))/2))/r)*Sin[theta]^2 + 
             3.0000000000000004*^-8*(24/(E^(r^2/4)*r^3) - 
               (3*((16*r)/E^(r^2/4) - (4*r^3)/E^(r^2/4)))/r^4 + 
               (16/E^(r^2/4) - (16*r^2)/E^(r^2/4) + 8*r^2*(-1/2*1/E^(r^2/4) + 
                   r^2/(4*E^(r^2/4))))/r^3)*(-1 + 3*Cos[2*theta] + 
               7.500000000000001*^-9*(168/(E^(r^2/4)*r^3) - 
                 (21*((16*r)/E^(r^2/4) - (4*r^3)/E^(r^2/4)))/r^4 + 
                 (9*(16/E^(r^2/4) - (16*r^2)/E^(r^2/4) + 8*r^2*
                     (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 - 
                 (2*((-40*r)/E^(r^2/4) + (8*r^3)/E^(r^2/4) + 16*r*
                     (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 8*r^2*
                     (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/
                          (4*E^(r^2/4))))/2)))/r^2 + (-32/E^(r^2/4) + 
                   (32*r^2)/E^(r^2/4) + 32*(-1/2*1/E^(r^2/4) + r^2/
                      (4*E^(r^2/4))) - 16*r^2*(-1/2*1/E^(r^2/4) + 
                     r^2/(4*E^(r^2/4))) + 32*r*(r/(2*E^(r^2/4)) - 
                     (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 
                   8*r^2*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - 
                     (r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/
                          (4*E^(r^2/4))))/2))/2))/r)*(1 + 3*Cos[2*theta])*
                Sin[theta]^2) - 4.5*^-16*(-48/(E^(r^2/4)*r^3) + 
                (6*((16*r)/E^(r^2/4) - (4*r^3)/E^(r^2/4)))/r^4 - 
                (3*(16/E^(r^2/4) - (16*r^2)/E^(r^2/4) + 8*r^2*
                    (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + 
                ((-40*r)/E^(r^2/4) + (8*r^3)/E^(r^2/4) + 16*r*
                   (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 8*r^2*
                   (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/
                        (4*E^(r^2/4))))/2))/r^2)^2*Sin[2*theta]^2)^2 - 
          (3.0000000000000004*^-8*Cos[theta]*Sin[theta]*
            (((4.5000000000000006*^-8*(24/(E^(r^2/4)*r^3) - 
                  (3*((16*r)/E^(r^2/4) - (4*r^3)/E^(r^2/4)))/r^4 + 
                  (16/E^(r^2/4) - (16*r^2)/E^(r^2/4) + 8*r^2*
                     (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/r^3)*
                 ((21*((16*r)/E^(r^2/4) - (4*r^3)/E^(r^2/4)))/r^5 - 
                  (21*(16/E^(r^2/4) - (16*r^2)/E^(r^2/4) + 8*r^2*
                      (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^4 + 
                  (9*((-40*r)/E^(r^2/4) + (8*r^3)/E^(r^2/4) + 16*r*
                      (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 8*r^2*
                      (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/
                          (4*E^(r^2/4))))/2)))/r^3 - (2*(-32/E^(r^2/4) + 
                     (32*r^2)/E^(r^2/4) + 32*(-1/2*1/E^(r^2/4) + r^2/
                        (4*E^(r^2/4))) - 16*r^2*(-1/2*1/E^(r^2/4) + 
                       r^2/(4*E^(r^2/4))) + 32*r*(r/(2*E^(r^2/4)) - 
                       (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 
                     8*r^2*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - 
                       (r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/
                          (4*E^(r^2/4))))/2))/2)))/r^2 + ((80*r)/E^(r^2/4) - 
                    (16*r^3)/E^(r^2/4) - 32*r*(-1/2*1/E^(r^2/4) + 
                      r^2/(4*E^(r^2/4))) + 64*(r/(2*E^(r^2/4)) - 
                      (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) - 
                    16*r^2*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + 
                         r^2/(4*E^(r^2/4))))/2) + 32*r*(1/(2*E^(r^2/4)) - 
                      r^2/(4*E^(r^2/4)) + (1/(2*E^(r^2/4)) - r^2/
                         (4*E^(r^2/4)))/2 - (r*((3*r)/(4*E^(r^2/4)) - 
                         r^3/(8*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - 
                      (3*r^2)/(8*E^(r^2/4)) - (r*(r/(2*E^(r^2/4)) - 
                         (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2))/2) + 
                    8*r^2*(-1/4*r/E^(r^2/4) + (r*(-1/2*1/E^(r^2/4) + 
                         r^2/(4*E^(r^2/4))))/4 + (3*(-1/2*r/E^(r^2/4) + 
                         (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2))/2 - 
                      (r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - 
                         (r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/
                          (4*E^(r^2/4))))/2))/2))/2))/r)*Sin[theta]^2 + 
                3*((3*((16*r)/E^(r^2/4) - (4*r^3)/E^(r^2/4)))/r^5 - 
                  (3*(16/E^(r^2/4) - (16*r^2)/E^(r^2/4) + 8*r^2*
                      (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^4 + 
                  ((-40*r)/E^(r^2/4) + (8*r^3)/E^(r^2/4) + 16*r*
                     (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 8*r^2*
                     (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/
                          (4*E^(r^2/4))))/2))/r^3)*(2 - 
                  1.2000000000000002*^-7*(24/(E^(r^2/4)*r^3) - 
                    (3*((16*r)/E^(r^2/4) - (4*r^3)/E^(r^2/4)))/r^4 + 
                    (16/E^(r^2/4) - (16*r^2)/E^(r^2/4) + 8*r^2*
                       (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/r^3) + 
                  2.*^-8*(-48/(E^(r^2/4)*r^3) + (6*((16*r)/E^(r^2/4) - 
                       (4*r^3)/E^(r^2/4)))/r^4 - (3*(16/E^(r^2/4) - (16*r^2)/
                        E^(r^2/4) + 8*r^2*(-1/2*1/E^(r^2/4) + r^2/
                          (4*E^(r^2/4)))))/r^3 + ((-40*r)/E^(r^2/4) + 
                      (8*r^3)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + 
                        r^2/(4*E^(r^2/4))) + 8*r^2*(r/(2*E^(r^2/4)) - 
                        (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2))/r^2) + 
                  1.5000000000000002*^-8*(168/(E^(r^2/4)*r^3) - 
                    (21*((16*r)/E^(r^2/4) - (4*r^3)/E^(r^2/4)))/r^4 + 
                    (9*(16/E^(r^2/4) - (16*r^2)/E^(r^2/4) + 8*r^2*
                        (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 - 
                    (2*((-40*r)/E^(r^2/4) + (8*r^3)/E^(r^2/4) + 16*r*
                        (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 8*r^2*
                        (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/
                          (4*E^(r^2/4))))/2)))/r^2 + (-32/E^(r^2/4) + 
                      (32*r^2)/E^(r^2/4) + 32*(-1/2*1/E^(r^2/4) + r^2/
                         (4*E^(r^2/4))) - 16*r^2*(-1/2*1/E^(r^2/4) + 
                        r^2/(4*E^(r^2/4))) + 32*r*(r/(2*E^(r^2/4)) - 
                        (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 
                      8*r^2*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - 
                        (r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/
                          (4*E^(r^2/4))))/2))/2))/r)*Sin[theta]^2) + 
                ((-6*((16*r)/E^(r^2/4) - (4*r^3)/E^(r^2/4)))/r^5 + 
                  (6*(16/E^(r^2/4) - (16*r^2)/E^(r^2/4) + 8*r^2*
                      (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^4 - 
                  (3*((-40*r)/E^(r^2/4) + (8*r^3)/E^(r^2/4) + 16*r*
                      (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 8*r^2*
                      (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/
                          (4*E^(r^2/4))))/2)))/r^3 + (-32/E^(r^2/4) + 
                    (32*r^2)/E^(r^2/4) + 32*(-1/2*1/E^(r^2/4) + r^2/
                       (4*E^(r^2/4))) - 16*r^2*(-1/2*1/E^(r^2/4) + 
                      r^2/(4*E^(r^2/4))) + 32*r*(r/(2*E^(r^2/4)) - 
                      (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 
                    8*r^2*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - 
                      (r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/
                          (4*E^(r^2/4))))/2))/2))/r^2)*(-2 + 
                  6.000000000000001*^-8*(24/(E^(r^2/4)*r^3) - 
                    (3*((16*r)/E^(r^2/4) - (4*r^3)/E^(r^2/4)))/r^4 + 
                    (16/E^(r^2/4) - (16*r^2)/E^(r^2/4) + 8*r^2*
                       (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/r^3) + 
                  3.0000000000000004*^-8*r*(-120/(E^(r^2/4)*r^4) + 
                    (15*((16*r)/E^(r^2/4) - (4*r^3)/E^(r^2/4)))/r^5 - 
                    (6*(16/E^(r^2/4) - (16*r^2)/E^(r^2/4) + 8*r^2*
                        (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^4 + 
                    ((-40*r)/E^(r^2/4) + (8*r^3)/E^(r^2/4) + 16*r*
                       (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 8*r^2*
                       (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/
                          (4*E^(r^2/4))))/2))/r^3) - 1.5000000000000002*^-8*
                   (168/(E^(r^2/4)*r^3) - (21*((16*r)/E^(r^2/4) - (4*r^3)/
                        E^(r^2/4)))/r^4 + (9*(16/E^(r^2/4) - (16*r^2)/
                        E^(r^2/4) + 8*r^2*(-1/2*1/E^(r^2/4) + r^2/
                          (4*E^(r^2/4)))))/r^3 - (2*((-40*r)/E^(r^2/4) + 
                       (8*r^3)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + 
                         r^2/(4*E^(r^2/4))) + 8*r^2*(r/(2*E^(r^2/4)) - 
                         (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2)))/
                     r^2 + (-32/E^(r^2/4) + (32*r^2)/E^(r^2/4) + 
                      32*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) - 16*r^2*
                       (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*r*
                       (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/
                          (4*E^(r^2/4))))/2) + 8*r^2*(3/(4*E^(r^2/4)) - 
                        (3*r^2)/(8*E^(r^2/4)) - (r*(r/(2*E^(r^2/4)) - 
                          (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2))/2))/
                     r)*Sin[theta]^2 - 7.500000000000001*^-9*r*
                   (-840/(E^(r^2/4)*r^4) + (105*((16*r)/E^(r^2/4) - (4*r^3)/
                        E^(r^2/4)))/r^5 - (48*(16/E^(r^2/4) - (16*r^2)/
                        E^(r^2/4) + 8*r^2*(-1/2*1/E^(r^2/4) + r^2/
                          (4*E^(r^2/4)))))/r^4 + (13*((-40*r)/E^(r^2/4) + 
                       (8*r^3)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + 
                         r^2/(4*E^(r^2/4))) + 8*r^2*(r/(2*E^(r^2/4)) - 
                         (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2)))/
                     r^3 - (3*(-32/E^(r^2/4) + (32*r^2)/E^(r^2/4) + 
                       32*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) - 16*r^2*
                        (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*r*
                        (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/
                          (4*E^(r^2/4))))/2) + 8*r^2*(3/(4*E^(r^2/4)) - 
                         (3*r^2)/(8*E^(r^2/4)) - (r*(r/(2*E^(r^2/4)) - 
                          (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2))/2)))/
                     r^2 + ((80*r)/E^(r^2/4) - (16*r^3)/E^(r^2/4) - 
                      32*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 
                      64*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/
                          (4*E^(r^2/4))))/2) - 16*r^2*(r/(2*E^(r^2/4)) - 
                        (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 
                      32*r*(1/(2*E^(r^2/4)) - r^2/(4*E^(r^2/4)) + 
                        (1/(2*E^(r^2/4)) - r^2/(4*E^(r^2/4)))/2 - 
                        (r*((3*r)/(4*E^(r^2/4)) - r^3/(8*E^(r^2/4))))/2) + 
                      16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - 
                        (r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/
                          (4*E^(r^2/4))))/2))/2) + 8*r^2*(-1/4*r/E^(r^2/4) + 
                        (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/4 + 
                        (3*(-1/2*r/E^(r^2/4) + (r*(-1/2*1/E^(r^2/4) + 
                          r^2/(4*E^(r^2/4))))/2))/2 - (r*(3/(4*E^(r^2/4)) - 
                          (3*r^2)/(8*E^(r^2/4)) - (r*(r/(2*E^(r^2/4)) - 
                          (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2))/2))/
                         2))/r)*Sin[theta]^2) + 1.*^-8*(-48/(E^(r^2/4)*r^3) + 
                  (6*((16*r)/E^(r^2/4) - (4*r^3)/E^(r^2/4)))/r^4 - 
                  (3*(16/E^(r^2/4) - (16*r^2)/E^(r^2/4) + 8*r^2*
                      (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + 
                  ((-40*r)/E^(r^2/4) + (8*r^3)/E^(r^2/4) + 16*r*
                     (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 8*r^2*
                     (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/
                          (4*E^(r^2/4))))/2))/r^2)*
                 ((-3*((21*((16*r)/E^(r^2/4) - (4*r^3)/E^(r^2/4)))/r^5 - 
                     (21*(16/E^(r^2/4) - (16*r^2)/E^(r^2/4) + 8*r^2*
                         (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^4 + 
                     (9*((-40*r)/E^(r^2/4) + (8*r^3)/E^(r^2/4) + 16*r*
                         (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 8*r^2*
                         (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/
                          (4*E^(r^2/4))))/2)))/r^3 - (2*(-32/E^(r^2/4) + 
                        (32*r^2)/E^(r^2/4) + 32*(-1/2*1/E^(r^2/4) + 
                          r^2/(4*E^(r^2/4))) - 16*r^2*(-1/2*1/E^(r^2/4) + 
                          r^2/(4*E^(r^2/4))) + 32*r*(r/(2*E^(r^2/4)) - 
                          (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 
                        8*r^2*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - 
                          (r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + 
                          r^2/(4*E^(r^2/4))))/2))/2)))/r^2 + 
                     ((80*r)/E^(r^2/4) - (16*r^3)/E^(r^2/4) - 32*r*
                        (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 
                       64*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/
                          (4*E^(r^2/4))))/2) - 16*r^2*(r/(2*E^(r^2/4)) - 
                         (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 
                       32*r*(1/(2*E^(r^2/4)) - r^2/(4*E^(r^2/4)) + 
                         (1/(2*E^(r^2/4)) - r^2/(4*E^(r^2/4)))/2 - 
                         (r*((3*r)/(4*E^(r^2/4)) - r^3/(8*E^(r^2/4))))/2) + 
                       16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - 
                         (r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/
                          (4*E^(r^2/4))))/2))/2) + 8*r^2*(-1/4*r/E^(r^2/4) + 
                         (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/4 + 
                         (3*(-1/2*r/E^(r^2/4) + (r*(-1/2*1/E^(r^2/4) + 
                          r^2/(4*E^(r^2/4))))/2))/2 - (r*(3/(4*E^(r^2/4)) - 
                          (3*r^2)/(8*E^(r^2/4)) - (r*(r/(2*E^(r^2/4)) - 
                          (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2))/2))/
                          2))/r)*Sin[theta]^2)/2 + 
                  r*(3*((-15*((16*r)/E^(r^2/4) - (4*r^3)/E^(r^2/4)))/r^6 + 
                      (15*(16/E^(r^2/4) - (16*r^2)/E^(r^2/4) + 8*r^2*
                          (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^5 - 
                      (6*((-40*r)/E^(r^2/4) + (8*r^3)/E^(r^2/4) + 16*r*
                          (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 8*r^2*
                          (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/
                          (4*E^(r^2/4))))/2)))/r^4 + (-32/E^(r^2/4) + 
                        (32*r^2)/E^(r^2/4) + 32*(-1/2*1/E^(r^2/4) + 
                          r^2/(4*E^(r^2/4))) - 16*r^2*(-1/2*1/E^(r^2/4) + 
                          r^2/(4*E^(r^2/4))) + 32*r*(r/(2*E^(r^2/4)) - 
                          (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 
                        8*r^2*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - 
                          (r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + 
                          r^2/(4*E^(r^2/4))))/2))/2))/r^3) - 
                    (3*((-105*((16*r)/E^(r^2/4) - (4*r^3)/E^(r^2/4)))/r^6 + 
                       (105*(16/E^(r^2/4) - (16*r^2)/E^(r^2/4) + 8*r^2*
                          (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^5 - 
                       (48*((-40*r)/E^(r^2/4) + (8*r^3)/E^(r^2/4) + 16*r*
                          (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 8*r^2*
                          (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*(-32/E^(r^2/4) + 
                          (32*r^2)/E^(r^2/4) + 32*(-1/2*1/E^(r^2/4) + 
                          r^2/(4*E^(r^2/4))) - 16*r^2*(-1/2*1/E^(r^2/4) + 
                          r^2/(4*E^(r^2/4))) + 32*r*(r/(2*E^(r^2/4)) - 
                          (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 
                          8*r^2*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - 
                          (r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/
                          (4*E^(r^2/4))))/2))/2)))/r^3 - (3*((80*r)/
                          E^(r^2/4) - (16*r^3)/E^(r^2/4) - 32*r*(-1/2*
                          1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 64*
                          (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/
                          (4*E^(r^2/4))))/2) - 16*r^2*(r/(2*E^(r^2/4)) - 
                          (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 
                          32*r*(1/(2*E^(r^2/4)) - r^2/(4*E^(r^2/4)) + 
                          (1/(2*E^(r^2/4)) - r^2/(4*E^(r^2/4)))/2 - 
                          (r*((3*r)/(4*E^(r^2/4)) - r^3/(8*E^(r^2/4))))/2) + 
                          16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - 
                          (r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/
                          (4*E^(r^2/4))))/2))/2) + 8*r^2*(-1/4*r/E^(r^2/4) + 
                          (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/4 + 
                          (3*(-1/2*r/E^(r^2/4) + (r*(-1/2*1/E^(r^2/4) + 
                          r^2/(4*E^(r^2/4))))/2))/2 - (r*(3/(4*E^(r^2/4)) - 
                          (3*r^2)/(8*E^(r^2/4)) - (r*(r/(2*E^(r^2/4)) - 
                          (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2))/2))/
                          2)))/r^2 + (64/E^(r^2/4) - (64*r^2)/E^(r^2/4) - 
                         64*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*r^2*
                          (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) - 64*r*
                          (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/
                          (4*E^(r^2/4))))/2) + 64*(1/(2*E^(r^2/4)) - 
                          r^2/(4*E^(r^2/4)) + (1/(2*E^(r^2/4)) - r^2/
                          (4*E^(r^2/4)))/2 - (r*((3*r)/(4*E^(r^2/4)) - 
                          r^3/(8*E^(r^2/4))))/2) + 48*(3/(4*E^(r^2/4)) - 
                          (3*r^2)/(8*E^(r^2/4)) - (r*(r/(2*E^(r^2/4)) - 
                          (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2))/2) - 
                         16*r^2*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - 
                          (r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + 
                          r^2/(4*E^(r^2/4))))/2))/2) + 32*r*((-5*r)/
                          (4*E^(r^2/4)) + r^3/(8*E^(r^2/4)) + 
                          (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2 - 
                          (r*(3/(4*E^(r^2/4)) - (5*r^2)/(8*E^(r^2/4)) + 
                          (r^2*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/4))/
                          2) + 32*r*(-1/4*r/E^(r^2/4) + (r*(-1/2*1/E^(r^2/
                          4) + r^2/(4*E^(r^2/4))))/4 + (3*(-1/2*r/E^(r^2/4) + 
                          (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2))/2 - 
                          (r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - 
                          (r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/
                          (4*E^(r^2/4))))/2))/2))/2) + 8*r^2*(-1/8*
                          1/E^(r^2/4) + r^2/(16*E^(r^2/4)) + 
                          (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))/2 + 
                          (r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + 
                          r^2/(4*E^(r^2/4))))/2))/4 + 2*(-3/(4*E^(r^2/4)) + 
                          (3*r^2)/(8*E^(r^2/4)) + (r*(r/(2*E^(r^2/4)) - 
                          (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2))/2) - 
                          (r*(-1/4*r/E^(r^2/4) + (r*(-1/2*1/E^(r^2/4) + 
                          r^2/(4*E^(r^2/4))))/4 + (3*(-1/2*r/E^(r^2/4) + 
                          (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2))/2 - 
                          (r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - 
                          (r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/
                          (4*E^(r^2/4))))/2))/2))/2))/2))/r)*Sin[theta]^2)/
                     4)))*(-4 + 1.8*^-15*(24/(E^(r^2/4)*r^3) - 
                   (3*((16*r)/E^(r^2/4) - (4*r^3)/E^(r^2/4)))/r^4 + 
                   (16/E^(r^2/4) - (16*r^2)/E^(r^2/4) + 8*r^2*
                      (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/r^3)^2*
                 (1 + 3*Cos[2*theta]) - 3.0000000000000004*^-8*
                 (168/(E^(r^2/4)*r^3) - (21*((16*r)/E^(r^2/4) - (4*r^3)/
                      E^(r^2/4)))/r^4 + (9*(16/E^(r^2/4) - (16*r^2)/
                      E^(r^2/4) + 8*r^2*(-1/2*1/E^(r^2/4) + r^2/
                        (4*E^(r^2/4)))))/r^3 - (2*((-40*r)/E^(r^2/4) + 
                     (8*r^3)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + 
                       r^2/(4*E^(r^2/4))) + 8*r^2*(r/(2*E^(r^2/4)) - 
                       (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2)))/r^2 + 
                  (-32/E^(r^2/4) + (32*r^2)/E^(r^2/4) + 32*
                     (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) - 16*r^2*
                     (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*r*
                     (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/
                          (4*E^(r^2/4))))/2) + 8*r^2*(3/(4*E^(r^2/4)) - 
                      (3*r^2)/(8*E^(r^2/4)) - (r*(r/(2*E^(r^2/4)) - 
                         (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2))/2))/
                   r)*Sin[theta]^2 + 1.5000000000000002*^-8*
                 (24/(E^(r^2/4)*r^3) - (3*((16*r)/E^(r^2/4) - (4*r^3)/
                      E^(r^2/4)))/r^4 + (16/E^(r^2/4) - (16*r^2)/E^(r^2/4) + 
                    8*r^2*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/r^3)*
                 (4 - 12*Cos[2*theta] - 3.0000000000000004*^-8*
                   (168/(E^(r^2/4)*r^3) - (21*((16*r)/E^(r^2/4) - (4*r^3)/
                        E^(r^2/4)))/r^4 + (9*(16/E^(r^2/4) - (16*r^2)/
                        E^(r^2/4) + 8*r^2*(-1/2*1/E^(r^2/4) + r^2/
                          (4*E^(r^2/4)))))/r^3 - (2*((-40*r)/E^(r^2/4) + 
                       (8*r^3)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + 
                         r^2/(4*E^(r^2/4))) + 8*r^2*(r/(2*E^(r^2/4)) - 
                         (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2)))/
                     r^2 + (-32/E^(r^2/4) + (32*r^2)/E^(r^2/4) + 
                      32*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) - 16*r^2*
                       (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*r*
                       (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/
                          (4*E^(r^2/4))))/2) + 8*r^2*(3/(4*E^(r^2/4)) - 
                        (3*r^2)/(8*E^(r^2/4)) - (r*(r/(2*E^(r^2/4)) - 
                          (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2))/2))/
                     r)*(1 + 3*Cos[2*theta])*Sin[theta]^2) + 9.*^-16*
                 (-48/(E^(r^2/4)*r^3) + (6*((16*r)/E^(r^2/4) - (4*r^3)/
                       E^(r^2/4)))/r^4 - (3*(16/E^(r^2/4) - (16*r^2)/
                       E^(r^2/4) + 8*r^2*(-1/2*1/E^(r^2/4) + r^2/
                         (4*E^(r^2/4)))))/r^3 + ((-40*r)/E^(r^2/4) + 
                     (8*r^3)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + 
                       r^2/(4*E^(r^2/4))) + 8*r^2*(r/(2*E^(r^2/4)) - 
                       (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2))/r^2)^2*
                 Sin[2*theta]^2))/2 + 1.*^-8*(-1.8*^-7*(24/(E^(r^2/4)*r^3) - 
                  (3*((16*r)/E^(r^2/4) - (4*r^3)/E^(r^2/4)))/r^4 + 
                  (16/E^(r^2/4) - (16*r^2)/E^(r^2/4) + 8*r^2*
                     (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/r^3)^2 + 6*
                (24/(E^(r^2/4)*r^3) - (3*((16*r)/E^(r^2/4) - (4*r^3)/
                     E^(r^2/4)))/r^4 + (16/E^(r^2/4) - (16*r^2)/E^(r^2/4) + 
                   8*r^2*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/r^3)*
                (1 + 1.*^-8*(-48/(E^(r^2/4)*r^3) + (6*((16*r)/E^(r^2/4) - 
                      (4*r^3)/E^(r^2/4)))/r^4 - (3*(16/E^(r^2/4) - (16*r^2)/
                       E^(r^2/4) + 8*r^2*(-1/2*1/E^(r^2/4) + r^2/
                         (4*E^(r^2/4)))))/r^3 + ((-40*r)/E^(r^2/4) + 
                     (8*r^3)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + 
                       r^2/(4*E^(r^2/4))) + 8*r^2*(r/(2*E^(r^2/4)) - 
                       (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2))/r^2) + 
                 7.500000000000001*^-9*(168/(E^(r^2/4)*r^3) - 
                   (21*((16*r)/E^(r^2/4) - (4*r^3)/E^(r^2/4)))/r^4 + 
                   (9*(16/E^(r^2/4) - (16*r^2)/E^(r^2/4) + 8*r^2*
                       (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 - 
                   (2*((-40*r)/E^(r^2/4) + (8*r^3)/E^(r^2/4) + 16*r*
                       (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 8*r^2*
                       (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/
                          (4*E^(r^2/4))))/2)))/r^2 + (-32/E^(r^2/4) + 
                     (32*r^2)/E^(r^2/4) + 32*(-1/2*1/E^(r^2/4) + r^2/
                        (4*E^(r^2/4))) - 16*r^2*(-1/2*1/E^(r^2/4) + 
                       r^2/(4*E^(r^2/4))) + 32*r*(r/(2*E^(r^2/4)) - 
                       (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 
                     8*r^2*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - 
                       (r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/
                          (4*E^(r^2/4))))/2))/2))/r)*Sin[theta]^2) + 
               (-48/(E^(r^2/4)*r^3) + (6*((16*r)/E^(r^2/4) - (4*r^3)/
                     E^(r^2/4)))/r^4 - (3*(16/E^(r^2/4) - (16*r^2)/
                     E^(r^2/4) + 8*r^2*(-1/2*1/E^(r^2/4) + r^2/
                       (4*E^(r^2/4)))))/r^3 + ((-40*r)/E^(r^2/4) + 
                   (8*r^3)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + 
                     r^2/(4*E^(r^2/4))) + 8*r^2*(r/(2*E^(r^2/4)) - 
                     (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2))/r^2)*
                (-2 + 3.0000000000000004*^-8*r*(-120/(E^(r^2/4)*r^4) + 
                   (15*((16*r)/E^(r^2/4) - (4*r^3)/E^(r^2/4)))/r^5 - 
                   (6*(16/E^(r^2/4) - (16*r^2)/E^(r^2/4) + 8*r^2*
                       (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^4 + 
                   ((-40*r)/E^(r^2/4) + (8*r^3)/E^(r^2/4) + 16*r*
                      (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 8*r^2*
                      (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/
                          (4*E^(r^2/4))))/2))/r^3) - 1.5000000000000002*^-8*
                  (168/(E^(r^2/4)*r^3) - (21*((16*r)/E^(r^2/4) - (4*r^3)/
                       E^(r^2/4)))/r^4 + (9*(16/E^(r^2/4) - (16*r^2)/
                       E^(r^2/4) + 8*r^2*(-1/2*1/E^(r^2/4) + r^2/
                         (4*E^(r^2/4)))))/r^3 - (2*((-40*r)/E^(r^2/4) + 
                      (8*r^3)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + 
                        r^2/(4*E^(r^2/4))) + 8*r^2*(r/(2*E^(r^2/4)) - 
                        (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2)))/r^2 + 
                   (-32/E^(r^2/4) + (32*r^2)/E^(r^2/4) + 32*(-1/2*
                        1/E^(r^2/4) + r^2/(4*E^(r^2/4))) - 16*r^2*
                      (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*r*
                      (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/
                          (4*E^(r^2/4))))/2) + 8*r^2*(3/(4*E^(r^2/4)) - 
                       (3*r^2)/(8*E^(r^2/4)) - (r*(r/(2*E^(r^2/4)) - 
                          (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2))/2))/
                    r)*Sin[theta]^2 - 7.500000000000001*^-9*r*
                  (-840/(E^(r^2/4)*r^4) + (105*((16*r)/E^(r^2/4) - (4*r^3)/
                       E^(r^2/4)))/r^5 - (48*(16/E^(r^2/4) - (16*r^2)/
                       E^(r^2/4) + 8*r^2*(-1/2*1/E^(r^2/4) + r^2/
                         (4*E^(r^2/4)))))/r^4 + (13*((-40*r)/E^(r^2/4) + 
                      (8*r^3)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + 
                        r^2/(4*E^(r^2/4))) + 8*r^2*(r/(2*E^(r^2/4)) - 
                        (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2)))/r^3 - 
                   (3*(-32/E^(r^2/4) + (32*r^2)/E^(r^2/4) + 32*
                       (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) - 16*r^2*
                       (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*r*
                       (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/
                          (4*E^(r^2/4))))/2) + 8*r^2*(3/(4*E^(r^2/4)) - 
                        (3*r^2)/(8*E^(r^2/4)) - (r*(r/(2*E^(r^2/4)) - 
                          (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2))/2)))/
                    r^2 + ((80*r)/E^(r^2/4) - (16*r^3)/E^(r^2/4) - 
                     32*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 
                     64*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/
                          (4*E^(r^2/4))))/2) - 16*r^2*(r/(2*E^(r^2/4)) - 
                       (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 
                     32*r*(1/(2*E^(r^2/4)) - r^2/(4*E^(r^2/4)) + 
                       (1/(2*E^(r^2/4)) - r^2/(4*E^(r^2/4)))/2 - 
                       (r*((3*r)/(4*E^(r^2/4)) - r^3/(8*E^(r^2/4))))/2) + 
                     16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - 
                       (r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/
                          (4*E^(r^2/4))))/2))/2) + 8*r^2*(-1/4*r/E^(r^2/4) + 
                       (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/4 + 
                       (3*(-1/2*r/E^(r^2/4) + (r*(-1/2*1/E^(r^2/4) + r^2/
                          (4*E^(r^2/4))))/2))/2 - (r*(3/(4*E^(r^2/4)) - 
                          (3*r^2)/(8*E^(r^2/4)) - (r*(r/(2*E^(r^2/4)) - 
                          (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2))/2))/
                        2))/r)*Sin[theta]^2))*((3*((21*((16*r)/E^(r^2/4) - 
                     (4*r^3)/E^(r^2/4)))/r^5 - (21*(16/E^(r^2/4) - (16*r^2)/
                      E^(r^2/4) + 8*r^2*(-1/2*1/E^(r^2/4) + r^2/
                        (4*E^(r^2/4)))))/r^4 + (9*((-40*r)/E^(r^2/4) + 
                     (8*r^3)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + 
                       r^2/(4*E^(r^2/4))) + 8*r^2*(r/(2*E^(r^2/4)) - 
                       (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2)))/r^3 - 
                  (2*(-32/E^(r^2/4) + (32*r^2)/E^(r^2/4) + 32*
                      (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) - 16*r^2*
                      (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*r*
                      (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/
                          (4*E^(r^2/4))))/2) + 8*r^2*(3/(4*E^(r^2/4)) - 
                       (3*r^2)/(8*E^(r^2/4)) - (r*(r/(2*E^(r^2/4)) - 
                          (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2))/2)))/
                   r^2 + ((80*r)/E^(r^2/4) - (16*r^3)/E^(r^2/4) - 
                    32*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 
                    64*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/
                          (4*E^(r^2/4))))/2) - 16*r^2*(r/(2*E^(r^2/4)) - 
                      (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 
                    32*r*(1/(2*E^(r^2/4)) - r^2/(4*E^(r^2/4)) + 
                      (1/(2*E^(r^2/4)) - r^2/(4*E^(r^2/4)))/2 - 
                      (r*((3*r)/(4*E^(r^2/4)) - r^3/(8*E^(r^2/4))))/2) + 
                    16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - 
                      (r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/
                          (4*E^(r^2/4))))/2))/2) + 8*r^2*(-1/4*r/E^(r^2/4) + 
                      (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/4 + 
                      (3*(-1/2*r/E^(r^2/4) + (r*(-1/2*1/E^(r^2/4) + r^2/
                          (4*E^(r^2/4))))/2))/2 - (r*(3/(4*E^(r^2/4)) - 
                         (3*r^2)/(8*E^(r^2/4)) - (r*(r/(2*E^(r^2/4)) - 
                          (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2))/2))/
                       2))/r)*(2 + 3.0000000000000004*^-8*(24/(E^(r^2/4)*
                      r^3) - (3*((16*r)/E^(r^2/4) - (4*r^3)/E^(r^2/4)))/r^4 + 
                    (16/E^(r^2/4) - (16*r^2)/E^(r^2/4) + 8*r^2*
                       (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/r^3)*
                   (1 + 3*Cos[2*theta]))*Sin[theta]^2)/4 + 3*
                ((3*((16*r)/E^(r^2/4) - (4*r^3)/E^(r^2/4)))/r^5 - 
                 (3*(16/E^(r^2/4) - (16*r^2)/E^(r^2/4) + 8*r^2*
                     (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^4 + 
                 ((-40*r)/E^(r^2/4) + (8*r^3)/E^(r^2/4) + 16*r*
                    (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 8*r^2*
                    (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/
                         (4*E^(r^2/4))))/2))/r^3)*(-1 + 3*Cos[2*theta] - 
                 6.000000000000001*^-8*(24/(E^(r^2/4)*r^3) - 
                   (3*((16*r)/E^(r^2/4) - (4*r^3)/E^(r^2/4)))/r^4 + 
                   (16/E^(r^2/4) - (16*r^2)/E^(r^2/4) + 8*r^2*
                      (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/r^3)*
                  (1 + 3*Cos[2*theta]) + 7.500000000000001*^-9*
                  (168/(E^(r^2/4)*r^3) - (21*((16*r)/E^(r^2/4) - (4*r^3)/
                       E^(r^2/4)))/r^4 + (9*(16/E^(r^2/4) - (16*r^2)/
                       E^(r^2/4) + 8*r^2*(-1/2*1/E^(r^2/4) + r^2/
                         (4*E^(r^2/4)))))/r^3 - (2*((-40*r)/E^(r^2/4) + 
                      (8*r^3)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + 
                        r^2/(4*E^(r^2/4))) + 8*r^2*(r/(2*E^(r^2/4)) - 
                        (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2)))/r^2 + 
                   (-32/E^(r^2/4) + (32*r^2)/E^(r^2/4) + 32*(-1/2*
                        1/E^(r^2/4) + r^2/(4*E^(r^2/4))) - 16*r^2*
                      (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*r*
                      (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/
                          (4*E^(r^2/4))))/2) + 8*r^2*(3/(4*E^(r^2/4)) - 
                       (3*r^2)/(8*E^(r^2/4)) - (r*(r/(2*E^(r^2/4)) - 
                          (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2))/2))/
                    r)*(1 + 3*Cos[2*theta])*Sin[theta]^2) - 9.*^-8*
                (-48/(E^(r^2/4)*r^3) + (6*((16*r)/E^(r^2/4) - (4*r^3)/
                     E^(r^2/4)))/r^4 - (3*(16/E^(r^2/4) - (16*r^2)/
                     E^(r^2/4) + 8*r^2*(-1/2*1/E^(r^2/4) + r^2/
                       (4*E^(r^2/4)))))/r^3 + ((-40*r)/E^(r^2/4) + 
                   (8*r^3)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + 
                     r^2/(4*E^(r^2/4))) + 8*r^2*(r/(2*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) - (4*r^3)/E^(r^2/4)))/r^5 + 
                 (6*(16/E^(r^2/4) - (16*r^2)/E^(r^2/4) + 8*r^2*
                     (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^4 - 
                 (3*((-40*r)/E^(r^2/4) + (8*r^3)/E^(r^2/4) + 16*r*
                     (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 8*r^2*
                     (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/
                          (4*E^(r^2/4))))/2)))/r^3 + (-32/E^(r^2/4) + 
                   (32*r^2)/E^(r^2/4) + 32*(-1/2*1/E^(r^2/4) + r^2/
                      (4*E^(r^2/4))) - 16*r^2*(-1/2*1/E^(r^2/4) + 
                     r^2/(4*E^(r^2/4))) + 32*r*(r/(2*E^(r^2/4)) - 
                     (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 
                   8*r^2*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - 
                     (r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/
                          (4*E^(r^2/4))))/2))/2))/r^2)*Sin[2*theta]^2)))/
           (2 - 9.*^-16*(24/(E^(r^2/4)*r^3) - (3*((16*r)/E^(r^2/4) - 
                   (4*r^3)/E^(r^2/4)))/r^4 + (16/E^(r^2/4) - (16*r^2)/
                   E^(r^2/4) + 8*r^2*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/
                 r^3)^2*(1 + 3*Cos[2*theta]) + 1.5000000000000002*^-8*
              (168/(E^(r^2/4)*r^3) - (21*((16*r)/E^(r^2/4) - (4*r^3)/
                   E^(r^2/4)))/r^4 + (9*(16/E^(r^2/4) - (16*r^2)/E^(r^2/4) + 
                  8*r^2*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 - 
               (2*((-40*r)/E^(r^2/4) + (8*r^3)/E^(r^2/4) + 16*r*
                   (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 8*r^2*
                   (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/
                        (4*E^(r^2/4))))/2)))/r^2 + (-32/E^(r^2/4) + 
                 (32*r^2)/E^(r^2/4) + 32*(-1/2*1/E^(r^2/4) + 
                   r^2/(4*E^(r^2/4))) - 16*r^2*(-1/2*1/E^(r^2/4) + 
                   r^2/(4*E^(r^2/4))) + 32*r*(r/(2*E^(r^2/4)) - 
                   (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 
                 8*r^2*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - 
                   (r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/
                          (4*E^(r^2/4))))/2))/2))/r)*Sin[theta]^2 + 
             3.0000000000000004*^-8*(24/(E^(r^2/4)*r^3) - 
               (3*((16*r)/E^(r^2/4) - (4*r^3)/E^(r^2/4)))/r^4 + 
               (16/E^(r^2/4) - (16*r^2)/E^(r^2/4) + 8*r^2*(-1/2*1/E^(r^2/4) + 
                   r^2/(4*E^(r^2/4))))/r^3)*(-1 + 3*Cos[2*theta] + 
               7.500000000000001*^-9*(168/(E^(r^2/4)*r^3) - 
                 (21*((16*r)/E^(r^2/4) - (4*r^3)/E^(r^2/4)))/r^4 + 
                 (9*(16/E^(r^2/4) - (16*r^2)/E^(r^2/4) + 8*r^2*
                     (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 - 
                 (2*((-40*r)/E^(r^2/4) + (8*r^3)/E^(r^2/4) + 16*r*
                     (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 8*r^2*
                     (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/
                          (4*E^(r^2/4))))/2)))/r^2 + (-32/E^(r^2/4) + 
                   (32*r^2)/E^(r^2/4) + 32*(-1/2*1/E^(r^2/4) + r^2/
                      (4*E^(r^2/4))) - 16*r^2*(-1/2*1/E^(r^2/4) + 
                     r^2/(4*E^(r^2/4))) + 32*r*(r/(2*E^(r^2/4)) - 
                     (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 
                   8*r^2*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - 
                     (r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/
                          (4*E^(r^2/4))))/2))/2))/r)*(1 + 3*Cos[2*theta])*
                Sin[theta]^2) - 4.5*^-16*(-48/(E^(r^2/4)*r^3) + 
                (6*((16*r)/E^(r^2/4) - (4*r^3)/E^(r^2/4)))/r^4 - 
                (3*(16/E^(r^2/4) - (16*r^2)/E^(r^2/4) + 8*r^2*
                    (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + 
                ((-40*r)/E^(r^2/4) + (8*r^3)/E^(r^2/4) + 16*r*
                   (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 8*r^2*
                   (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/
                        (4*E^(r^2/4))))/2))/r^2)^2*Sin[2*theta]^2)^2) + 
        r^2*(1 - 3.0000000000000004*^-8*(24/(E^(r^2/4)*r^3) - 
            (3*((16*r)/E^(r^2/4) - (4*r^3)/E^(r^2/4)))/r^4 + 
            (16/E^(r^2/4) - (16*r^2)/E^(r^2/4) + 8*r^2*(-1/2*1/E^(r^2/4) + 
                r^2/(4*E^(r^2/4))))/r^3) + 7.500000000000001*^-9*
           (168/(E^(r^2/4)*r^3) - (21*((16*r)/E^(r^2/4) - (4*r^3)/E^(r^2/4)))/
             r^4 + (9*(16/E^(r^2/4) - (16*r^2)/E^(r^2/4) + 8*r^2*
                (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 - 
            (2*((-40*r)/E^(r^2/4) + (8*r^3)/E^(r^2/4) + 16*r*
                (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 8*r^2*
                (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/
                  2)))/r^2 + (-32/E^(r^2/4) + (32*r^2)/E^(r^2/4) + 
              32*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) - 
              16*r^2*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 
              32*r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + 
                   r^2/(4*E^(r^2/4))))/2) + 8*r^2*(3/(4*E^(r^2/4)) - 
                (3*r^2)/(8*E^(r^2/4)) - (r*(r/(2*E^(r^2/4)) - 
                   (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2))/2))/r)*
           Sin[theta]^2)*((5.*^-9*(-9.*^-8*(-48/(E^(r^2/4)*r^3) + 
               (6*((16*r)/E^(r^2/4) - (4*r^3)/E^(r^2/4)))/r^4 - 
               (3*(16/E^(r^2/4) - (16*r^2)/E^(r^2/4) + 8*r^2*
                   (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + 
               ((-40*r)/E^(r^2/4) + (8*r^3)/E^(r^2/4) + 16*r*
                  (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 8*r^2*
                  (r/(2*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) - 
                  (4*r^3)/E^(r^2/4)))/r^5 + (6*(16/E^(r^2/4) - (16*r^2)/
                   E^(r^2/4) + 8*r^2*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/
                r^4 - (3*((-40*r)/E^(r^2/4) + (8*r^3)/E^(r^2/4) + 
                  16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 
                  8*r^2*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + 
                       r^2/(4*E^(r^2/4))))/2)))/r^3 + (-32/E^(r^2/4) + 
                 (32*r^2)/E^(r^2/4) + 32*(-1/2*1/E^(r^2/4) + 
                   r^2/(4*E^(r^2/4))) - 16*r^2*(-1/2*1/E^(r^2/4) + 
                   r^2/(4*E^(r^2/4))) + 32*r*(r/(2*E^(r^2/4)) - 
                   (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 
                 8*r^2*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - 
                   (r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/
                          (4*E^(r^2/4))))/2))/2))/r^2)*Cos[theta]^2*
              Sin[theta]^2 - (3*((3*((16*r)/E^(r^2/4) - (4*r^3)/E^(r^2/4)))/
                 r^5 - (3*(16/E^(r^2/4) - (16*r^2)/E^(r^2/4) + 8*r^2*
                    (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^4 + 
                ((-40*r)/E^(r^2/4) + (8*r^3)/E^(r^2/4) + 16*r*
                   (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 8*r^2*
                   (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/
                        (4*E^(r^2/4))))/2))/r^3)*(1 + 3*Cos[2*theta])*(-1 + 
                3.0000000000000004*^-8*(24/(E^(r^2/4)*r^3) - 
                  (3*((16*r)/E^(r^2/4) - (4*r^3)/E^(r^2/4)))/r^4 + 
                  (16/E^(r^2/4) - (16*r^2)/E^(r^2/4) + 8*r^2*
                     (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/r^3) - 
                7.500000000000001*^-9*(168/(E^(r^2/4)*r^3) - 
                  (21*((16*r)/E^(r^2/4) - (4*r^3)/E^(r^2/4)))/r^4 + 
                  (9*(16/E^(r^2/4) - (16*r^2)/E^(r^2/4) + 8*r^2*
                      (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 - 
                  (2*((-40*r)/E^(r^2/4) + (8*r^3)/E^(r^2/4) + 16*r*
                      (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 8*r^2*
                      (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/
                          (4*E^(r^2/4))))/2)))/r^2 + (-32/E^(r^2/4) + 
                    (32*r^2)/E^(r^2/4) + 32*(-1/2*1/E^(r^2/4) + r^2/
                       (4*E^(r^2/4))) - 16*r^2*(-1/2*1/E^(r^2/4) + 
                      r^2/(4*E^(r^2/4))) + 32*r*(r/(2*E^(r^2/4)) - 
                      (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 
                    8*r^2*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - 
                      (r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/
                          (4*E^(r^2/4))))/2))/2))/r)*Sin[theta]^2))/2)*
            (r*(2 - 6.000000000000001*^-8*(24/(E^(r^2/4)*r^3) - 
                 (3*((16*r)/E^(r^2/4) - (4*r^3)/E^(r^2/4)))/r^4 + 
                 (16/E^(r^2/4) - (16*r^2)/E^(r^2/4) + 8*r^2*
                    (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/r^3) - 
               3.0000000000000004*^-8*r*(-120/(E^(r^2/4)*r^4) + 
                 (15*((16*r)/E^(r^2/4) - (4*r^3)/E^(r^2/4)))/r^5 - 
                 (6*(16/E^(r^2/4) - (16*r^2)/E^(r^2/4) + 8*r^2*
                     (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^4 + 
                 ((-40*r)/E^(r^2/4) + (8*r^3)/E^(r^2/4) + 16*r*
                    (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 8*r^2*
                    (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/
                         (4*E^(r^2/4))))/2))/r^3) + 1.5000000000000002*^-8*
                (168/(E^(r^2/4)*r^3) - (21*((16*r)/E^(r^2/4) - (4*r^3)/
                     E^(r^2/4)))/r^4 + (9*(16/E^(r^2/4) - (16*r^2)/
                     E^(r^2/4) + 8*r^2*(-1/2*1/E^(r^2/4) + r^2/
                       (4*E^(r^2/4)))))/r^3 - (2*((-40*r)/E^(r^2/4) + 
                    (8*r^3)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + 
                      r^2/(4*E^(r^2/4))) + 8*r^2*(r/(2*E^(r^2/4)) - 
                      (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2)))/r^2 + 
                 (-32/E^(r^2/4) + (32*r^2)/E^(r^2/4) + 32*(-1/2*1/E^(r^2/4) + 
                     r^2/(4*E^(r^2/4))) - 16*r^2*(-1/2*1/E^(r^2/4) + 
                     r^2/(4*E^(r^2/4))) + 32*r*(r/(2*E^(r^2/4)) - 
                     (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 
                   8*r^2*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - 
                     (r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/
                          (4*E^(r^2/4))))/2))/2))/r)*Sin[theta]^2 + 
               7.500000000000001*^-9*r*(-840/(E^(r^2/4)*r^4) + 
                 (105*((16*r)/E^(r^2/4) - (4*r^3)/E^(r^2/4)))/r^5 - 
                 (48*(16/E^(r^2/4) - (16*r^2)/E^(r^2/4) + 8*r^2*
                     (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^4 + 
                 (13*((-40*r)/E^(r^2/4) + (8*r^3)/E^(r^2/4) + 16*r*
                     (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 8*r^2*
                     (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/
                          (4*E^(r^2/4))))/2)))/r^3 - (3*(-32/E^(r^2/4) + 
                    (32*r^2)/E^(r^2/4) + 32*(-1/2*1/E^(r^2/4) + r^2/
                       (4*E^(r^2/4))) - 16*r^2*(-1/2*1/E^(r^2/4) + 
                      r^2/(4*E^(r^2/4))) + 32*r*(r/(2*E^(r^2/4)) - 
                      (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 
                    8*r^2*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - 
                      (r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/
                          (4*E^(r^2/4))))/2))/2)))/r^2 + ((80*r)/E^(r^2/4) - 
                   (16*r^3)/E^(r^2/4) - 32*r*(-1/2*1/E^(r^2/4) + 
                     r^2/(4*E^(r^2/4))) + 64*(r/(2*E^(r^2/4)) - 
                     (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) - 
                   16*r^2*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + 
                        r^2/(4*E^(r^2/4))))/2) + 32*r*(1/(2*E^(r^2/4)) - 
                     r^2/(4*E^(r^2/4)) + (1/(2*E^(r^2/4)) - r^2/
                        (4*E^(r^2/4)))/2 - (r*((3*r)/(4*E^(r^2/4)) - 
                        r^3/(8*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - 
                     (3*r^2)/(8*E^(r^2/4)) - (r*(r/(2*E^(r^2/4)) - 
                        (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2))/2) + 
                   8*r^2*(-1/4*r/E^(r^2/4) + (r*(-1/2*1/E^(r^2/4) + 
                        r^2/(4*E^(r^2/4))))/4 + (3*(-1/2*r/E^(r^2/4) + 
                        (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2))/2 - 
                     (r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - 
                        (r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/
                          (4*E^(r^2/4))))/2))/2))/2))/r)*Sin[theta]^2)*
              (-1 + 3.0000000000000004*^-8*(24/(E^(r^2/4)*r^3) - 
                 (3*((16*r)/E^(r^2/4) - (4*r^3)/E^(r^2/4)))/r^4 + 
                 (16/E^(r^2/4) - (16*r^2)/E^(r^2/4) + 8*r^2*
                    (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/r^3)*
                (-2 + 3*Sin[theta]^2)) + 1.35*^-15*r*(24/(E^(r^2/4)*r^3) - 
               (3*((16*r)/E^(r^2/4) - (4*r^3)/E^(r^2/4)))/r^4 + 
               (16/E^(r^2/4) - (16*r^2)/E^(r^2/4) + 8*r^2*(-1/2*1/E^(r^2/4) + 
                   r^2/(4*E^(r^2/4))))/r^3)*(-48/(E^(r^2/4)*r^3) + 
               (6*((16*r)/E^(r^2/4) - (4*r^3)/E^(r^2/4)))/r^4 - 
               (3*(16/E^(r^2/4) - (16*r^2)/E^(r^2/4) + 8*r^2*
                   (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + 
               ((-40*r)/E^(r^2/4) + (8*r^3)/E^(r^2/4) + 16*r*
                  (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 8*r^2*
                  (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/
                       (4*E^(r^2/4))))/2))/r^2)*Sin[2*theta]^2))/
           (r^2*(9.*^-16*(-48/(E^(r^2/4)*r^3) + (6*((16*r)/E^(r^2/4) - 
                   (4*r^3)/E^(r^2/4)))/r^4 - (3*(16/E^(r^2/4) - (16*r^2)/
                    E^(r^2/4) + 8*r^2*(-1/2*1/E^(r^2/4) + r^2/
                      (4*E^(r^2/4)))))/r^3 + ((-40*r)/E^(r^2/4) + 
                  (8*r^3)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + 
                    r^2/(4*E^(r^2/4))) + 8*r^2*(r/(2*E^(r^2/4)) - 
                    (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2))/r^2)^2*
              Cos[theta]^2*Sin[theta]^2 - (1 - 3.0000000000000004*^-8*
                (24/(E^(r^2/4)*r^3) - (3*((16*r)/E^(r^2/4) - (4*r^3)/
                     E^(r^2/4)))/r^4 + (16/E^(r^2/4) - (16*r^2)/E^(r^2/4) + 
                   8*r^2*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/r^3) + 
               7.500000000000001*^-9*(168/(E^(r^2/4)*r^3) - 
                 (21*((16*r)/E^(r^2/4) - (4*r^3)/E^(r^2/4)))/r^4 + 
                 (9*(16/E^(r^2/4) - (16*r^2)/E^(r^2/4) + 8*r^2*
                     (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 - 
                 (2*((-40*r)/E^(r^2/4) + (8*r^3)/E^(r^2/4) + 16*r*
                     (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 8*r^2*
                     (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/
                          (4*E^(r^2/4))))/2)))/r^2 + (-32/E^(r^2/4) + 
                   (32*r^2)/E^(r^2/4) + 32*(-1/2*1/E^(r^2/4) + r^2/
                      (4*E^(r^2/4))) - 16*r^2*(-1/2*1/E^(r^2/4) + 
                     r^2/(4*E^(r^2/4))) + 32*r*(r/(2*E^(r^2/4)) - 
                     (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 
                   8*r^2*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - 
                     (r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/
                          (4*E^(r^2/4))))/2))/2))/r)*Sin[theta]^2)*
              (1 + 3.0000000000000004*^-8*(24/(E^(r^2/4)*r^3) - 
                 (3*((16*r)/E^(r^2/4) - (4*r^3)/E^(r^2/4)))/r^4 + 
                 (16/E^(r^2/4) - (16*r^2)/E^(r^2/4) + 8*r^2*
                    (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/r^3)*
                (2 - 3*Sin[theta]^2)))*(2 - 9.*^-16*(24/(E^(r^2/4)*r^3) - 
                (3*((16*r)/E^(r^2/4) - (4*r^3)/E^(r^2/4)))/r^4 + 
                (16/E^(r^2/4) - (16*r^2)/E^(r^2/4) + 8*r^2*
                   (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/r^3)^2*
              (1 + 3*Cos[2*theta]) + 1.5000000000000002*^-8*
              (168/(E^(r^2/4)*r^3) - (21*((16*r)/E^(r^2/4) - (4*r^3)/
                   E^(r^2/4)))/r^4 + (9*(16/E^(r^2/4) - (16*r^2)/E^(r^2/4) + 
                  8*r^2*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 - 
               (2*((-40*r)/E^(r^2/4) + (8*r^3)/E^(r^2/4) + 16*r*
                   (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 8*r^2*
                   (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/
                        (4*E^(r^2/4))))/2)))/r^2 + (-32/E^(r^2/4) + 
                 (32*r^2)/E^(r^2/4) + 32*(-1/2*1/E^(r^2/4) + 
                   r^2/(4*E^(r^2/4))) - 16*r^2*(-1/2*1/E^(r^2/4) + 
                   r^2/(4*E^(r^2/4))) + 32*r*(r/(2*E^(r^2/4)) - 
                   (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 
                 8*r^2*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - 
                   (r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/
                          (4*E^(r^2/4))))/2))/2))/r)*Sin[theta]^2 + 
             3.0000000000000004*^-8*(24/(E^(r^2/4)*r^3) - 
               (3*((16*r)/E^(r^2/4) - (4*r^3)/E^(r^2/4)))/r^4 + 
               (16/E^(r^2/4) - (16*r^2)/E^(r^2/4) + 8*r^2*(-1/2*1/E^(r^2/4) + 
                   r^2/(4*E^(r^2/4))))/r^3)*(-1 + 3*Cos[2*theta] + 
               7.500000000000001*^-9*(168/(E^(r^2/4)*r^3) - 
                 (21*((16*r)/E^(r^2/4) - (4*r^3)/E^(r^2/4)))/r^4 + 
                 (9*(16/E^(r^2/4) - (16*r^2)/E^(r^2/4) + 8*r^2*
                     (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 - 
                 (2*((-40*r)/E^(r^2/4) + (8*r^3)/E^(r^2/4) + 16*r*
                     (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 8*r^2*
                     (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/
                          (4*E^(r^2/4))))/2)))/r^2 + (-32/E^(r^2/4) + 
                   (32*r^2)/E^(r^2/4) + 32*(-1/2*1/E^(r^2/4) + r^2/
                      (4*E^(r^2/4))) - 16*r^2*(-1/2*1/E^(r^2/4) + 
                     r^2/(4*E^(r^2/4))) + 32*r*(r/(2*E^(r^2/4)) - 
                     (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 
                   8*r^2*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - 
                     (r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/
                          (4*E^(r^2/4))))/2))/2))/r)*(1 + 3*Cos[2*theta])*
                Sin[theta]^2) - 4.5*^-16*(-48/(E^(r^2/4)*r^3) + 
                (6*((16*r)/E^(r^2/4) - (4*r^3)/E^(r^2/4)))/r^4 - 
                (3*(16/E^(r^2/4) - (16*r^2)/E^(r^2/4) + 8*r^2*
                    (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + 
                ((-40*r)/E^(r^2/4) + (8*r^3)/E^(r^2/4) + 16*r*
                   (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 8*r^2*
                   (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/
                        (4*E^(r^2/4))))/2))/r^2)^2*Sin[2*theta]^2)) - 
          (5.*^-9*((3*((3*((16*r)/E^(r^2/4) - (4*r^3)/E^(r^2/4)))/r^5 - 
                (3*(16/E^(r^2/4) - (16*r^2)/E^(r^2/4) + 8*r^2*
                    (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^4 + 
                ((-40*r)/E^(r^2/4) + (8*r^3)/E^(r^2/4) + 16*r*
                   (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 8*r^2*
                   (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/
                        (4*E^(r^2/4))))/2))/r^3)*(2 + 3.0000000000000004*^-8*
                 (24/(E^(r^2/4)*r^3) - (3*((16*r)/E^(r^2/4) - (4*r^3)/
                      E^(r^2/4)))/r^4 + (16/E^(r^2/4) - (16*r^2)/E^(r^2/4) + 
                    8*r^2*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/r^3)*
                 (1 + 3*Cos[2*theta])))/2 + 3*Sin[theta]^2*
              (3.0000000000000004*^-8*(-48/(E^(r^2/4)*r^3) + 
                 (6*((16*r)/E^(r^2/4) - (4*r^3)/E^(r^2/4)))/r^4 - 
                 (3*(16/E^(r^2/4) - (16*r^2)/E^(r^2/4) + 8*r^2*
                     (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + 
                 ((-40*r)/E^(r^2/4) + (8*r^3)/E^(r^2/4) + 16*r*
                    (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 8*r^2*
                    (r/(2*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) - 
                    (4*r^3)/E^(r^2/4)))/r^5 + (6*(16/E^(r^2/4) - (16*r^2)/
                     E^(r^2/4) + 8*r^2*(-1/2*1/E^(r^2/4) + r^2/
                       (4*E^(r^2/4)))))/r^4 - (3*((-40*r)/E^(r^2/4) + 
                    (8*r^3)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + 
                      r^2/(4*E^(r^2/4))) + 8*r^2*(r/(2*E^(r^2/4)) - 
                      (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2)))/r^3 + 
                 (-32/E^(r^2/4) + (32*r^2)/E^(r^2/4) + 32*(-1/2*1/E^(r^2/4) + 
                     r^2/(4*E^(r^2/4))) - 16*r^2*(-1/2*1/E^(r^2/4) + 
                     r^2/(4*E^(r^2/4))) + 32*r*(r/(2*E^(r^2/4)) - 
                     (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 
                   8*r^2*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - 
                     (r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/
                          (4*E^(r^2/4))))/2))/2))/r^2)*Cos[theta]^2 + 
               (((21*((16*r)/E^(r^2/4) - (4*r^3)/E^(r^2/4)))/r^5 - 
                  (21*(16/E^(r^2/4) - (16*r^2)/E^(r^2/4) + 8*r^2*
                      (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^4 + 
                  (9*((-40*r)/E^(r^2/4) + (8*r^3)/E^(r^2/4) + 16*r*
                      (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 8*r^2*
                      (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/
                          (4*E^(r^2/4))))/2)))/r^3 - (2*(-32/E^(r^2/4) + 
                     (32*r^2)/E^(r^2/4) + 32*(-1/2*1/E^(r^2/4) + r^2/
                        (4*E^(r^2/4))) - 16*r^2*(-1/2*1/E^(r^2/4) + 
                       r^2/(4*E^(r^2/4))) + 32*r*(r/(2*E^(r^2/4)) - 
                       (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 
                     8*r^2*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - 
                       (r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/
                          (4*E^(r^2/4))))/2))/2)))/r^2 + ((80*r)/E^(r^2/4) - 
                    (16*r^3)/E^(r^2/4) - 32*r*(-1/2*1/E^(r^2/4) + 
                      r^2/(4*E^(r^2/4))) + 64*(r/(2*E^(r^2/4)) - 
                      (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) - 
                    16*r^2*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + 
                         r^2/(4*E^(r^2/4))))/2) + 32*r*(1/(2*E^(r^2/4)) - 
                      r^2/(4*E^(r^2/4)) + (1/(2*E^(r^2/4)) - r^2/
                         (4*E^(r^2/4)))/2 - (r*((3*r)/(4*E^(r^2/4)) - 
                         r^3/(8*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - 
                      (3*r^2)/(8*E^(r^2/4)) - (r*(r/(2*E^(r^2/4)) - 
                         (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2))/2) + 
                    8*r^2*(-1/4*r/E^(r^2/4) + (r*(-1/2*1/E^(r^2/4) + 
                         r^2/(4*E^(r^2/4))))/4 + (3*(-1/2*r/E^(r^2/4) + 
                         (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2))/2 - 
                      (r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - 
                         (r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/
                          (4*E^(r^2/4))))/2))/2))/2))/r)*(-1 + 
                  3.0000000000000004*^-8*(24/(E^(r^2/4)*r^3) - 
                    (3*((16*r)/E^(r^2/4) - (4*r^3)/E^(r^2/4)))/r^4 + 
                    (16/E^(r^2/4) - (16*r^2)/E^(r^2/4) + 8*r^2*
                       (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/r^3)*
                   (-2 + 3*Sin[theta]^2)))/4))*(r*(2 - 6.000000000000001*^-8*
                (24/(E^(r^2/4)*r^3) - (3*((16*r)/E^(r^2/4) - (4*r^3)/
                     E^(r^2/4)))/r^4 + (16/E^(r^2/4) - (16*r^2)/E^(r^2/4) + 
                   8*r^2*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/r^3) - 
               3.0000000000000004*^-8*r*(-120/(E^(r^2/4)*r^4) + 
                 (15*((16*r)/E^(r^2/4) - (4*r^3)/E^(r^2/4)))/r^5 - 
                 (6*(16/E^(r^2/4) - (16*r^2)/E^(r^2/4) + 8*r^2*
                     (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^4 + 
                 ((-40*r)/E^(r^2/4) + (8*r^3)/E^(r^2/4) + 16*r*
                    (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 8*r^2*
                    (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/
                         (4*E^(r^2/4))))/2))/r^3) + 1.5000000000000002*^-8*
                (168/(E^(r^2/4)*r^3) - (21*((16*r)/E^(r^2/4) - (4*r^3)/
                     E^(r^2/4)))/r^4 + (9*(16/E^(r^2/4) - (16*r^2)/
                     E^(r^2/4) + 8*r^2*(-1/2*1/E^(r^2/4) + r^2/
                       (4*E^(r^2/4)))))/r^3 - (2*((-40*r)/E^(r^2/4) + 
                    (8*r^3)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + 
                      r^2/(4*E^(r^2/4))) + 8*r^2*(r/(2*E^(r^2/4)) - 
                      (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2)))/r^2 + 
                 (-32/E^(r^2/4) + (32*r^2)/E^(r^2/4) + 32*(-1/2*1/E^(r^2/4) + 
                     r^2/(4*E^(r^2/4))) - 16*r^2*(-1/2*1/E^(r^2/4) + 
                     r^2/(4*E^(r^2/4))) + 32*r*(r/(2*E^(r^2/4)) - 
                     (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 
                   8*r^2*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - 
                     (r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/
                          (4*E^(r^2/4))))/2))/2))/r)*Sin[theta]^2 + 
               7.500000000000001*^-9*r*(-840/(E^(r^2/4)*r^4) + 
                 (105*((16*r)/E^(r^2/4) - (4*r^3)/E^(r^2/4)))/r^5 - 
                 (48*(16/E^(r^2/4) - (16*r^2)/E^(r^2/4) + 8*r^2*
                     (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^4 + 
                 (13*((-40*r)/E^(r^2/4) + (8*r^3)/E^(r^2/4) + 16*r*
                     (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 8*r^2*
                     (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/
                          (4*E^(r^2/4))))/2)))/r^3 - (3*(-32/E^(r^2/4) + 
                    (32*r^2)/E^(r^2/4) + 32*(-1/2*1/E^(r^2/4) + r^2/
                       (4*E^(r^2/4))) - 16*r^2*(-1/2*1/E^(r^2/4) + 
                      r^2/(4*E^(r^2/4))) + 32*r*(r/(2*E^(r^2/4)) - 
                      (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 
                    8*r^2*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - 
                      (r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/
                          (4*E^(r^2/4))))/2))/2)))/r^2 + ((80*r)/E^(r^2/4) - 
                   (16*r^3)/E^(r^2/4) - 32*r*(-1/2*1/E^(r^2/4) + 
                     r^2/(4*E^(r^2/4))) + 64*(r/(2*E^(r^2/4)) - 
                     (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) - 
                   16*r^2*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + 
                        r^2/(4*E^(r^2/4))))/2) + 32*r*(1/(2*E^(r^2/4)) - 
                     r^2/(4*E^(r^2/4)) + (1/(2*E^(r^2/4)) - r^2/
                        (4*E^(r^2/4)))/2 - (r*((3*r)/(4*E^(r^2/4)) - 
                        r^3/(8*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - 
                     (3*r^2)/(8*E^(r^2/4)) - (r*(r/(2*E^(r^2/4)) - 
                        (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2))/2) + 
                   8*r^2*(-1/4*r/E^(r^2/4) + (r*(-1/2*1/E^(r^2/4) + 
                        r^2/(4*E^(r^2/4))))/4 + (3*(-1/2*r/E^(r^2/4) + 
                        (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2))/2 - 
                     (r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - 
                        (r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/
                          (4*E^(r^2/4))))/2))/2))/2))/r)*Sin[theta]^2)*
              (-1 + 3.0000000000000004*^-8*(24/(E^(r^2/4)*r^3) - 
                 (3*((16*r)/E^(r^2/4) - (4*r^3)/E^(r^2/4)))/r^4 + 
                 (16/E^(r^2/4) - (16*r^2)/E^(r^2/4) + 8*r^2*
                    (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/r^3)*
                (-2 + 3*Sin[theta]^2)) + 1.35*^-15*r*(24/(E^(r^2/4)*r^3) - 
               (3*((16*r)/E^(r^2/4) - (4*r^3)/E^(r^2/4)))/r^4 + 
               (16/E^(r^2/4) - (16*r^2)/E^(r^2/4) + 8*r^2*(-1/2*1/E^(r^2/4) + 
                   r^2/(4*E^(r^2/4))))/r^3)*(-48/(E^(r^2/4)*r^3) + 
               (6*((16*r)/E^(r^2/4) - (4*r^3)/E^(r^2/4)))/r^4 - 
               (3*(16/E^(r^2/4) - (16*r^2)/E^(r^2/4) + 8*r^2*
                   (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + 
               ((-40*r)/E^(r^2/4) + (8*r^3)/E^(r^2/4) + 16*r*
                  (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 8*r^2*
                  (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/
                       (4*E^(r^2/4))))/2))/r^2)*Sin[2*theta]^2))/
           (r^2*(9.*^-16*(-48/(E^(r^2/4)*r^3) + (6*((16*r)/E^(r^2/4) - 
                   (4*r^3)/E^(r^2/4)))/r^4 - (3*(16/E^(r^2/4) - (16*r^2)/
                    E^(r^2/4) + 8*r^2*(-1/2*1/E^(r^2/4) + r^2/
                      (4*E^(r^2/4)))))/r^3 + ((-40*r)/E^(r^2/4) + 
                  (8*r^3)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + 
                    r^2/(4*E^(r^2/4))) + 8*r^2*(r/(2*E^(r^2/4)) - 
                    (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2))/r^2)^2*
              Cos[theta]^2*Sin[theta]^2 - (1 - 3.0000000000000004*^-8*
                (24/(E^(r^2/4)*r^3) - (3*((16*r)/E^(r^2/4) - (4*r^3)/
                     E^(r^2/4)))/r^4 + (16/E^(r^2/4) - (16*r^2)/E^(r^2/4) + 
                   8*r^2*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/r^3) + 
               7.500000000000001*^-9*(168/(E^(r^2/4)*r^3) - 
                 (21*((16*r)/E^(r^2/4) - (4*r^3)/E^(r^2/4)))/r^4 + 
                 (9*(16/E^(r^2/4) - (16*r^2)/E^(r^2/4) + 8*r^2*
                     (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 - 
                 (2*((-40*r)/E^(r^2/4) + (8*r^3)/E^(r^2/4) + 16*r*
                     (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 8*r^2*
                     (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/
                          (4*E^(r^2/4))))/2)))/r^2 + (-32/E^(r^2/4) + 
                   (32*r^2)/E^(r^2/4) + 32*(-1/2*1/E^(r^2/4) + r^2/
                      (4*E^(r^2/4))) - 16*r^2*(-1/2*1/E^(r^2/4) + 
                     r^2/(4*E^(r^2/4))) + 32*r*(r/(2*E^(r^2/4)) - 
                     (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 
                   8*r^2*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - 
                     (r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/
                          (4*E^(r^2/4))))/2))/2))/r)*Sin[theta]^2)*
              (1 + 3.0000000000000004*^-8*(24/(E^(r^2/4)*r^3) - 
                 (3*((16*r)/E^(r^2/4) - (4*r^3)/E^(r^2/4)))/r^4 + 
                 (16/E^(r^2/4) - (16*r^2)/E^(r^2/4) + 8*r^2*
                    (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/r^3)*
                (2 - 3*Sin[theta]^2)))*(-2 + 9.*^-16*(24/(E^(r^2/4)*r^3) - 
                (3*((16*r)/E^(r^2/4) - (4*r^3)/E^(r^2/4)))/r^4 + 
                (16/E^(r^2/4) - (16*r^2)/E^(r^2/4) + 8*r^2*
                   (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/r^3)^2*
              (1 + 3*Cos[2*theta]) - 1.5000000000000002*^-8*
              (168/(E^(r^2/4)*r^3) - (21*((16*r)/E^(r^2/4) - (4*r^3)/
                   E^(r^2/4)))/r^4 + (9*(16/E^(r^2/4) - (16*r^2)/E^(r^2/4) + 
                  8*r^2*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 - 
               (2*((-40*r)/E^(r^2/4) + (8*r^3)/E^(r^2/4) + 16*r*
                   (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 8*r^2*
                   (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/
                        (4*E^(r^2/4))))/2)))/r^2 + (-32/E^(r^2/4) + 
                 (32*r^2)/E^(r^2/4) + 32*(-1/2*1/E^(r^2/4) + 
                   r^2/(4*E^(r^2/4))) - 16*r^2*(-1/2*1/E^(r^2/4) + 
                   r^2/(4*E^(r^2/4))) + 32*r*(r/(2*E^(r^2/4)) - 
                   (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 
                 8*r^2*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - 
                   (r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/
                          (4*E^(r^2/4))))/2))/2))/r)*Sin[theta]^2 - 
             6.000000000000001*^-8*(24/(E^(r^2/4)*r^3) - 
               (3*((16*r)/E^(r^2/4) - (4*r^3)/E^(r^2/4)))/r^4 + 
               (16/E^(r^2/4) - (16*r^2)/E^(r^2/4) + 8*r^2*(-1/2*1/E^(r^2/4) + 
                   r^2/(4*E^(r^2/4))))/r^3)*(1 - 3*Sin[theta]^2 + 
               3.7500000000000005*^-9*(168/(E^(r^2/4)*r^3) - 
                 (21*((16*r)/E^(r^2/4) - (4*r^3)/E^(r^2/4)))/r^4 + 
                 (9*(16/E^(r^2/4) - (16*r^2)/E^(r^2/4) + 8*r^2*
                     (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 - 
                 (2*((-40*r)/E^(r^2/4) + (8*r^3)/E^(r^2/4) + 16*r*
                     (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 8*r^2*
                     (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/
                          (4*E^(r^2/4))))/2)))/r^2 + (-32/E^(r^2/4) + 
                   (32*r^2)/E^(r^2/4) + 32*(-1/2*1/E^(r^2/4) + r^2/
                      (4*E^(r^2/4))) - 16*r^2*(-1/2*1/E^(r^2/4) + 
                     r^2/(4*E^(r^2/4))) + 32*r*(r/(2*E^(r^2/4)) - 
                     (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 
                   8*r^2*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - 
                     (r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/
                          (4*E^(r^2/4))))/2))/2))/r)*(1 + 3*Cos[2*theta])*
                Sin[theta]^2) + 4.5*^-16*(-48/(E^(r^2/4)*r^3) + 
                (6*((16*r)/E^(r^2/4) - (4*r^3)/E^(r^2/4)))/r^4 - 
                (3*(16/E^(r^2/4) - (16*r^2)/E^(r^2/4) + 8*r^2*
                    (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + 
                ((-40*r)/E^(r^2/4) + (8*r^3)/E^(r^2/4) + 16*r*
                   (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 8*r^2*
                   (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/
                        (4*E^(r^2/4))))/2))/r^2)^2*Sin[2*theta]^2)) + 
          (4.5*^-16*Cos[theta]^2*(-3.0000000000000004*^-8*
              ((3*((16*r)/E^(r^2/4) - (4*r^3)/E^(r^2/4)))/r^5 - 
               (3*(16/E^(r^2/4) - (16*r^2)/E^(r^2/4) + 8*r^2*
                   (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^4 + 
               ((-40*r)/E^(r^2/4) + (8*r^3)/E^(r^2/4) + 16*r*
                  (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 8*r^2*
                  (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/
                       (4*E^(r^2/4))))/2))/r^3)*(-48/(E^(r^2/4)*r^3) + 
               (6*((16*r)/E^(r^2/4) - (4*r^3)/E^(r^2/4)))/r^4 - 
               (3*(16/E^(r^2/4) - (16*r^2)/E^(r^2/4) + 8*r^2*
                   (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + 
               ((-40*r)/E^(r^2/4) + (8*r^3)/E^(r^2/4) + 16*r*
                  (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 8*r^2*
                  (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/
                       (4*E^(r^2/4))))/2))/r^2)*(1 + 3*Cos[2*theta]) + 
             ((-6*((16*r)/E^(r^2/4) - (4*r^3)/E^(r^2/4)))/r^5 + 
               (6*(16/E^(r^2/4) - (16*r^2)/E^(r^2/4) + 8*r^2*
                   (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^4 - 
               (3*((-40*r)/E^(r^2/4) + (8*r^3)/E^(r^2/4) + 16*r*
                   (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 8*r^2*
                   (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/
                        (4*E^(r^2/4))))/2)))/r^3 + (-32/E^(r^2/4) + 
                 (32*r^2)/E^(r^2/4) + 32*(-1/2*1/E^(r^2/4) + 
                   r^2/(4*E^(r^2/4))) - 16*r^2*(-1/2*1/E^(r^2/4) + 
                   r^2/(4*E^(r^2/4))) + 32*r*(r/(2*E^(r^2/4)) - 
                   (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 
                 8*r^2*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - 
                   (r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/
                          (4*E^(r^2/4))))/2))/2))/r^2)*
              (2 + 3.0000000000000004*^-8*(24/(E^(r^2/4)*r^3) - 
                 (3*((16*r)/E^(r^2/4) - (4*r^3)/E^(r^2/4)))/r^4 + 
                 (16/E^(r^2/4) - (16*r^2)/E^(r^2/4) + 8*r^2*
                    (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/r^3)*
                (1 + 3*Cos[2*theta])))*Sin[theta]^2*
            (-1.8*^-7*(24/(E^(r^2/4)*r^3) - (3*((16*r)/E^(r^2/4) - 
                   (4*r^3)/E^(r^2/4)))/r^4 + (16/E^(r^2/4) - (16*r^2)/
                   E^(r^2/4) + 8*r^2*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/
                 r^3)^2 + 6*(24/(E^(r^2/4)*r^3) - (3*((16*r)/E^(r^2/4) - 
                  (4*r^3)/E^(r^2/4)))/r^4 + (16/E^(r^2/4) - (16*r^2)/
                  E^(r^2/4) + 8*r^2*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/
                r^3)*(1 + 1.*^-8*(-48/(E^(r^2/4)*r^3) + 
                 (6*((16*r)/E^(r^2/4) - (4*r^3)/E^(r^2/4)))/r^4 - 
                 (3*(16/E^(r^2/4) - (16*r^2)/E^(r^2/4) + 8*r^2*
                     (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + 
                 ((-40*r)/E^(r^2/4) + (8*r^3)/E^(r^2/4) + 16*r*
                    (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 8*r^2*
                    (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/
                         (4*E^(r^2/4))))/2))/r^2) + 7.500000000000001*^-9*
                (168/(E^(r^2/4)*r^3) - (21*((16*r)/E^(r^2/4) - (4*r^3)/
                     E^(r^2/4)))/r^4 + (9*(16/E^(r^2/4) - (16*r^2)/
                     E^(r^2/4) + 8*r^2*(-1/2*1/E^(r^2/4) + r^2/
                       (4*E^(r^2/4)))))/r^3 - (2*((-40*r)/E^(r^2/4) + 
                    (8*r^3)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + 
                      r^2/(4*E^(r^2/4))) + 8*r^2*(r/(2*E^(r^2/4)) - 
                      (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2)))/r^2 + 
                 (-32/E^(r^2/4) + (32*r^2)/E^(r^2/4) + 32*(-1/2*1/E^(r^2/4) + 
                     r^2/(4*E^(r^2/4))) - 16*r^2*(-1/2*1/E^(r^2/4) + 
                     r^2/(4*E^(r^2/4))) + 32*r*(r/(2*E^(r^2/4)) - 
                     (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 
                   8*r^2*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - 
                     (r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/
                          (4*E^(r^2/4))))/2))/2))/r)*Sin[theta]^2) + 
             (-48/(E^(r^2/4)*r^3) + (6*((16*r)/E^(r^2/4) - (4*r^3)/
                   E^(r^2/4)))/r^4 - (3*(16/E^(r^2/4) - (16*r^2)/E^(r^2/4) + 
                  8*r^2*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + 
               ((-40*r)/E^(r^2/4) + (8*r^3)/E^(r^2/4) + 16*r*
                  (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 8*r^2*
                  (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/
                       (4*E^(r^2/4))))/2))/r^2)*(-2 + 3.0000000000000004*^-8*
                r*(-120/(E^(r^2/4)*r^4) + (15*((16*r)/E^(r^2/4) - (4*r^3)/
                     E^(r^2/4)))/r^5 - (6*(16/E^(r^2/4) - (16*r^2)/
                     E^(r^2/4) + 8*r^2*(-1/2*1/E^(r^2/4) + r^2/
                       (4*E^(r^2/4)))))/r^4 + ((-40*r)/E^(r^2/4) + 
                   (8*r^3)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + 
                     r^2/(4*E^(r^2/4))) + 8*r^2*(r/(2*E^(r^2/4)) - 
                     (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2))/r^3) - 
               1.5000000000000002*^-8*(168/(E^(r^2/4)*r^3) - 
                 (21*((16*r)/E^(r^2/4) - (4*r^3)/E^(r^2/4)))/r^4 + 
                 (9*(16/E^(r^2/4) - (16*r^2)/E^(r^2/4) + 8*r^2*
                     (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 - 
                 (2*((-40*r)/E^(r^2/4) + (8*r^3)/E^(r^2/4) + 16*r*
                     (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 8*r^2*
                     (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/
                          (4*E^(r^2/4))))/2)))/r^2 + (-32/E^(r^2/4) + 
                   (32*r^2)/E^(r^2/4) + 32*(-1/2*1/E^(r^2/4) + r^2/
                      (4*E^(r^2/4))) - 16*r^2*(-1/2*1/E^(r^2/4) + 
                     r^2/(4*E^(r^2/4))) + 32*r*(r/(2*E^(r^2/4)) - 
                     (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 
                   8*r^2*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - 
                     (r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/
                          (4*E^(r^2/4))))/2))/2))/r)*Sin[theta]^2 - 
               7.500000000000001*^-9*r*(-840/(E^(r^2/4)*r^4) + 
                 (105*((16*r)/E^(r^2/4) - (4*r^3)/E^(r^2/4)))/r^5 - 
                 (48*(16/E^(r^2/4) - (16*r^2)/E^(r^2/4) + 8*r^2*
                     (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^4 + 
                 (13*((-40*r)/E^(r^2/4) + (8*r^3)/E^(r^2/4) + 16*r*
                     (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 8*r^2*
                     (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/
                          (4*E^(r^2/4))))/2)))/r^3 - (3*(-32/E^(r^2/4) + 
                    (32*r^2)/E^(r^2/4) + 32*(-1/2*1/E^(r^2/4) + r^2/
                       (4*E^(r^2/4))) - 16*r^2*(-1/2*1/E^(r^2/4) + 
                      r^2/(4*E^(r^2/4))) + 32*r*(r/(2*E^(r^2/4)) - 
                      (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 
                    8*r^2*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - 
                      (r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/
                          (4*E^(r^2/4))))/2))/2)))/r^2 + ((80*r)/E^(r^2/4) - 
                   (16*r^3)/E^(r^2/4) - 32*r*(-1/2*1/E^(r^2/4) + 
                     r^2/(4*E^(r^2/4))) + 64*(r/(2*E^(r^2/4)) - 
                     (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) - 
                   16*r^2*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + 
                        r^2/(4*E^(r^2/4))))/2) + 32*r*(1/(2*E^(r^2/4)) - 
                     r^2/(4*E^(r^2/4)) + (1/(2*E^(r^2/4)) - r^2/
                        (4*E^(r^2/4)))/2 - (r*((3*r)/(4*E^(r^2/4)) - 
                        r^3/(8*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - 
                     (3*r^2)/(8*E^(r^2/4)) - (r*(r/(2*E^(r^2/4)) - 
                        (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2))/2) + 
                   8*r^2*(-1/4*r/E^(r^2/4) + (r*(-1/2*1/E^(r^2/4) + 
                        r^2/(4*E^(r^2/4))))/4 + (3*(-1/2*r/E^(r^2/4) + 
                        (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2))/2 - 
                     (r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - 
                        (r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/
                          (4*E^(r^2/4))))/2))/2))/2))/r)*Sin[theta]^2)))/
           (r*(2 - 9.*^-16*(24/(E^(r^2/4)*r^3) - (3*((16*r)/E^(r^2/4) - 
                   (4*r^3)/E^(r^2/4)))/r^4 + (16/E^(r^2/4) - (16*r^2)/
                   E^(r^2/4) + 8*r^2*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/
                 r^3)^2*(1 + 3*Cos[2*theta]) + 1.5000000000000002*^-8*
              (168/(E^(r^2/4)*r^3) - (21*((16*r)/E^(r^2/4) - (4*r^3)/
                   E^(r^2/4)))/r^4 + (9*(16/E^(r^2/4) - (16*r^2)/E^(r^2/4) + 
                  8*r^2*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 - 
               (2*((-40*r)/E^(r^2/4) + (8*r^3)/E^(r^2/4) + 16*r*
                   (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 8*r^2*
                   (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/
                        (4*E^(r^2/4))))/2)))/r^2 + (-32/E^(r^2/4) + 
                 (32*r^2)/E^(r^2/4) + 32*(-1/2*1/E^(r^2/4) + 
                   r^2/(4*E^(r^2/4))) - 16*r^2*(-1/2*1/E^(r^2/4) + 
                   r^2/(4*E^(r^2/4))) + 32*r*(r/(2*E^(r^2/4)) - 
                   (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 
                 8*r^2*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - 
                   (r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/
                          (4*E^(r^2/4))))/2))/2))/r)*Sin[theta]^2 + 
             3.0000000000000004*^-8*(24/(E^(r^2/4)*r^3) - 
               (3*((16*r)/E^(r^2/4) - (4*r^3)/E^(r^2/4)))/r^4 + 
               (16/E^(r^2/4) - (16*r^2)/E^(r^2/4) + 8*r^2*(-1/2*1/E^(r^2/4) + 
                   r^2/(4*E^(r^2/4))))/r^3)*(-1 + 3*Cos[2*theta] + 
               7.500000000000001*^-9*(168/(E^(r^2/4)*r^3) - 
                 (21*((16*r)/E^(r^2/4) - (4*r^3)/E^(r^2/4)))/r^4 + 
                 (9*(16/E^(r^2/4) - (16*r^2)/E^(r^2/4) + 8*r^2*
                     (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 - 
                 (2*((-40*r)/E^(r^2/4) + (8*r^3)/E^(r^2/4) + 16*r*
                     (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 8*r^2*
                     (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/
                          (4*E^(r^2/4))))/2)))/r^2 + (-32/E^(r^2/4) + 
                   (32*r^2)/E^(r^2/4) + 32*(-1/2*1/E^(r^2/4) + r^2/
                      (4*E^(r^2/4))) - 16*r^2*(-1/2*1/E^(r^2/4) + 
                     r^2/(4*E^(r^2/4))) + 32*r*(r/(2*E^(r^2/4)) - 
                     (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 
                   8*r^2*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - 
                     (r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/
                          (4*E^(r^2/4))))/2))/2))/r)*(1 + 3*Cos[2*theta])*
                Sin[theta]^2) - 4.5*^-16*(-48/(E^(r^2/4)*r^3) + 
                (6*((16*r)/E^(r^2/4) - (4*r^3)/E^(r^2/4)))/r^4 - 
                (3*(16/E^(r^2/4) - (16*r^2)/E^(r^2/4) + 8*r^2*
                    (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + 
                ((-40*r)/E^(r^2/4) + (8*r^3)/E^(r^2/4) + 16*r*
                   (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 8*r^2*
                   (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/
                        (4*E^(r^2/4))))/2))/r^2)^2*Sin[2*theta]^2)*
            (-2 + 9.*^-16*(24/(E^(r^2/4)*r^3) - (3*((16*r)/E^(r^2/4) - 
                   (4*r^3)/E^(r^2/4)))/r^4 + (16/E^(r^2/4) - (16*r^2)/
                   E^(r^2/4) + 8*r^2*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/
                 r^3)^2*(1 + 3*Cos[2*theta]) - 1.5000000000000002*^-8*
              (168/(E^(r^2/4)*r^3) - (21*((16*r)/E^(r^2/4) - (4*r^3)/
                   E^(r^2/4)))/r^4 + (9*(16/E^(r^2/4) - (16*r^2)/E^(r^2/4) + 
                  8*r^2*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 - 
               (2*((-40*r)/E^(r^2/4) + (8*r^3)/E^(r^2/4) + 16*r*
                   (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 8*r^2*
                   (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/
                        (4*E^(r^2/4))))/2)))/r^2 + (-32/E^(r^2/4) + 
                 (32*r^2)/E^(r^2/4) + 32*(-1/2*1/E^(r^2/4) + 
                   r^2/(4*E^(r^2/4))) - 16*r^2*(-1/2*1/E^(r^2/4) + 
                   r^2/(4*E^(r^2/4))) + 32*r*(r/(2*E^(r^2/4)) - 
                   (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 
                 8*r^2*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - 
                   (r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/
                          (4*E^(r^2/4))))/2))/2))/r)*Sin[theta]^2 - 
             3.0000000000000004*^-8*(24/(E^(r^2/4)*r^3) - 
               (3*((16*r)/E^(r^2/4) - (4*r^3)/E^(r^2/4)))/r^4 + 
               (16/E^(r^2/4) - (16*r^2)/E^(r^2/4) + 8*r^2*(-1/2*1/E^(r^2/4) + 
                   r^2/(4*E^(r^2/4))))/r^3)*(-1 + 3*Cos[2*theta] + 
               7.500000000000001*^-9*(168/(E^(r^2/4)*r^3) - 
                 (21*((16*r)/E^(r^2/4) - (4*r^3)/E^(r^2/4)))/r^4 + 
                 (9*(16/E^(r^2/4) - (16*r^2)/E^(r^2/4) + 8*r^2*
                     (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 - 
                 (2*((-40*r)/E^(r^2/4) + (8*r^3)/E^(r^2/4) + 16*r*
                     (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 8*r^2*
                     (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/
                          (4*E^(r^2/4))))/2)))/r^2 + (-32/E^(r^2/4) + 
                   (32*r^2)/E^(r^2/4) + 32*(-1/2*1/E^(r^2/4) + r^2/
                      (4*E^(r^2/4))) - 16*r^2*(-1/2*1/E^(r^2/4) + 
                     r^2/(4*E^(r^2/4))) + 32*r*(r/(2*E^(r^2/4)) - 
                     (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 
                   8*r^2*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - 
                     (r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/
                          (4*E^(r^2/4))))/2))/2))/r)*(1 + 3*Cos[2*theta])*
                Sin[theta]^2) + 4.5*^-16*(-48/(E^(r^2/4)*r^3) + 
                (6*((16*r)/E^(r^2/4) - (4*r^3)/E^(r^2/4)))/r^4 - 
                (3*(16/E^(r^2/4) - (16*r^2)/E^(r^2/4) + 8*r^2*
                    (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + 
                ((-40*r)/E^(r^2/4) + (8*r^3)/E^(r^2/4) + 16*r*
                   (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 8*r^2*
                   (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/
                        (4*E^(r^2/4))))/2))/r^2)^2*Sin[2*theta]^2)) - 
          (4.5*^-16*Cos[theta]^2*(-3.0000000000000004*^-8*
              ((3*((16*r)/E^(r^2/4) - (4*r^3)/E^(r^2/4)))/r^5 - 
               (3*(16/E^(r^2/4) - (16*r^2)/E^(r^2/4) + 8*r^2*
                   (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^4 + 
               ((-40*r)/E^(r^2/4) + (8*r^3)/E^(r^2/4) + 16*r*
                  (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 8*r^2*
                  (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/
                       (4*E^(r^2/4))))/2))/r^3)*(-48/(E^(r^2/4)*r^3) + 
               (6*((16*r)/E^(r^2/4) - (4*r^3)/E^(r^2/4)))/r^4 - 
               (3*(16/E^(r^2/4) - (16*r^2)/E^(r^2/4) + 8*r^2*
                   (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + 
               ((-40*r)/E^(r^2/4) + (8*r^3)/E^(r^2/4) + 16*r*
                  (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 8*r^2*
                  (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/
                       (4*E^(r^2/4))))/2))/r^2)*(1 + 3*Cos[2*theta]) + 
             ((-6*((16*r)/E^(r^2/4) - (4*r^3)/E^(r^2/4)))/r^5 + 
               (6*(16/E^(r^2/4) - (16*r^2)/E^(r^2/4) + 8*r^2*
                   (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^4 - 
               (3*((-40*r)/E^(r^2/4) + (8*r^3)/E^(r^2/4) + 16*r*
                   (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 8*r^2*
                   (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/
                        (4*E^(r^2/4))))/2)))/r^3 + (-32/E^(r^2/4) + 
                 (32*r^2)/E^(r^2/4) + 32*(-1/2*1/E^(r^2/4) + 
                   r^2/(4*E^(r^2/4))) - 16*r^2*(-1/2*1/E^(r^2/4) + 
                   r^2/(4*E^(r^2/4))) + 32*r*(r/(2*E^(r^2/4)) - 
                   (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 
                 8*r^2*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - 
                   (r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/
                          (4*E^(r^2/4))))/2))/2))/r^2)*
              (2 + 3.0000000000000004*^-8*(24/(E^(r^2/4)*r^3) - 
                 (3*((16*r)/E^(r^2/4) - (4*r^3)/E^(r^2/4)))/r^4 + 
                 (16/E^(r^2/4) - (16*r^2)/E^(r^2/4) + 8*r^2*
                    (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/r^3)*
                (1 + 3*Cos[2*theta])))*Sin[theta]^2*
            (6.000000000000001*^-8*(-48/(E^(r^2/4)*r^3) + 
                (6*((16*r)/E^(r^2/4) - (4*r^3)/E^(r^2/4)))/r^4 - 
                (3*(16/E^(r^2/4) - (16*r^2)/E^(r^2/4) + 8*r^2*
                    (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + 
                ((-40*r)/E^(r^2/4) + (8*r^3)/E^(r^2/4) + 16*r*
                   (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 8*r^2*
                   (r/(2*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] - 
             ((168/(E^(r^2/4)*r^3) - (21*((16*r)/E^(r^2/4) - (4*r^3)/
                    E^(r^2/4)))/r^4 + (9*(16/E^(r^2/4) - (16*r^2)/E^(r^2/4) + 
                   8*r^2*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 - 
                (2*((-40*r)/E^(r^2/4) + (8*r^3)/E^(r^2/4) + 16*r*
                    (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 8*r^2*
                    (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/
                         (4*E^(r^2/4))))/2)))/r^2 + (-32/E^(r^2/4) + 
                  (32*r^2)/E^(r^2/4) + 32*(-1/2*1/E^(r^2/4) + r^2/
                     (4*E^(r^2/4))) - 16*r^2*(-1/2*1/E^(r^2/4) + 
                    r^2/(4*E^(r^2/4))) + 32*r*(r/(2*E^(r^2/4)) - 
                    (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 
                  8*r^2*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - 
                    (r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/
                          (4*E^(r^2/4))))/2))/2))/r)*(2 + 
                3.0000000000000004*^-8*(24/(E^(r^2/4)*r^3) - 
                  (3*((16*r)/E^(r^2/4) - (4*r^3)/E^(r^2/4)))/r^4 + 
                  (16/E^(r^2/4) - (16*r^2)/E^(r^2/4) + 8*r^2*
                     (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/r^3)*
                 (1 + 3*Cos[2*theta])))/4 + (-48/(E^(r^2/4)*r^3) + 
               (6*((16*r)/E^(r^2/4) - (4*r^3)/E^(r^2/4)))/r^4 - 
               (3*(16/E^(r^2/4) - (16*r^2)/E^(r^2/4) + 8*r^2*
                   (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + 
               ((-40*r)/E^(r^2/4) + (8*r^3)/E^(r^2/4) + 16*r*
                  (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 8*r^2*
                  (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/
                       (4*E^(r^2/4))))/2))/r^2)*(2 - 6.000000000000001*^-8*
                (24/(E^(r^2/4)*r^3) - (3*((16*r)/E^(r^2/4) - (4*r^3)/
                     E^(r^2/4)))/r^4 + (16/E^(r^2/4) - (16*r^2)/E^(r^2/4) + 
                   8*r^2*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/r^3) - 
               3.0000000000000004*^-8*r*(-120/(E^(r^2/4)*r^4) + 
                 (15*((16*r)/E^(r^2/4) - (4*r^3)/E^(r^2/4)))/r^5 - 
                 (6*(16/E^(r^2/4) - (16*r^2)/E^(r^2/4) + 8*r^2*
                     (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^4 + 
                 ((-40*r)/E^(r^2/4) + (8*r^3)/E^(r^2/4) + 16*r*
                    (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 8*r^2*
                    (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/
                         (4*E^(r^2/4))))/2))/r^3) + 1.5000000000000002*^-8*
                (168/(E^(r^2/4)*r^3) - (21*((16*r)/E^(r^2/4) - (4*r^3)/
                     E^(r^2/4)))/r^4 + (9*(16/E^(r^2/4) - (16*r^2)/
                     E^(r^2/4) + 8*r^2*(-1/2*1/E^(r^2/4) + r^2/
                       (4*E^(r^2/4)))))/r^3 - (2*((-40*r)/E^(r^2/4) + 
                    (8*r^3)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + 
                      r^2/(4*E^(r^2/4))) + 8*r^2*(r/(2*E^(r^2/4)) - 
                      (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2)))/r^2 + 
                 (-32/E^(r^2/4) + (32*r^2)/E^(r^2/4) + 32*(-1/2*1/E^(r^2/4) + 
                     r^2/(4*E^(r^2/4))) - 16*r^2*(-1/2*1/E^(r^2/4) + 
                     r^2/(4*E^(r^2/4))) + 32*r*(r/(2*E^(r^2/4)) - 
                     (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 
                   8*r^2*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - 
                     (r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/
                          (4*E^(r^2/4))))/2))/2))/r)*Sin[theta]^2 + 
               7.500000000000001*^-9*r*(-840/(E^(r^2/4)*r^4) + 
                 (105*((16*r)/E^(r^2/4) - (4*r^3)/E^(r^2/4)))/r^5 - 
                 (48*(16/E^(r^2/4) - (16*r^2)/E^(r^2/4) + 8*r^2*
                     (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^4 + 
                 (13*((-40*r)/E^(r^2/4) + (8*r^3)/E^(r^2/4) + 16*r*
                     (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 8*r^2*
                     (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/
                          (4*E^(r^2/4))))/2)))/r^3 - (3*(-32/E^(r^2/4) + 
                    (32*r^2)/E^(r^2/4) + 32*(-1/2*1/E^(r^2/4) + r^2/
                       (4*E^(r^2/4))) - 16*r^2*(-1/2*1/E^(r^2/4) + 
                      r^2/(4*E^(r^2/4))) + 32*r*(r/(2*E^(r^2/4)) - 
                      (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 
                    8*r^2*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - 
                      (r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/
                          (4*E^(r^2/4))))/2))/2)))/r^2 + ((80*r)/E^(r^2/4) - 
                   (16*r^3)/E^(r^2/4) - 32*r*(-1/2*1/E^(r^2/4) + 
                     r^2/(4*E^(r^2/4))) + 64*(r/(2*E^(r^2/4)) - 
                     (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) - 
                   16*r^2*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + 
                        r^2/(4*E^(r^2/4))))/2) + 32*r*(1/(2*E^(r^2/4)) - 
                     r^2/(4*E^(r^2/4)) + (1/(2*E^(r^2/4)) - r^2/
                        (4*E^(r^2/4)))/2 - (r*((3*r)/(4*E^(r^2/4)) - 
                        r^3/(8*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - 
                     (3*r^2)/(8*E^(r^2/4)) - (r*(r/(2*E^(r^2/4)) - 
                        (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2))/2) + 
                   8*r^2*(-1/4*r/E^(r^2/4) + (r*(-1/2*1/E^(r^2/4) + 
                        r^2/(4*E^(r^2/4))))/4 + (3*(-1/2*r/E^(r^2/4) + 
                        (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2))/2 - 
                     (r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - 
                        (r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/
                          (4*E^(r^2/4))))/2))/2))/2))/r)*Sin[theta]^2)))/
           (r*(2 - 9.*^-16*(24/(E^(r^2/4)*r^3) - (3*((16*r)/E^(r^2/4) - 
                   (4*r^3)/E^(r^2/4)))/r^4 + (16/E^(r^2/4) - (16*r^2)/
                   E^(r^2/4) + 8*r^2*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/
                 r^3)^2*(1 + 3*Cos[2*theta]) + 1.5000000000000002*^-8*
              (168/(E^(r^2/4)*r^3) - (21*((16*r)/E^(r^2/4) - (4*r^3)/
                   E^(r^2/4)))/r^4 + (9*(16/E^(r^2/4) - (16*r^2)/E^(r^2/4) + 
                  8*r^2*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 - 
               (2*((-40*r)/E^(r^2/4) + (8*r^3)/E^(r^2/4) + 16*r*
                   (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 8*r^2*
                   (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/
                        (4*E^(r^2/4))))/2)))/r^2 + (-32/E^(r^2/4) + 
                 (32*r^2)/E^(r^2/4) + 32*(-1/2*1/E^(r^2/4) + 
                   r^2/(4*E^(r^2/4))) - 16*r^2*(-1/2*1/E^(r^2/4) + 
                   r^2/(4*E^(r^2/4))) + 32*r*(r/(2*E^(r^2/4)) - 
                   (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 
                 8*r^2*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - 
                   (r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/
                          (4*E^(r^2/4))))/2))/2))/r)*Sin[theta]^2 + 
             3.0000000000000004*^-8*(24/(E^(r^2/4)*r^3) - 
               (3*((16*r)/E^(r^2/4) - (4*r^3)/E^(r^2/4)))/r^4 + 
               (16/E^(r^2/4) - (16*r^2)/E^(r^2/4) + 8*r^2*(-1/2*1/E^(r^2/4) + 
                   r^2/(4*E^(r^2/4))))/r^3)*(-1 + 3*Cos[2*theta] + 
               7.500000000000001*^-9*(168/(E^(r^2/4)*r^3) - 
                 (21*((16*r)/E^(r^2/4) - (4*r^3)/E^(r^2/4)))/r^4 + 
                 (9*(16/E^(r^2/4) - (16*r^2)/E^(r^2/4) + 8*r^2*
                     (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 - 
                 (2*((-40*r)/E^(r^2/4) + (8*r^3)/E^(r^2/4) + 16*r*
                     (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 8*r^2*
                     (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/
                          (4*E^(r^2/4))))/2)))/r^2 + (-32/E^(r^2/4) + 
                   (32*r^2)/E^(r^2/4) + 32*(-1/2*1/E^(r^2/4) + r^2/
                      (4*E^(r^2/4))) - 16*r^2*(-1/2*1/E^(r^2/4) + 
                     r^2/(4*E^(r^2/4))) + 32*r*(r/(2*E^(r^2/4)) - 
                     (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 
                   8*r^2*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - 
                     (r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/
                          (4*E^(r^2/4))))/2))/2))/r)*(1 + 3*Cos[2*theta])*
                Sin[theta]^2) - 4.5*^-16*(-48/(E^(r^2/4)*r^3) + 
                (6*((16*r)/E^(r^2/4) - (4*r^3)/E^(r^2/4)))/r^4 - 
                (3*(16/E^(r^2/4) - (16*r^2)/E^(r^2/4) + 8*r^2*
                    (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + 
                ((-40*r)/E^(r^2/4) + (8*r^3)/E^(r^2/4) + 16*r*
                   (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 8*r^2*
                   (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/
                        (4*E^(r^2/4))))/2))/r^2)^2*Sin[2*theta]^2)*
            (-2 + 9.*^-16*(24/(E^(r^2/4)*r^3) - (3*((16*r)/E^(r^2/4) - 
                   (4*r^3)/E^(r^2/4)))/r^4 + (16/E^(r^2/4) - (16*r^2)/
                   E^(r^2/4) + 8*r^2*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/
                 r^3)^2*(1 + 3*Cos[2*theta]) - 1.5000000000000002*^-8*
              (168/(E^(r^2/4)*r^3) - (21*((16*r)/E^(r^2/4) - (4*r^3)/
                   E^(r^2/4)))/r^4 + (9*(16/E^(r^2/4) - (16*r^2)/E^(r^2/4) + 
                  8*r^2*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 - 
               (2*((-40*r)/E^(r^2/4) + (8*r^3)/E^(r^2/4) + 16*r*
                   (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 8*r^2*
                   (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/
                        (4*E^(r^2/4))))/2)))/r^2 + (-32/E^(r^2/4) + 
                 (32*r^2)/E^(r^2/4) + 32*(-1/2*1/E^(r^2/4) + 
                   r^2/(4*E^(r^2/4))) - 16*r^2*(-1/2*1/E^(r^2/4) + 
                   r^2/(4*E^(r^2/4))) + 32*r*(r/(2*E^(r^2/4)) - 
                   (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 
                 8*r^2*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - 
                   (r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/
                          (4*E^(r^2/4))))/2))/2))/r)*Sin[theta]^2 - 
             3.0000000000000004*^-8*(24/(E^(r^2/4)*r^3) - 
               (3*((16*r)/E^(r^2/4) - (4*r^3)/E^(r^2/4)))/r^4 + 
               (16/E^(r^2/4) - (16*r^2)/E^(r^2/4) + 8*r^2*(-1/2*1/E^(r^2/4) + 
                   r^2/(4*E^(r^2/4))))/r^3)*(-1 + 3*Cos[2*theta] + 
               7.500000000000001*^-9*(168/(E^(r^2/4)*r^3) - 
                 (21*((16*r)/E^(r^2/4) - (4*r^3)/E^(r^2/4)))/r^4 + 
                 (9*(16/E^(r^2/4) - (16*r^2)/E^(r^2/4) + 8*r^2*
                     (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 - 
                 (2*((-40*r)/E^(r^2/4) + (8*r^3)/E^(r^2/4) + 16*r*
                     (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 8*r^2*
                     (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/
                          (4*E^(r^2/4))))/2)))/r^2 + (-32/E^(r^2/4) + 
                   (32*r^2)/E^(r^2/4) + 32*(-1/2*1/E^(r^2/4) + r^2/
                      (4*E^(r^2/4))) - 16*r^2*(-1/2*1/E^(r^2/4) + 
                     r^2/(4*E^(r^2/4))) + 32*r*(r/(2*E^(r^2/4)) - 
                     (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 
                   8*r^2*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - 
                     (r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/
                          (4*E^(r^2/4))))/2))/2))/r)*(1 + 3*Cos[2*theta])*
                Sin[theta]^2) + 4.5*^-16*(-48/(E^(r^2/4)*r^3) + 
                (6*((16*r)/E^(r^2/4) - (4*r^3)/E^(r^2/4)))/r^4 - 
                (3*(16/E^(r^2/4) - (16*r^2)/E^(r^2/4) + 8*r^2*
                    (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + 
                ((-40*r)/E^(r^2/4) + (8*r^3)/E^(r^2/4) + 16*r*
                   (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 8*r^2*
                   (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/
                        (4*E^(r^2/4))))/2))/r^2)^2*Sin[2*theta]^2)) + 
          (1.5000000000000002*^-8*(3.0000000000000004*^-8*
              (9.*^-8*(24/(E^(r^2/4)*r^3) - (3*((16*r)/E^(r^2/4) - (4*r^3)/
                      E^(r^2/4)))/r^4 + (16/E^(r^2/4) - (16*r^2)/E^(r^2/4) + 
                    8*r^2*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/r^3)^2 + 
               (168/(E^(r^2/4)*r^3) - (21*((16*r)/E^(r^2/4) - (4*r^3)/
                     E^(r^2/4)))/r^4 + (9*(16/E^(r^2/4) - (16*r^2)/
                     E^(r^2/4) + 8*r^2*(-1/2*1/E^(r^2/4) + r^2/
                       (4*E^(r^2/4)))))/r^3 - (2*((-40*r)/E^(r^2/4) + 
                    (8*r^3)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + 
                      r^2/(4*E^(r^2/4))) + 8*r^2*(r/(2*E^(r^2/4)) - 
                      (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2)))/r^2 + 
                 (-32/E^(r^2/4) + (32*r^2)/E^(r^2/4) + 32*(-1/2*1/E^(r^2/4) + 
                     r^2/(4*E^(r^2/4))) - 16*r^2*(-1/2*1/E^(r^2/4) + 
                     r^2/(4*E^(r^2/4))) + 32*r*(r/(2*E^(r^2/4)) - 
                     (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 
                   8*r^2*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - 
                     (r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/
                          (4*E^(r^2/4))))/2))/2))/r)/4 - 
               3.0000000000000004*^-8*(-48/(E^(r^2/4)*r^3) + 
                  (6*((16*r)/E^(r^2/4) - (4*r^3)/E^(r^2/4)))/r^4 - 
                  (3*(16/E^(r^2/4) - (16*r^2)/E^(r^2/4) + 8*r^2*
                      (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + 
                  ((-40*r)/E^(r^2/4) + (8*r^3)/E^(r^2/4) + 16*r*
                     (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 8*r^2*
                     (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/
                          (4*E^(r^2/4))))/2))/r^2)^2*Cos[2*theta] + 3*
                (24/(E^(r^2/4)*r^3) - (3*((16*r)/E^(r^2/4) - (4*r^3)/
                     E^(r^2/4)))/r^4 + (16/E^(r^2/4) - (16*r^2)/E^(r^2/4) + 
                   8*r^2*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/r^3)*
                (-1 + 2.5*^-9*(168/(E^(r^2/4)*r^3) - (21*((16*r)/E^(r^2/4) - 
                      (4*r^3)/E^(r^2/4)))/r^4 + (9*(16/E^(r^2/4) - (16*r^2)/
                       E^(r^2/4) + 8*r^2*(-1/2*1/E^(r^2/4) + r^2/
                         (4*E^(r^2/4)))))/r^3 - (2*((-40*r)/E^(r^2/4) + 
                      (8*r^3)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + 
                        r^2/(4*E^(r^2/4))) + 8*r^2*(r/(2*E^(r^2/4)) - 
                        (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2)))/r^2 + 
                   (-32/E^(r^2/4) + (32*r^2)/E^(r^2/4) + 32*(-1/2*
                        1/E^(r^2/4) + r^2/(4*E^(r^2/4))) - 16*r^2*
                      (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*r*
                      (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/
                          (4*E^(r^2/4))))/2) + 8*r^2*(3/(4*E^(r^2/4)) - 
                       (3*r^2)/(8*E^(r^2/4)) - (r*(r/(2*E^(r^2/4)) - 
                          (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2))/2))/
                    r)*(-1 + 3*Cos[2*theta])))*(-3.0000000000000004*^-8*
                ((3*((16*r)/E^(r^2/4) - (4*r^3)/E^(r^2/4)))/r^5 - 
                 (3*(16/E^(r^2/4) - (16*r^2)/E^(r^2/4) + 8*r^2*
                     (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^4 + 
                 ((-40*r)/E^(r^2/4) + (8*r^3)/E^(r^2/4) + 16*r*
                    (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 8*r^2*
                    (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/
                         (4*E^(r^2/4))))/2))/r^3)*(-48/(E^(r^2/4)*r^3) + 
                 (6*((16*r)/E^(r^2/4) - (4*r^3)/E^(r^2/4)))/r^4 - 
                 (3*(16/E^(r^2/4) - (16*r^2)/E^(r^2/4) + 8*r^2*
                     (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + 
                 ((-40*r)/E^(r^2/4) + (8*r^3)/E^(r^2/4) + 16*r*
                    (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 8*r^2*
                    (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/
                         (4*E^(r^2/4))))/2))/r^2)*(1 + 3*Cos[2*theta]) + 
               ((-6*((16*r)/E^(r^2/4) - (4*r^3)/E^(r^2/4)))/r^5 + 
                 (6*(16/E^(r^2/4) - (16*r^2)/E^(r^2/4) + 8*r^2*
                     (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^4 - 
                 (3*((-40*r)/E^(r^2/4) + (8*r^3)/E^(r^2/4) + 16*r*
                     (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 8*r^2*
                     (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/
                          (4*E^(r^2/4))))/2)))/r^3 + (-32/E^(r^2/4) + 
                   (32*r^2)/E^(r^2/4) + 32*(-1/2*1/E^(r^2/4) + r^2/
                      (4*E^(r^2/4))) - 16*r^2*(-1/2*1/E^(r^2/4) + 
                     r^2/(4*E^(r^2/4))) + 32*r*(r/(2*E^(r^2/4)) - 
                     (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 
                   8*r^2*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - 
                     (r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/
                          (4*E^(r^2/4))))/2))/2))/r^2)*(2 + 
                 3.0000000000000004*^-8*(24/(E^(r^2/4)*r^3) - 
                   (3*((16*r)/E^(r^2/4) - (4*r^3)/E^(r^2/4)))/r^4 + 
                   (16/E^(r^2/4) - (16*r^2)/E^(r^2/4) + 8*r^2*
                      (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/r^3)*
                  (1 + 3*Cos[2*theta])))*Sin[2*theta]^2 + Cos[theta]^2*
              (-3.0000000000000004*^-8*((3*((16*r)/E^(r^2/4) - (4*r^3)/
                     E^(r^2/4)))/r^5 - (3*(16/E^(r^2/4) - (16*r^2)/
                     E^(r^2/4) + 8*r^2*(-1/2*1/E^(r^2/4) + r^2/
                       (4*E^(r^2/4)))))/r^4 + ((-40*r)/E^(r^2/4) + 
                   (8*r^3)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + 
                     r^2/(4*E^(r^2/4))) + 8*r^2*(r/(2*E^(r^2/4)) - 
                     (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2))/r^3)*
                (-48/(E^(r^2/4)*r^3) + (6*((16*r)/E^(r^2/4) - (4*r^3)/
                     E^(r^2/4)))/r^4 - (3*(16/E^(r^2/4) - (16*r^2)/
                     E^(r^2/4) + 8*r^2*(-1/2*1/E^(r^2/4) + r^2/
                       (4*E^(r^2/4)))))/r^3 + ((-40*r)/E^(r^2/4) + 
                   (8*r^3)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + 
                     r^2/(4*E^(r^2/4))) + 8*r^2*(r/(2*E^(r^2/4)) - 
                     (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2))/r^2)*
                (1 + 3*Cos[2*theta]) + ((-6*((16*r)/E^(r^2/4) - (4*r^3)/
                     E^(r^2/4)))/r^5 + (6*(16/E^(r^2/4) - (16*r^2)/
                     E^(r^2/4) + 8*r^2*(-1/2*1/E^(r^2/4) + r^2/
                       (4*E^(r^2/4)))))/r^4 - (3*((-40*r)/E^(r^2/4) + 
                    (8*r^3)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + 
                      r^2/(4*E^(r^2/4))) + 8*r^2*(r/(2*E^(r^2/4)) - 
                      (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2)))/r^3 + 
                 (-32/E^(r^2/4) + (32*r^2)/E^(r^2/4) + 32*(-1/2*1/E^(r^2/4) + 
                     r^2/(4*E^(r^2/4))) - 16*r^2*(-1/2*1/E^(r^2/4) + 
                     r^2/(4*E^(r^2/4))) + 32*r*(r/(2*E^(r^2/4)) - 
                     (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 
                   8*r^2*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - 
                     (r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/
                          (4*E^(r^2/4))))/2))/2))/r^2)*(2 + 
                 3.0000000000000004*^-8*(24/(E^(r^2/4)*r^3) - 
                   (3*((16*r)/E^(r^2/4) - (4*r^3)/E^(r^2/4)))/r^4 + 
                   (16/E^(r^2/4) - (16*r^2)/E^(r^2/4) + 8*r^2*
                      (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/r^3)*
                  (1 + 3*Cos[2*theta])))*(-2 + 9.*^-16*(24/(E^(r^2/4)*r^3) - 
                  (3*((16*r)/E^(r^2/4) - (4*r^3)/E^(r^2/4)))/r^4 + 
                  (16/E^(r^2/4) - (16*r^2)/E^(r^2/4) + 8*r^2*
                     (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/r^3)^2*
                (1 + 3*Cos[2*theta]) - 1.5000000000000002*^-8*
                (168/(E^(r^2/4)*r^3) - (21*((16*r)/E^(r^2/4) - (4*r^3)/
                     E^(r^2/4)))/r^4 + (9*(16/E^(r^2/4) - (16*r^2)/
                     E^(r^2/4) + 8*r^2*(-1/2*1/E^(r^2/4) + r^2/
                       (4*E^(r^2/4)))))/r^3 - (2*((-40*r)/E^(r^2/4) + 
                    (8*r^3)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + 
                      r^2/(4*E^(r^2/4))) + 8*r^2*(r/(2*E^(r^2/4)) - 
                      (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2)))/r^2 + 
                 (-32/E^(r^2/4) + (32*r^2)/E^(r^2/4) + 32*(-1/2*1/E^(r^2/4) + 
                     r^2/(4*E^(r^2/4))) - 16*r^2*(-1/2*1/E^(r^2/4) + 
                     r^2/(4*E^(r^2/4))) + 32*r*(r/(2*E^(r^2/4)) - 
                     (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 
                   8*r^2*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - 
                     (r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/
                          (4*E^(r^2/4))))/2))/2))/r)*Sin[theta]^2 - 
               3.0000000000000004*^-8*(24/(E^(r^2/4)*r^3) - 
                 (3*((16*r)/E^(r^2/4) - (4*r^3)/E^(r^2/4)))/r^4 + 
                 (16/E^(r^2/4) - (16*r^2)/E^(r^2/4) + 8*r^2*
                    (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/r^3)*
                (-1 + 3*Cos[2*theta] + 7.500000000000001*^-9*
                  (168/(E^(r^2/4)*r^3) - (21*((16*r)/E^(r^2/4) - (4*r^3)/
                       E^(r^2/4)))/r^4 + (9*(16/E^(r^2/4) - (16*r^2)/
                       E^(r^2/4) + 8*r^2*(-1/2*1/E^(r^2/4) + r^2/
                         (4*E^(r^2/4)))))/r^3 - (2*((-40*r)/E^(r^2/4) + 
                      (8*r^3)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + 
                        r^2/(4*E^(r^2/4))) + 8*r^2*(r/(2*E^(r^2/4)) - 
                        (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2)))/r^2 + 
                   (-32/E^(r^2/4) + (32*r^2)/E^(r^2/4) + 32*(-1/2*
                        1/E^(r^2/4) + r^2/(4*E^(r^2/4))) - 16*r^2*
                      (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*r*
                      (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/
                          (4*E^(r^2/4))))/2) + 8*r^2*(3/(4*E^(r^2/4)) - 
                       (3*r^2)/(8*E^(r^2/4)) - (r*(r/(2*E^(r^2/4)) - 
                          (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2))/2))/
                    r)*(1 + 3*Cos[2*theta])*Sin[theta]^2) + 4.5*^-16*
                (-48/(E^(r^2/4)*r^3) + (6*((16*r)/E^(r^2/4) - (4*r^3)/
                      E^(r^2/4)))/r^4 - (3*(16/E^(r^2/4) - (16*r^2)/
                      E^(r^2/4) + 8*r^2*(-1/2*1/E^(r^2/4) + r^2/
                        (4*E^(r^2/4)))))/r^3 + ((-40*r)/E^(r^2/4) + 
                    (8*r^3)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + 
                      r^2/(4*E^(r^2/4))) + 8*r^2*(r/(2*E^(r^2/4)) - 
                      (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2))/r^2)^2*
                Sin[2*theta]^2) - (-3.0000000000000004*^-8*
                ((3*((16*r)/E^(r^2/4) - (4*r^3)/E^(r^2/4)))/r^5 - 
                 (3*(16/E^(r^2/4) - (16*r^2)/E^(r^2/4) + 8*r^2*
                     (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^4 + 
                 ((-40*r)/E^(r^2/4) + (8*r^3)/E^(r^2/4) + 16*r*
                    (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 8*r^2*
                    (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/
                         (4*E^(r^2/4))))/2))/r^3)*(-48/(E^(r^2/4)*r^3) + 
                 (6*((16*r)/E^(r^2/4) - (4*r^3)/E^(r^2/4)))/r^4 - 
                 (3*(16/E^(r^2/4) - (16*r^2)/E^(r^2/4) + 8*r^2*
                     (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + 
                 ((-40*r)/E^(r^2/4) + (8*r^3)/E^(r^2/4) + 16*r*
                    (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 8*r^2*
                    (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/
                         (4*E^(r^2/4))))/2))/r^2)*(1 + 3*Cos[2*theta]) + 
               ((-6*((16*r)/E^(r^2/4) - (4*r^3)/E^(r^2/4)))/r^5 + 
                 (6*(16/E^(r^2/4) - (16*r^2)/E^(r^2/4) + 8*r^2*
                     (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^4 - 
                 (3*((-40*r)/E^(r^2/4) + (8*r^3)/E^(r^2/4) + 16*r*
                     (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 8*r^2*
                     (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/
                          (4*E^(r^2/4))))/2)))/r^3 + (-32/E^(r^2/4) + 
                   (32*r^2)/E^(r^2/4) + 32*(-1/2*1/E^(r^2/4) + r^2/
                      (4*E^(r^2/4))) - 16*r^2*(-1/2*1/E^(r^2/4) + 
                     r^2/(4*E^(r^2/4))) + 32*r*(r/(2*E^(r^2/4)) - 
                     (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 
                   8*r^2*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - 
                     (r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/
                          (4*E^(r^2/4))))/2))/2))/r^2)*(2 + 
                 3.0000000000000004*^-8*(24/(E^(r^2/4)*r^3) - 
                   (3*((16*r)/E^(r^2/4) - (4*r^3)/E^(r^2/4)))/r^4 + 
                   (16/E^(r^2/4) - (16*r^2)/E^(r^2/4) + 8*r^2*
                      (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/r^3)*
                  (1 + 3*Cos[2*theta])))*Sin[theta]^2*(-2 + 9.*^-16*
                (24/(E^(r^2/4)*r^3) - (3*((16*r)/E^(r^2/4) - (4*r^3)/
                      E^(r^2/4)))/r^4 + (16/E^(r^2/4) - (16*r^2)/E^(r^2/4) + 
                    8*r^2*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/r^3)^2*
                (1 + 3*Cos[2*theta]) - 1.5000000000000002*^-8*
                (168/(E^(r^2/4)*r^3) - (21*((16*r)/E^(r^2/4) - (4*r^3)/
                     E^(r^2/4)))/r^4 + (9*(16/E^(r^2/4) - (16*r^2)/
                     E^(r^2/4) + 8*r^2*(-1/2*1/E^(r^2/4) + r^2/
                       (4*E^(r^2/4)))))/r^3 - (2*((-40*r)/E^(r^2/4) + 
                    (8*r^3)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + 
                      r^2/(4*E^(r^2/4))) + 8*r^2*(r/(2*E^(r^2/4)) - 
                      (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2)))/r^2 + 
                 (-32/E^(r^2/4) + (32*r^2)/E^(r^2/4) + 32*(-1/2*1/E^(r^2/4) + 
                     r^2/(4*E^(r^2/4))) - 16*r^2*(-1/2*1/E^(r^2/4) + 
                     r^2/(4*E^(r^2/4))) + 32*r*(r/(2*E^(r^2/4)) - 
                     (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 
                   8*r^2*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - 
                     (r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/
                          (4*E^(r^2/4))))/2))/2))/r)*Sin[theta]^2 - 
               3.0000000000000004*^-8*(24/(E^(r^2/4)*r^3) - 
                 (3*((16*r)/E^(r^2/4) - (4*r^3)/E^(r^2/4)))/r^4 + 
                 (16/E^(r^2/4) - (16*r^2)/E^(r^2/4) + 8*r^2*
                    (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/r^3)*
                (-1 + 3*Cos[2*theta] + 7.500000000000001*^-9*
                  (168/(E^(r^2/4)*r^3) - (21*((16*r)/E^(r^2/4) - (4*r^3)/
                       E^(r^2/4)))/r^4 + (9*(16/E^(r^2/4) - (16*r^2)/
                       E^(r^2/4) + 8*r^2*(-1/2*1/E^(r^2/4) + r^2/
                         (4*E^(r^2/4)))))/r^3 - (2*((-40*r)/E^(r^2/4) + 
                      (8*r^3)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + 
                        r^2/(4*E^(r^2/4))) + 8*r^2*(r/(2*E^(r^2/4)) - 
                        (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2)))/r^2 + 
                   (-32/E^(r^2/4) + (32*r^2)/E^(r^2/4) + 32*(-1/2*
                        1/E^(r^2/4) + r^2/(4*E^(r^2/4))) - 16*r^2*
                      (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*r*
                      (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/
                          (4*E^(r^2/4))))/2) + 8*r^2*(3/(4*E^(r^2/4)) - 
                       (3*r^2)/(8*E^(r^2/4)) - (r*(r/(2*E^(r^2/4)) - 
                          (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2))/2))/
                    r)*(1 + 3*Cos[2*theta])*Sin[theta]^2) + 4.5*^-16*
                (-48/(E^(r^2/4)*r^3) + (6*((16*r)/E^(r^2/4) - (4*r^3)/
                      E^(r^2/4)))/r^4 - (3*(16/E^(r^2/4) - (16*r^2)/
                      E^(r^2/4) + 8*r^2*(-1/2*1/E^(r^2/4) + r^2/
                        (4*E^(r^2/4)))))/r^3 + ((-40*r)/E^(r^2/4) + 
                    (8*r^3)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + 
                      r^2/(4*E^(r^2/4))) + 8*r^2*(r/(2*E^(r^2/4)) - 
                      (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2))/r^2)^2*
                Sin[2*theta]^2) + 6.000000000000001*^-8*
              (3*((3*((16*r)/E^(r^2/4) - (4*r^3)/E^(r^2/4)))/r^5 - 
                 (3*(16/E^(r^2/4) - (16*r^2)/E^(r^2/4) + 8*r^2*
                     (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^4 + 
                 ((-40*r)/E^(r^2/4) + (8*r^3)/E^(r^2/4) + 16*r*
                    (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 8*r^2*
                    (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/
                         (4*E^(r^2/4))))/2))/r^3)*(-48/(E^(r^2/4)*r^3) + 
                 (6*((16*r)/E^(r^2/4) - (4*r^3)/E^(r^2/4)))/r^4 - 
                 (3*(16/E^(r^2/4) - (16*r^2)/E^(r^2/4) + 8*r^2*
                     (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + 
                 ((-40*r)/E^(r^2/4) + (8*r^3)/E^(r^2/4) + 16*r*
                    (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 8*r^2*
                    (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/
                         (4*E^(r^2/4))))/2))/r^2) - 3*(24/(E^(r^2/4)*r^3) - 
                 (3*((16*r)/E^(r^2/4) - (4*r^3)/E^(r^2/4)))/r^4 + 
                 (16/E^(r^2/4) - (16*r^2)/E^(r^2/4) + 8*r^2*
                    (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/r^3)*
                ((-6*((16*r)/E^(r^2/4) - (4*r^3)/E^(r^2/4)))/r^5 + 
                 (6*(16/E^(r^2/4) - (16*r^2)/E^(r^2/4) + 8*r^2*
                     (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^4 - 
                 (3*((-40*r)/E^(r^2/4) + (8*r^3)/E^(r^2/4) + 16*r*
                     (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 8*r^2*
                     (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/
                          (4*E^(r^2/4))))/2)))/r^3 + (-32/E^(r^2/4) + 
                   (32*r^2)/E^(r^2/4) + 32*(-1/2*1/E^(r^2/4) + r^2/
                      (4*E^(r^2/4))) - 16*r^2*(-1/2*1/E^(r^2/4) + 
                     r^2/(4*E^(r^2/4))) + 32*r*(r/(2*E^(r^2/4)) - 
                     (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 
                   8*r^2*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - 
                     (r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/
                          (4*E^(r^2/4))))/2))/2))/r^2))*Cos[theta]*Sin[theta]*
              Sin[2*theta]*(-2 + 9.*^-16*(24/(E^(r^2/4)*r^3) - 
                  (3*((16*r)/E^(r^2/4) - (4*r^3)/E^(r^2/4)))/r^4 + 
                  (16/E^(r^2/4) - (16*r^2)/E^(r^2/4) + 8*r^2*
                     (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/r^3)^2*
                (1 + 3*Cos[2*theta]) - 1.5000000000000002*^-8*
                (168/(E^(r^2/4)*r^3) - (21*((16*r)/E^(r^2/4) - (4*r^3)/
                     E^(r^2/4)))/r^4 + (9*(16/E^(r^2/4) - (16*r^2)/
                     E^(r^2/4) + 8*r^2*(-1/2*1/E^(r^2/4) + r^2/
                       (4*E^(r^2/4)))))/r^3 - (2*((-40*r)/E^(r^2/4) + 
                    (8*r^3)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + 
                      r^2/(4*E^(r^2/4))) + 8*r^2*(r/(2*E^(r^2/4)) - 
                      (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2)))/r^2 + 
                 (-32/E^(r^2/4) + (32*r^2)/E^(r^2/4) + 32*(-1/2*1/E^(r^2/4) + 
                     r^2/(4*E^(r^2/4))) - 16*r^2*(-1/2*1/E^(r^2/4) + 
                     r^2/(4*E^(r^2/4))) + 32*r*(r/(2*E^(r^2/4)) - 
                     (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 
                   8*r^2*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - 
                     (r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/
                          (4*E^(r^2/4))))/2))/2))/r)*Sin[theta]^2 - 
               3.0000000000000004*^-8*(24/(E^(r^2/4)*r^3) - 
                 (3*((16*r)/E^(r^2/4) - (4*r^3)/E^(r^2/4)))/r^4 + 
                 (16/E^(r^2/4) - (16*r^2)/E^(r^2/4) + 8*r^2*
                    (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/r^3)*
                (-1 + 3*Cos[2*theta] + 7.500000000000001*^-9*
                  (168/(E^(r^2/4)*r^3) - (21*((16*r)/E^(r^2/4) - (4*r^3)/
                       E^(r^2/4)))/r^4 + (9*(16/E^(r^2/4) - (16*r^2)/
                       E^(r^2/4) + 8*r^2*(-1/2*1/E^(r^2/4) + r^2/
                         (4*E^(r^2/4)))))/r^3 - (2*((-40*r)/E^(r^2/4) + 
                      (8*r^3)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + 
                        r^2/(4*E^(r^2/4))) + 8*r^2*(r/(2*E^(r^2/4)) - 
                        (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2)))/r^2 + 
                   (-32/E^(r^2/4) + (32*r^2)/E^(r^2/4) + 32*(-1/2*
                        1/E^(r^2/4) + r^2/(4*E^(r^2/4))) - 16*r^2*
                      (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*r*
                      (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/
                          (4*E^(r^2/4))))/2) + 8*r^2*(3/(4*E^(r^2/4)) - 
                       (3*r^2)/(8*E^(r^2/4)) - (r*(r/(2*E^(r^2/4)) - 
                          (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2))/2))/
                    r)*(1 + 3*Cos[2*theta])*Sin[theta]^2) + 4.5*^-16*
                (-48/(E^(r^2/4)*r^3) + (6*((16*r)/E^(r^2/4) - (4*r^3)/
                      E^(r^2/4)))/r^4 - (3*(16/E^(r^2/4) - (16*r^2)/
                      E^(r^2/4) + 8*r^2*(-1/2*1/E^(r^2/4) + r^2/
                        (4*E^(r^2/4)))))/r^3 + ((-40*r)/E^(r^2/4) + 
                    (8*r^3)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + 
                      r^2/(4*E^(r^2/4))) + 8*r^2*(r/(2*E^(r^2/4)) - 
                      (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2))/r^2)^2*
                Sin[2*theta]^2)))/(r*(2 - 9.*^-16*(24/(E^(r^2/4)*r^3) - 
                 (3*((16*r)/E^(r^2/4) - (4*r^3)/E^(r^2/4)))/r^4 + 
                 (16/E^(r^2/4) - (16*r^2)/E^(r^2/4) + 8*r^2*
                    (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/r^3)^2*(1 + 
                3*Cos[2*theta]) + 1.5000000000000002*^-8*(168/(E^(r^2/4)*
                  r^3) - (21*((16*r)/E^(r^2/4) - (4*r^3)/E^(r^2/4)))/r^4 + 
                (9*(16/E^(r^2/4) - (16*r^2)/E^(r^2/4) + 8*r^2*
                    (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 - 
                (2*((-40*r)/E^(r^2/4) + (8*r^3)/E^(r^2/4) + 16*r*
                    (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 8*r^2*
                    (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/
                         (4*E^(r^2/4))))/2)))/r^2 + (-32/E^(r^2/4) + 
                  (32*r^2)/E^(r^2/4) + 32*(-1/2*1/E^(r^2/4) + r^2/
                     (4*E^(r^2/4))) - 16*r^2*(-1/2*1/E^(r^2/4) + 
                    r^2/(4*E^(r^2/4))) + 32*r*(r/(2*E^(r^2/4)) - 
                    (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 
                  8*r^2*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - 
                    (r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/
                          (4*E^(r^2/4))))/2))/2))/r)*Sin[theta]^2 + 
              3.0000000000000004*^-8*(24/(E^(r^2/4)*r^3) - 
                (3*((16*r)/E^(r^2/4) - (4*r^3)/E^(r^2/4)))/r^4 + 
                (16/E^(r^2/4) - (16*r^2)/E^(r^2/4) + 8*r^2*
                   (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/r^3)*(-1 + 
                3*Cos[2*theta] + 7.500000000000001*^-9*(168/(E^(r^2/4)*r^3) - 
                  (21*((16*r)/E^(r^2/4) - (4*r^3)/E^(r^2/4)))/r^4 + 
                  (9*(16/E^(r^2/4) - (16*r^2)/E^(r^2/4) + 8*r^2*
                      (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 - 
                  (2*((-40*r)/E^(r^2/4) + (8*r^3)/E^(r^2/4) + 16*r*
                      (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 8*r^2*
                      (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/
                          (4*E^(r^2/4))))/2)))/r^2 + (-32/E^(r^2/4) + 
                    (32*r^2)/E^(r^2/4) + 32*(-1/2*1/E^(r^2/4) + r^2/
                       (4*E^(r^2/4))) - 16*r^2*(-1/2*1/E^(r^2/4) + 
                      r^2/(4*E^(r^2/4))) + 32*r*(r/(2*E^(r^2/4)) - 
                      (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 
                    8*r^2*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - 
                      (r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/
                          (4*E^(r^2/4))))/2))/2))/r)*(1 + 3*Cos[2*theta])*
                 Sin[theta]^2) - 4.5*^-16*(-48/(E^(r^2/4)*r^3) + 
                 (6*((16*r)/E^(r^2/4) - (4*r^3)/E^(r^2/4)))/r^4 - 
                 (3*(16/E^(r^2/4) - (16*r^2)/E^(r^2/4) + 8*r^2*
                     (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + 
                 ((-40*r)/E^(r^2/4) + (8*r^3)/E^(r^2/4) + 16*r*
                    (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 8*r^2*
                    (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/
                         (4*E^(r^2/4))))/2))/r^2)^2*Sin[2*theta]^2)^2) - 
          (5.*^-9*r*(9.*^-16*(-48/(E^(r^2/4)*r^3) + (6*((16*r)/E^(r^2/4) - 
                    (4*r^3)/E^(r^2/4)))/r^4 - (3*(16/E^(r^2/4) - (16*r^2)/
                     E^(r^2/4) + 8*r^2*(-1/2*1/E^(r^2/4) + r^2/
                       (4*E^(r^2/4)))))/r^3 + ((-40*r)/E^(r^2/4) + 
                   (8*r^3)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + 
                     r^2/(4*E^(r^2/4))) + 8*r^2*(r/(2*E^(r^2/4)) - 
                     (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2))/r^2)^
                2*Cos[theta]^2*Sin[theta]^2 - (1 - 3.0000000000000004*^-8*
                 (24/(E^(r^2/4)*r^3) - (3*((16*r)/E^(r^2/4) - (4*r^3)/
                      E^(r^2/4)))/r^4 + (16/E^(r^2/4) - (16*r^2)/E^(r^2/4) + 
                    8*r^2*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/r^3) + 
                7.500000000000001*^-9*(168/(E^(r^2/4)*r^3) - 
                  (21*((16*r)/E^(r^2/4) - (4*r^3)/E^(r^2/4)))/r^4 + 
                  (9*(16/E^(r^2/4) - (16*r^2)/E^(r^2/4) + 8*r^2*
                      (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 - 
                  (2*((-40*r)/E^(r^2/4) + (8*r^3)/E^(r^2/4) + 16*r*
                      (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 8*r^2*
                      (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/
                          (4*E^(r^2/4))))/2)))/r^2 + (-32/E^(r^2/4) + 
                    (32*r^2)/E^(r^2/4) + 32*(-1/2*1/E^(r^2/4) + r^2/
                       (4*E^(r^2/4))) - 16*r^2*(-1/2*1/E^(r^2/4) + 
                      r^2/(4*E^(r^2/4))) + 32*r*(r/(2*E^(r^2/4)) - 
                      (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 
                    8*r^2*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - 
                      (r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/
                          (4*E^(r^2/4))))/2))/2))/r)*Sin[theta]^2)*(1 + 
                3.0000000000000004*^-8*(24/(E^(r^2/4)*r^3) - 
                  (3*((16*r)/E^(r^2/4) - (4*r^3)/E^(r^2/4)))/r^4 + 
                  (16/E^(r^2/4) - (16*r^2)/E^(r^2/4) + 8*r^2*
                     (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/r^3)*
                 (2 - 3*Sin[theta]^2)))*(6*((3*((16*r)/E^(r^2/4) - 
                   (4*r^3)/E^(r^2/4)))/r^5 - (3*(16/E^(r^2/4) - (16*r^2)/
                    E^(r^2/4) + 8*r^2*(-1/2*1/E^(r^2/4) + r^2/
                      (4*E^(r^2/4)))))/r^4 + ((-40*r)/E^(r^2/4) + 
                  (8*r^3)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + 
                    r^2/(4*E^(r^2/4))) + 8*r^2*(r/(2*E^(r^2/4)) - 
                    (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2))/r^3)*(-2 + 
                3*Sin[theta]^2)*(2 - 6.000000000000001*^-8*
                 (24/(E^(r^2/4)*r^3) - (3*((16*r)/E^(r^2/4) - (4*r^3)/
                      E^(r^2/4)))/r^4 + (16/E^(r^2/4) - (16*r^2)/E^(r^2/4) + 
                    8*r^2*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/r^3) - 
                3.0000000000000004*^-8*r*(-120/(E^(r^2/4)*r^4) + 
                  (15*((16*r)/E^(r^2/4) - (4*r^3)/E^(r^2/4)))/r^5 - 
                  (6*(16/E^(r^2/4) - (16*r^2)/E^(r^2/4) + 8*r^2*
                      (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^4 + 
                  ((-40*r)/E^(r^2/4) + (8*r^3)/E^(r^2/4) + 16*r*
                     (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 8*r^2*
                     (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/
                          (4*E^(r^2/4))))/2))/r^3) + 1.5000000000000002*^-8*
                 (168/(E^(r^2/4)*r^3) - (21*((16*r)/E^(r^2/4) - (4*r^3)/
                      E^(r^2/4)))/r^4 + (9*(16/E^(r^2/4) - (16*r^2)/
                      E^(r^2/4) + 8*r^2*(-1/2*1/E^(r^2/4) + r^2/
                        (4*E^(r^2/4)))))/r^3 - (2*((-40*r)/E^(r^2/4) + 
                     (8*r^3)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + 
                       r^2/(4*E^(r^2/4))) + 8*r^2*(r/(2*E^(r^2/4)) - 
                       (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2)))/r^2 + 
                  (-32/E^(r^2/4) + (32*r^2)/E^(r^2/4) + 32*
                     (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) - 16*r^2*
                     (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*r*
                     (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/
                          (4*E^(r^2/4))))/2) + 8*r^2*(3/(4*E^(r^2/4)) - 
                      (3*r^2)/(8*E^(r^2/4)) - (r*(r/(2*E^(r^2/4)) - 
                         (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2))/2))/
                   r)*Sin[theta]^2 + 7.500000000000001*^-9*r*
                 (-840/(E^(r^2/4)*r^4) + (105*((16*r)/E^(r^2/4) - (4*r^3)/
                      E^(r^2/4)))/r^5 - (48*(16/E^(r^2/4) - (16*r^2)/
                      E^(r^2/4) + 8*r^2*(-1/2*1/E^(r^2/4) + r^2/
                        (4*E^(r^2/4)))))/r^4 + (13*((-40*r)/E^(r^2/4) + 
                     (8*r^3)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + 
                       r^2/(4*E^(r^2/4))) + 8*r^2*(r/(2*E^(r^2/4)) - 
                       (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2)))/r^3 - 
                  (3*(-32/E^(r^2/4) + (32*r^2)/E^(r^2/4) + 32*
                      (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) - 16*r^2*
                      (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*r*
                      (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/
                          (4*E^(r^2/4))))/2) + 8*r^2*(3/(4*E^(r^2/4)) - 
                       (3*r^2)/(8*E^(r^2/4)) - (r*(r/(2*E^(r^2/4)) - 
                          (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2))/2)))/
                   r^2 + ((80*r)/E^(r^2/4) - (16*r^3)/E^(r^2/4) - 
                    32*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 
                    64*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/
                          (4*E^(r^2/4))))/2) - 16*r^2*(r/(2*E^(r^2/4)) - 
                      (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 
                    32*r*(1/(2*E^(r^2/4)) - r^2/(4*E^(r^2/4)) + 
                      (1/(2*E^(r^2/4)) - r^2/(4*E^(r^2/4)))/2 - 
                      (r*((3*r)/(4*E^(r^2/4)) - r^3/(8*E^(r^2/4))))/2) + 
                    16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - 
                      (r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/
                          (4*E^(r^2/4))))/2))/2) + 8*r^2*(-1/4*r/E^(r^2/4) + 
                      (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/4 + 
                      (3*(-1/2*r/E^(r^2/4) + (r*(-1/2*1/E^(r^2/4) + r^2/
                          (4*E^(r^2/4))))/2))/2 - (r*(3/(4*E^(r^2/4)) - 
                         (3*r^2)/(8*E^(r^2/4)) - (r*(r/(2*E^(r^2/4)) - 
                          (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2))/2))/
                       2))/r)*Sin[theta]^2) + 2*(-6*((3*((16*r)/E^(r^2/4) - 
                     (4*r^3)/E^(r^2/4)))/r^5 - (3*(16/E^(r^2/4) - (16*r^2)/
                      E^(r^2/4) + 8*r^2*(-1/2*1/E^(r^2/4) + r^2/
                        (4*E^(r^2/4)))))/r^4 + ((-40*r)/E^(r^2/4) + 
                    (8*r^3)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + 
                      r^2/(4*E^(r^2/4))) + 8*r^2*(r/(2*E^(r^2/4)) - 
                      (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2))/r^3) - 
                3*r*((-15*((16*r)/E^(r^2/4) - (4*r^3)/E^(r^2/4)))/r^6 + 
                  (15*(16/E^(r^2/4) - (16*r^2)/E^(r^2/4) + 8*r^2*
                      (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^5 - 
                  (6*((-40*r)/E^(r^2/4) + (8*r^3)/E^(r^2/4) + 16*r*
                      (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 8*r^2*
                      (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/
                          (4*E^(r^2/4))))/2)))/r^4 + (-32/E^(r^2/4) + 
                    (32*r^2)/E^(r^2/4) + 32*(-1/2*1/E^(r^2/4) + r^2/
                       (4*E^(r^2/4))) - 16*r^2*(-1/2*1/E^(r^2/4) + 
                      r^2/(4*E^(r^2/4))) + 32*r*(r/(2*E^(r^2/4)) - 
                      (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 
                    8*r^2*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - 
                      (r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/
                          (4*E^(r^2/4))))/2))/2))/r^3) + 
                (3*((21*((16*r)/E^(r^2/4) - (4*r^3)/E^(r^2/4)))/r^5 - 
                   (21*(16/E^(r^2/4) - (16*r^2)/E^(r^2/4) + 8*r^2*
                       (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^4 + 
                   (9*((-40*r)/E^(r^2/4) + (8*r^3)/E^(r^2/4) + 16*r*
                       (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 8*r^2*
                       (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/
                          (4*E^(r^2/4))))/2)))/r^3 - (2*(-32/E^(r^2/4) + 
                      (32*r^2)/E^(r^2/4) + 32*(-1/2*1/E^(r^2/4) + r^2/
                         (4*E^(r^2/4))) - 16*r^2*(-1/2*1/E^(r^2/4) + 
                        r^2/(4*E^(r^2/4))) + 32*r*(r/(2*E^(r^2/4)) - 
                        (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 
                      8*r^2*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - 
                        (r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/
                          (4*E^(r^2/4))))/2))/2)))/r^2 + ((80*r)/E^(r^2/4) - 
                     (16*r^3)/E^(r^2/4) - 32*r*(-1/2*1/E^(r^2/4) + 
                       r^2/(4*E^(r^2/4))) + 64*(r/(2*E^(r^2/4)) - 
                       (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) - 
                     16*r^2*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + 
                          r^2/(4*E^(r^2/4))))/2) + 32*r*(1/(2*E^(r^2/4)) - 
                       r^2/(4*E^(r^2/4)) + (1/(2*E^(r^2/4)) - r^2/
                          (4*E^(r^2/4)))/2 - (r*((3*r)/(4*E^(r^2/4)) - 
                          r^3/(8*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - 
                       (3*r^2)/(8*E^(r^2/4)) - (r*(r/(2*E^(r^2/4)) - 
                          (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2))/2) + 
                     8*r^2*(-1/4*r/E^(r^2/4) + (r*(-1/2*1/E^(r^2/4) + 
                          r^2/(4*E^(r^2/4))))/4 + (3*(-1/2*r/E^(r^2/4) + 
                          (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2))/2 - 
                       (r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - 
                          (r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + 
                          r^2/(4*E^(r^2/4))))/2))/2))/2))/r)*Sin[theta]^2)/
                 2 + (3*r*((-105*((16*r)/E^(r^2/4) - (4*r^3)/E^(r^2/4)))/
                    r^6 + (105*(16/E^(r^2/4) - (16*r^2)/E^(r^2/4) + 
                      8*r^2*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^5 - 
                   (48*((-40*r)/E^(r^2/4) + (8*r^3)/E^(r^2/4) + 16*r*
                       (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 8*r^2*
                       (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*(-32/E^(r^2/4) + 
                      (32*r^2)/E^(r^2/4) + 32*(-1/2*1/E^(r^2/4) + r^2/
                         (4*E^(r^2/4))) - 16*r^2*(-1/2*1/E^(r^2/4) + 
                        r^2/(4*E^(r^2/4))) + 32*r*(r/(2*E^(r^2/4)) - 
                        (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 
                      8*r^2*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - 
                        (r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/
                          (4*E^(r^2/4))))/2))/2)))/r^3 - 
                   (3*((80*r)/E^(r^2/4) - (16*r^3)/E^(r^2/4) - 32*r*
                       (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 
                      64*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/
                          (4*E^(r^2/4))))/2) - 16*r^2*(r/(2*E^(r^2/4)) - 
                        (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 
                      32*r*(1/(2*E^(r^2/4)) - r^2/(4*E^(r^2/4)) + 
                        (1/(2*E^(r^2/4)) - r^2/(4*E^(r^2/4)))/2 - 
                        (r*((3*r)/(4*E^(r^2/4)) - r^3/(8*E^(r^2/4))))/2) + 
                      16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - 
                        (r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/
                          (4*E^(r^2/4))))/2))/2) + 8*r^2*(-1/4*r/E^(r^2/4) + 
                        (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/4 + 
                        (3*(-1/2*r/E^(r^2/4) + (r*(-1/2*1/E^(r^2/4) + 
                          r^2/(4*E^(r^2/4))))/2))/2 - (r*(3/(4*E^(r^2/4)) - 
                          (3*r^2)/(8*E^(r^2/4)) - (r*(r/(2*E^(r^2/4)) - 
                          (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2))/2))/
                         2)))/r^2 + (64/E^(r^2/4) - (64*r^2)/E^(r^2/4) - 
                     64*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*r^2*
                      (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) - 64*r*
                      (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/
                          (4*E^(r^2/4))))/2) + 64*(1/(2*E^(r^2/4)) - 
                       r^2/(4*E^(r^2/4)) + (1/(2*E^(r^2/4)) - r^2/
                          (4*E^(r^2/4)))/2 - (r*((3*r)/(4*E^(r^2/4)) - 
                          r^3/(8*E^(r^2/4))))/2) + 48*(3/(4*E^(r^2/4)) - 
                       (3*r^2)/(8*E^(r^2/4)) - (r*(r/(2*E^(r^2/4)) - 
                          (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2))/2) - 
                     16*r^2*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - 
                       (r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/
                          (4*E^(r^2/4))))/2))/2) + 32*r*((-5*r)/
                        (4*E^(r^2/4)) + r^3/(8*E^(r^2/4)) + 
                       (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2 - 
                       (r*(3/(4*E^(r^2/4)) - (5*r^2)/(8*E^(r^2/4)) + 
                          (r^2*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/4))/
                        2) + 32*r*(-1/4*r/E^(r^2/4) + (r*(-1/2*1/E^(r^2/4) + 
                          r^2/(4*E^(r^2/4))))/4 + (3*(-1/2*r/E^(r^2/4) + 
                          (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2))/2 - 
                       (r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - 
                          (r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + 
                          r^2/(4*E^(r^2/4))))/2))/2))/2) + 8*r^2*
                      (-1/8*1/E^(r^2/4) + r^2/(16*E^(r^2/4)) + 
                       (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))/2 + 
                       (r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/
                          (4*E^(r^2/4))))/2))/4 + 2*(-3/(4*E^(r^2/4)) + 
                         (3*r^2)/(8*E^(r^2/4)) + (r*(r/(2*E^(r^2/4)) - 
                          (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2))/2) - 
                       (r*(-1/4*r/E^(r^2/4) + (r*(-1/2*1/E^(r^2/4) + r^2/
                          (4*E^(r^2/4))))/4 + (3*(-1/2*r/E^(r^2/4) + 
                          (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2))/2 - 
                          (r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - 
                          (r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/
                          (4*E^(r^2/4))))/2))/2))/2))/2))/r)*Sin[theta]^2)/4)*
               (-1 + 3.0000000000000004*^-8*(24/(E^(r^2/4)*r^3) - 
                  (3*((16*r)/E^(r^2/4) - (4*r^3)/E^(r^2/4)))/r^4 + 
                  (16/E^(r^2/4) - (16*r^2)/E^(r^2/4) + 8*r^2*
                     (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/r^3)*
                 (-2 + 3*Sin[theta]^2)) + 2.7*^-7*((3*((16*r)/E^(r^2/4) - 
                   (4*r^3)/E^(r^2/4)))/r^5 - (3*(16/E^(r^2/4) - (16*r^2)/
                    E^(r^2/4) + 8*r^2*(-1/2*1/E^(r^2/4) + r^2/
                      (4*E^(r^2/4)))))/r^4 + ((-40*r)/E^(r^2/4) + 
                  (8*r^3)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + 
                    r^2/(4*E^(r^2/4))) + 8*r^2*(r/(2*E^(r^2/4)) - 
                    (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2))/r^3)*(
                -48/(E^(r^2/4)*r^3) + (6*((16*r)/E^(r^2/4) - (4*r^3)/
                    E^(r^2/4)))/r^4 - (3*(16/E^(r^2/4) - (16*r^2)/E^(r^2/4) + 
                   8*r^2*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + 
                ((-40*r)/E^(r^2/4) + (8*r^3)/E^(r^2/4) + 16*r*
                   (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 8*r^2*
                   (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/
                        (4*E^(r^2/4))))/2))/r^2)*Sin[2*theta]^2 + 
              2.7*^-7*(24/(E^(r^2/4)*r^3) - (3*((16*r)/E^(r^2/4) - 
                   (4*r^3)/E^(r^2/4)))/r^4 + (16/E^(r^2/4) - (16*r^2)/
                   E^(r^2/4) + 8*r^2*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/
                 r^3)*((-6*((16*r)/E^(r^2/4) - (4*r^3)/E^(r^2/4)))/r^5 + 
                (6*(16/E^(r^2/4) - (16*r^2)/E^(r^2/4) + 8*r^2*
                    (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^4 - 
                (3*((-40*r)/E^(r^2/4) + (8*r^3)/E^(r^2/4) + 16*r*
                    (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 8*r^2*
                    (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/
                         (4*E^(r^2/4))))/2)))/r^3 + (-32/E^(r^2/4) + 
                  (32*r^2)/E^(r^2/4) + 32*(-1/2*1/E^(r^2/4) + r^2/
                     (4*E^(r^2/4))) - 16*r^2*(-1/2*1/E^(r^2/4) + 
                    r^2/(4*E^(r^2/4))) + 32*r*(r/(2*E^(r^2/4)) - 
                    (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 
                  8*r^2*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - 
                    (r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/
                          (4*E^(r^2/4))))/2))/2))/r^2)*Sin[2*theta]^2) - 
            (r*(2 - 6.000000000000001*^-8*(24/(E^(r^2/4)*r^3) - 
                  (3*((16*r)/E^(r^2/4) - (4*r^3)/E^(r^2/4)))/r^4 + 
                  (16/E^(r^2/4) - (16*r^2)/E^(r^2/4) + 8*r^2*
                     (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/r^3) - 
                3.0000000000000004*^-8*r*(-120/(E^(r^2/4)*r^4) + 
                  (15*((16*r)/E^(r^2/4) - (4*r^3)/E^(r^2/4)))/r^5 - 
                  (6*(16/E^(r^2/4) - (16*r^2)/E^(r^2/4) + 8*r^2*
                      (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^4 + 
                  ((-40*r)/E^(r^2/4) + (8*r^3)/E^(r^2/4) + 16*r*
                     (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 8*r^2*
                     (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/
                          (4*E^(r^2/4))))/2))/r^3) + 1.5000000000000002*^-8*
                 (168/(E^(r^2/4)*r^3) - (21*((16*r)/E^(r^2/4) - (4*r^3)/
                      E^(r^2/4)))/r^4 + (9*(16/E^(r^2/4) - (16*r^2)/
                      E^(r^2/4) + 8*r^2*(-1/2*1/E^(r^2/4) + r^2/
                        (4*E^(r^2/4)))))/r^3 - (2*((-40*r)/E^(r^2/4) + 
                     (8*r^3)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + 
                       r^2/(4*E^(r^2/4))) + 8*r^2*(r/(2*E^(r^2/4)) - 
                       (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2)))/r^2 + 
                  (-32/E^(r^2/4) + (32*r^2)/E^(r^2/4) + 32*
                     (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) - 16*r^2*
                     (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*r*
                     (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/
                          (4*E^(r^2/4))))/2) + 8*r^2*(3/(4*E^(r^2/4)) - 
                      (3*r^2)/(8*E^(r^2/4)) - (r*(r/(2*E^(r^2/4)) - 
                         (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2))/2))/
                   r)*Sin[theta]^2 + 7.500000000000001*^-9*r*
                 (-840/(E^(r^2/4)*r^4) + (105*((16*r)/E^(r^2/4) - (4*r^3)/
                      E^(r^2/4)))/r^5 - (48*(16/E^(r^2/4) - (16*r^2)/
                      E^(r^2/4) + 8*r^2*(-1/2*1/E^(r^2/4) + r^2/
                        (4*E^(r^2/4)))))/r^4 + (13*((-40*r)/E^(r^2/4) + 
                     (8*r^3)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + 
                       r^2/(4*E^(r^2/4))) + 8*r^2*(r/(2*E^(r^2/4)) - 
                       (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2)))/r^3 - 
                  (3*(-32/E^(r^2/4) + (32*r^2)/E^(r^2/4) + 32*
                      (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) - 16*r^2*
                      (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*r*
                      (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/
                          (4*E^(r^2/4))))/2) + 8*r^2*(3/(4*E^(r^2/4)) - 
                       (3*r^2)/(8*E^(r^2/4)) - (r*(r/(2*E^(r^2/4)) - 
                          (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2))/2)))/
                   r^2 + ((80*r)/E^(r^2/4) - (16*r^3)/E^(r^2/4) - 
                    32*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 
                    64*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/
                          (4*E^(r^2/4))))/2) - 16*r^2*(r/(2*E^(r^2/4)) - 
                      (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 
                    32*r*(1/(2*E^(r^2/4)) - r^2/(4*E^(r^2/4)) + 
                      (1/(2*E^(r^2/4)) - r^2/(4*E^(r^2/4)))/2 - 
                      (r*((3*r)/(4*E^(r^2/4)) - r^3/(8*E^(r^2/4))))/2) + 
                    16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - 
                      (r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/
                          (4*E^(r^2/4))))/2))/2) + 8*r^2*(-1/4*r/E^(r^2/4) + 
                      (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/4 + 
                      (3*(-1/2*r/E^(r^2/4) + (r*(-1/2*1/E^(r^2/4) + r^2/
                          (4*E^(r^2/4))))/2))/2 - (r*(3/(4*E^(r^2/4)) - 
                         (3*r^2)/(8*E^(r^2/4)) - (r*(r/(2*E^(r^2/4)) - 
                          (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2))/2))/
                       2))/r)*Sin[theta]^2)*(-1 + 3.0000000000000004*^-8*
                 (24/(E^(r^2/4)*r^3) - (3*((16*r)/E^(r^2/4) - (4*r^3)/
                      E^(r^2/4)))/r^4 + (16/E^(r^2/4) - (16*r^2)/E^(r^2/4) + 
                    8*r^2*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/r^3)*
                 (-2 + 3*Sin[theta]^2)) + 1.35*^-15*r*(24/(E^(r^2/4)*r^3) - 
                (3*((16*r)/E^(r^2/4) - (4*r^3)/E^(r^2/4)))/r^4 + 
                (16/E^(r^2/4) - (16*r^2)/E^(r^2/4) + 8*r^2*
                   (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/r^3)*(
                -48/(E^(r^2/4)*r^3) + (6*((16*r)/E^(r^2/4) - (4*r^3)/
                    E^(r^2/4)))/r^4 - (3*(16/E^(r^2/4) - (16*r^2)/E^(r^2/4) + 
                   8*r^2*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + 
                ((-40*r)/E^(r^2/4) + (8*r^3)/E^(r^2/4) + 16*r*
                   (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 8*r^2*
                   (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/
                        (4*E^(r^2/4))))/2))/r^2)*Sin[2*theta]^2)*
             (3.0000000000000004*^-8*((3*((16*r)/E^(r^2/4) - (4*r^3)/
                    E^(r^2/4)))/r^5 - (3*(16/E^(r^2/4) - (16*r^2)/E^(r^2/4) + 
                   8*r^2*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^4 + 
                ((-40*r)/E^(r^2/4) + (8*r^3)/E^(r^2/4) + 16*r*
                   (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 8*r^2*
                   (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/
                        (4*E^(r^2/4))))/2))/r^3)*(-2 + 3*Sin[theta]^2)*(1 - 
                3.0000000000000004*^-8*(24/(E^(r^2/4)*r^3) - 
                  (3*((16*r)/E^(r^2/4) - (4*r^3)/E^(r^2/4)))/r^4 + 
                  (16/E^(r^2/4) - (16*r^2)/E^(r^2/4) + 8*r^2*
                     (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/r^3) + 
                7.500000000000001*^-9*(168/(E^(r^2/4)*r^3) - 
                  (21*((16*r)/E^(r^2/4) - (4*r^3)/E^(r^2/4)))/r^4 + 
                  (9*(16/E^(r^2/4) - (16*r^2)/E^(r^2/4) + 8*r^2*
                      (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 - 
                  (2*((-40*r)/E^(r^2/4) + (8*r^3)/E^(r^2/4) + 16*r*
                      (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 8*r^2*
                      (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/
                          (4*E^(r^2/4))))/2)))/r^2 + (-32/E^(r^2/4) + 
                    (32*r^2)/E^(r^2/4) + 32*(-1/2*1/E^(r^2/4) + r^2/
                       (4*E^(r^2/4))) - 16*r^2*(-1/2*1/E^(r^2/4) + 
                      r^2/(4*E^(r^2/4))) + 32*r*(r/(2*E^(r^2/4)) - 
                      (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 
                    8*r^2*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - 
                      (r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/
                          (4*E^(r^2/4))))/2))/2))/r)*Sin[theta]^2) + 
              1.*^-8*(3*((3*((16*r)/E^(r^2/4) - (4*r^3)/E^(r^2/4)))/r^5 - 
                  (3*(16/E^(r^2/4) - (16*r^2)/E^(r^2/4) + 8*r^2*
                      (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^4 + 
                  ((-40*r)/E^(r^2/4) + (8*r^3)/E^(r^2/4) + 16*r*
                     (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 8*r^2*
                     (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/
                          (4*E^(r^2/4))))/2))/r^3) - 
                (3*((21*((16*r)/E^(r^2/4) - (4*r^3)/E^(r^2/4)))/r^5 - 
                   (21*(16/E^(r^2/4) - (16*r^2)/E^(r^2/4) + 8*r^2*
                       (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^4 + 
                   (9*((-40*r)/E^(r^2/4) + (8*r^3)/E^(r^2/4) + 16*r*
                       (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 8*r^2*
                       (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/
                          (4*E^(r^2/4))))/2)))/r^3 - (2*(-32/E^(r^2/4) + 
                      (32*r^2)/E^(r^2/4) + 32*(-1/2*1/E^(r^2/4) + r^2/
                         (4*E^(r^2/4))) - 16*r^2*(-1/2*1/E^(r^2/4) + 
                        r^2/(4*E^(r^2/4))) + 32*r*(r/(2*E^(r^2/4)) - 
                        (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 
                      8*r^2*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - 
                        (r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/
                          (4*E^(r^2/4))))/2))/2)))/r^2 + ((80*r)/E^(r^2/4) - 
                     (16*r^3)/E^(r^2/4) - 32*r*(-1/2*1/E^(r^2/4) + 
                       r^2/(4*E^(r^2/4))) + 64*(r/(2*E^(r^2/4)) - 
                       (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) - 
                     16*r^2*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + 
                          r^2/(4*E^(r^2/4))))/2) + 32*r*(1/(2*E^(r^2/4)) - 
                       r^2/(4*E^(r^2/4)) + (1/(2*E^(r^2/4)) - r^2/
                          (4*E^(r^2/4)))/2 - (r*((3*r)/(4*E^(r^2/4)) - 
                          r^3/(8*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - 
                       (3*r^2)/(8*E^(r^2/4)) - (r*(r/(2*E^(r^2/4)) - 
                          (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2))/2) + 
                     8*r^2*(-1/4*r/E^(r^2/4) + (r*(-1/2*1/E^(r^2/4) + 
                          r^2/(4*E^(r^2/4))))/4 + (3*(-1/2*r/E^(r^2/4) + 
                          (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2))/2 - 
                       (r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - 
                          (r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + 
                          r^2/(4*E^(r^2/4))))/2))/2))/2))/r)*Sin[theta]^2)/4)*
               (1 + 3.0000000000000004*^-8*(24/(E^(r^2/4)*r^3) - 
                  (3*((16*r)/E^(r^2/4) - (4*r^3)/E^(r^2/4)))/r^4 + 
                  (16/E^(r^2/4) - (16*r^2)/E^(r^2/4) + 8*r^2*
                     (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/r^3)*
                 (2 - 3*Sin[theta]^2)) + 4.5*^-16*(-48/(E^(r^2/4)*r^3) + 
                (6*((16*r)/E^(r^2/4) - (4*r^3)/E^(r^2/4)))/r^4 - 
                (3*(16/E^(r^2/4) - (16*r^2)/E^(r^2/4) + 8*r^2*
                    (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + 
                ((-40*r)/E^(r^2/4) + (8*r^3)/E^(r^2/4) + 16*r*
                   (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 8*r^2*
                   (r/(2*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) - 
                   (4*r^3)/E^(r^2/4)))/r^5 + (6*(16/E^(r^2/4) - (16*r^2)/
                    E^(r^2/4) + 8*r^2*(-1/2*1/E^(r^2/4) + r^2/
                      (4*E^(r^2/4)))))/r^4 - (3*((-40*r)/E^(r^2/4) + 
                   (8*r^3)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + 
                     r^2/(4*E^(r^2/4))) + 8*r^2*(r/(2*E^(r^2/4)) - 
                     (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2)))/r^3 + 
                (-32/E^(r^2/4) + (32*r^2)/E^(r^2/4) + 32*(-1/2*1/E^(r^2/4) + 
                    r^2/(4*E^(r^2/4))) - 16*r^2*(-1/2*1/E^(r^2/4) + 
                    r^2/(4*E^(r^2/4))) + 32*r*(r/(2*E^(r^2/4)) - 
                    (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 
                  8*r^2*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - 
                    (r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/
                          (4*E^(r^2/4))))/2))/2))/r^2)*Sin[2*theta]^2))/
           (2*r^2*(-9.*^-16*(-48/(E^(r^2/4)*r^3) + (6*((16*r)/E^(r^2/4) - 
                    (4*r^3)/E^(r^2/4)))/r^4 - (3*(16/E^(r^2/4) - (16*r^2)/
                     E^(r^2/4) + 8*r^2*(-1/2*1/E^(r^2/4) + r^2/
                       (4*E^(r^2/4)))))/r^3 + ((-40*r)/E^(r^2/4) + 
                   (8*r^3)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + 
                     r^2/(4*E^(r^2/4))) + 8*r^2*(r/(2*E^(r^2/4)) - 
                     (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2))/r^2)^
                2*Cos[theta]^2*Sin[theta]^2 + (1 - 3.0000000000000004*^-8*
                 (24/(E^(r^2/4)*r^3) - (3*((16*r)/E^(r^2/4) - (4*r^3)/
                      E^(r^2/4)))/r^4 + (16/E^(r^2/4) - (16*r^2)/E^(r^2/4) + 
                    8*r^2*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/r^3) + 
                7.500000000000001*^-9*(168/(E^(r^2/4)*r^3) - 
                  (21*((16*r)/E^(r^2/4) - (4*r^3)/E^(r^2/4)))/r^4 + 
                  (9*(16/E^(r^2/4) - (16*r^2)/E^(r^2/4) + 8*r^2*
                      (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 - 
                  (2*((-40*r)/E^(r^2/4) + (8*r^3)/E^(r^2/4) + 16*r*
                      (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 8*r^2*
                      (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/
                          (4*E^(r^2/4))))/2)))/r^2 + (-32/E^(r^2/4) + 
                    (32*r^2)/E^(r^2/4) + 32*(-1/2*1/E^(r^2/4) + r^2/
                       (4*E^(r^2/4))) - 16*r^2*(-1/2*1/E^(r^2/4) + 
                      r^2/(4*E^(r^2/4))) + 32*r*(r/(2*E^(r^2/4)) - 
                      (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 
                    8*r^2*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - 
                      (r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/
                          (4*E^(r^2/4))))/2))/2))/r)*Sin[theta]^2)*(1 + 
                3.0000000000000004*^-8*(24/(E^(r^2/4)*r^3) - 
                  (3*((16*r)/E^(r^2/4) - (4*r^3)/E^(r^2/4)))/r^4 + 
                  (16/E^(r^2/4) - (16*r^2)/E^(r^2/4) + 8*r^2*
                     (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/r^3)*
                 (2 - 3*Sin[theta]^2)))^2)))/(Sqrt[2]*r) + 
     (-3.0000000000000004*^-8*r*(-48/(E^(r^2/4)*r^3) + 
         (6*((16*r)/E^(r^2/4) - (4*r^3)/E^(r^2/4)))/r^4 - 
         (3*(16/E^(r^2/4) - (16*r^2)/E^(r^2/4) + 8*r^2*(-1/2*1/E^(r^2/4) + 
              r^2/(4*E^(r^2/4)))))/r^3 + ((-40*r)/E^(r^2/4) + 
           (8*r^3)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 
           8*r^2*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + 
                r^2/(4*E^(r^2/4))))/2))/r^2)*Cos[theta]*Sin[theta]*
        ((3.0000000000000004*^-16*r*Cos[theta]*Sin[theta]*
           (-9.*^-8*(-48/(E^(r^2/4)*r^3) + (6*((16*r)/E^(r^2/4) - 
                 (4*r^3)/E^(r^2/4)))/r^4 - (3*(16/E^(r^2/4) - (16*r^2)/
                  E^(r^2/4) + 8*r^2*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/
               r^3 + ((-40*r)/E^(r^2/4) + (8*r^3)/E^(r^2/4) + 
                16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 
                8*r^2*(r/(2*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) - 
                 (4*r^3)/E^(r^2/4)))/r^5 + (6*(16/E^(r^2/4) - (16*r^2)/
                  E^(r^2/4) + 8*r^2*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/
               r^4 - (3*((-40*r)/E^(r^2/4) + (8*r^3)/E^(r^2/4) + 
                 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 
                 8*r^2*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + 
                      r^2/(4*E^(r^2/4))))/2)))/r^3 + (-32/E^(r^2/4) + 
                (32*r^2)/E^(r^2/4) + 32*(-1/2*1/E^(r^2/4) + 
                  r^2/(4*E^(r^2/4))) - 16*r^2*(-1/2*1/E^(r^2/4) + 
                  r^2/(4*E^(r^2/4))) + 32*r*(r/(2*E^(r^2/4)) - 
                  (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 
                8*r^2*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - 
                  (r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/
                         (4*E^(r^2/4))))/2))/2))/r^2)*Cos[theta]^2*
             Sin[theta]^2 - (3*((3*((16*r)/E^(r^2/4) - (4*r^3)/E^(r^2/4)))/
                r^5 - (3*(16/E^(r^2/4) - (16*r^2)/E^(r^2/4) + 8*r^2*
                   (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^4 + 
               ((-40*r)/E^(r^2/4) + (8*r^3)/E^(r^2/4) + 16*r*
                  (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 8*r^2*
                  (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/
                       (4*E^(r^2/4))))/2))/r^3)*(1 + 3*Cos[2*theta])*
              (-1 + 3.0000000000000004*^-8*(24/(E^(r^2/4)*r^3) - 
                 (3*((16*r)/E^(r^2/4) - (4*r^3)/E^(r^2/4)))/r^4 + 
                 (16/E^(r^2/4) - (16*r^2)/E^(r^2/4) + 8*r^2*
                    (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/r^3) - 
               7.500000000000001*^-9*(168/(E^(r^2/4)*r^3) - 
                 (21*((16*r)/E^(r^2/4) - (4*r^3)/E^(r^2/4)))/r^4 + 
                 (9*(16/E^(r^2/4) - (16*r^2)/E^(r^2/4) + 8*r^2*
                     (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 - 
                 (2*((-40*r)/E^(r^2/4) + (8*r^3)/E^(r^2/4) + 16*r*
                     (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 8*r^2*
                     (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/
                          (4*E^(r^2/4))))/2)))/r^2 + (-32/E^(r^2/4) + 
                   (32*r^2)/E^(r^2/4) + 32*(-1/2*1/E^(r^2/4) + r^2/
                      (4*E^(r^2/4))) - 16*r^2*(-1/2*1/E^(r^2/4) + 
                     r^2/(4*E^(r^2/4))) + 32*r*(r/(2*E^(r^2/4)) - 
                     (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 
                   8*r^2*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - 
                     (r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/
                          (4*E^(r^2/4))))/2))/2))/r)*Sin[theta]^2))/2)*
           (((-6*((16*r)/E^(r^2/4) - (4*r^3)/E^(r^2/4)))/r^5 + 
              (6*(16/E^(r^2/4) - (16*r^2)/E^(r^2/4) + 8*r^2*
                  (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^4 - 
              (3*((-40*r)/E^(r^2/4) + (8*r^3)/E^(r^2/4) + 16*r*
                  (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 8*r^2*
                  (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/
                       (4*E^(r^2/4))))/2)))/r^3 + (-32/E^(r^2/4) + 
                (32*r^2)/E^(r^2/4) + 32*(-1/2*1/E^(r^2/4) + 
                  r^2/(4*E^(r^2/4))) - 16*r^2*(-1/2*1/E^(r^2/4) + 
                  r^2/(4*E^(r^2/4))) + 32*r*(r/(2*E^(r^2/4)) - 
                  (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 
                8*r^2*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - 
                  (r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/
                         (4*E^(r^2/4))))/2))/2))/r^2)*
             (1 - 3.0000000000000004*^-8*(24/(E^(r^2/4)*r^3) - 
                (3*((16*r)/E^(r^2/4) - (4*r^3)/E^(r^2/4)))/r^4 + 
                (16/E^(r^2/4) - (16*r^2)/E^(r^2/4) + 8*r^2*
                   (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/r^3) + 
              7.500000000000001*^-9*(168/(E^(r^2/4)*r^3) - 
                (21*((16*r)/E^(r^2/4) - (4*r^3)/E^(r^2/4)))/r^4 + 
                (9*(16/E^(r^2/4) - (16*r^2)/E^(r^2/4) + 8*r^2*
                    (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 - 
                (2*((-40*r)/E^(r^2/4) + (8*r^3)/E^(r^2/4) + 16*r*
                    (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 8*r^2*
                    (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/
                         (4*E^(r^2/4))))/2)))/r^2 + (-32/E^(r^2/4) + 
                  (32*r^2)/E^(r^2/4) + 32*(-1/2*1/E^(r^2/4) + r^2/
                     (4*E^(r^2/4))) - 16*r^2*(-1/2*1/E^(r^2/4) + 
                    r^2/(4*E^(r^2/4))) + 32*r*(r/(2*E^(r^2/4)) - 
                    (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 
                  8*r^2*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - 
                    (r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/
                          (4*E^(r^2/4))))/2))/2))/r)*Sin[theta]^2) + 
            1.*^-8*(-48/(E^(r^2/4)*r^3) + (6*((16*r)/E^(r^2/4) - 
                 (4*r^3)/E^(r^2/4)))/r^4 - (3*(16/E^(r^2/4) - (16*r^2)/
                  E^(r^2/4) + 8*r^2*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/
               r^3 + ((-40*r)/E^(r^2/4) + (8*r^3)/E^(r^2/4) + 
                16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 
                8*r^2*(r/(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) - (4*r^3)/E^(r^2/4)))/r^5 - 
                (3*(16/E^(r^2/4) - (16*r^2)/E^(r^2/4) + 8*r^2*
                    (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^4 + 
                ((-40*r)/E^(r^2/4) + (8*r^3)/E^(r^2/4) + 16*r*
                   (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 8*r^2*
                   (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/
                        (4*E^(r^2/4))))/2))/r^3) - 
              (3*((21*((16*r)/E^(r^2/4) - (4*r^3)/E^(r^2/4)))/r^5 - 
                 (21*(16/E^(r^2/4) - (16*r^2)/E^(r^2/4) + 8*r^2*
                     (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^4 + 
                 (9*((-40*r)/E^(r^2/4) + (8*r^3)/E^(r^2/4) + 16*r*
                     (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 8*r^2*
                     (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/
                          (4*E^(r^2/4))))/2)))/r^3 - (2*(-32/E^(r^2/4) + 
                    (32*r^2)/E^(r^2/4) + 32*(-1/2*1/E^(r^2/4) + r^2/
                       (4*E^(r^2/4))) - 16*r^2*(-1/2*1/E^(r^2/4) + 
                      r^2/(4*E^(r^2/4))) + 32*r*(r/(2*E^(r^2/4)) - 
                      (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 
                    8*r^2*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - 
                      (r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/
                          (4*E^(r^2/4))))/2))/2)))/r^2 + ((80*r)/E^(r^2/4) - 
                   (16*r^3)/E^(r^2/4) - 32*r*(-1/2*1/E^(r^2/4) + 
                     r^2/(4*E^(r^2/4))) + 64*(r/(2*E^(r^2/4)) - 
                     (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) - 
                   16*r^2*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + 
                        r^2/(4*E^(r^2/4))))/2) + 32*r*(1/(2*E^(r^2/4)) - 
                     r^2/(4*E^(r^2/4)) + (1/(2*E^(r^2/4)) - r^2/
                        (4*E^(r^2/4)))/2 - (r*((3*r)/(4*E^(r^2/4)) - 
                        r^3/(8*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - 
                     (3*r^2)/(8*E^(r^2/4)) - (r*(r/(2*E^(r^2/4)) - 
                        (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2))/2) + 
                   8*r^2*(-1/4*r/E^(r^2/4) + (r*(-1/2*1/E^(r^2/4) + 
                        r^2/(4*E^(r^2/4))))/4 + (3*(-1/2*r/E^(r^2/4) + 
                        (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2))/2 - 
                     (r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - 
                        (r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/
                          (4*E^(r^2/4))))/2))/2))/2))/r)*Sin[theta]^2)/4)))/
          (2 - 9.*^-16*(24/(E^(r^2/4)*r^3) - (3*((16*r)/E^(r^2/4) - 
                  (4*r^3)/E^(r^2/4)))/r^4 + (16/E^(r^2/4) - (16*r^2)/
                  E^(r^2/4) + 8*r^2*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/
                r^3)^2*(1 + 3*Cos[2*theta]) + 1.5000000000000002*^-8*
             (168/(E^(r^2/4)*r^3) - (21*((16*r)/E^(r^2/4) - (4*r^3)/
                  E^(r^2/4)))/r^4 + (9*(16/E^(r^2/4) - (16*r^2)/E^(r^2/4) + 
                 8*r^2*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 - 
              (2*((-40*r)/E^(r^2/4) + (8*r^3)/E^(r^2/4) + 16*r*
                  (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 8*r^2*
                  (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/
                       (4*E^(r^2/4))))/2)))/r^2 + (-32/E^(r^2/4) + 
                (32*r^2)/E^(r^2/4) + 32*(-1/2*1/E^(r^2/4) + 
                  r^2/(4*E^(r^2/4))) - 16*r^2*(-1/2*1/E^(r^2/4) + 
                  r^2/(4*E^(r^2/4))) + 32*r*(r/(2*E^(r^2/4)) - 
                  (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 
                8*r^2*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - 
                  (r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/
                         (4*E^(r^2/4))))/2))/2))/r)*Sin[theta]^2 + 
            3.0000000000000004*^-8*(24/(E^(r^2/4)*r^3) - 
              (3*((16*r)/E^(r^2/4) - (4*r^3)/E^(r^2/4)))/r^4 + 
              (16/E^(r^2/4) - (16*r^2)/E^(r^2/4) + 8*r^2*(-1/2*1/E^(r^2/4) + 
                  r^2/(4*E^(r^2/4))))/r^3)*(-1 + 3*Cos[2*theta] + 
              7.500000000000001*^-9*(168/(E^(r^2/4)*r^3) - 
                (21*((16*r)/E^(r^2/4) - (4*r^3)/E^(r^2/4)))/r^4 + 
                (9*(16/E^(r^2/4) - (16*r^2)/E^(r^2/4) + 8*r^2*
                    (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 - 
                (2*((-40*r)/E^(r^2/4) + (8*r^3)/E^(r^2/4) + 16*r*
                    (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 8*r^2*
                    (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/
                         (4*E^(r^2/4))))/2)))/r^2 + (-32/E^(r^2/4) + 
                  (32*r^2)/E^(r^2/4) + 32*(-1/2*1/E^(r^2/4) + r^2/
                     (4*E^(r^2/4))) - 16*r^2*(-1/2*1/E^(r^2/4) + 
                    r^2/(4*E^(r^2/4))) + 32*r*(r/(2*E^(r^2/4)) - 
                    (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 
                  8*r^2*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - 
                    (r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/
                          (4*E^(r^2/4))))/2))/2))/r)*(1 + 3*Cos[2*theta])*
               Sin[theta]^2) - 4.5*^-16*(-48/(E^(r^2/4)*r^3) + 
               (6*((16*r)/E^(r^2/4) - (4*r^3)/E^(r^2/4)))/r^4 - 
               (3*(16/E^(r^2/4) - (16*r^2)/E^(r^2/4) + 8*r^2*
                   (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + 
               ((-40*r)/E^(r^2/4) + (8*r^3)/E^(r^2/4) + 16*r*
                  (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 8*r^2*
                  (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/
                       (4*E^(r^2/4))))/2))/r^2)^2*Sin[2*theta]^2)^2 + 
         (3.0000000000000004*^-16*r*Cos[theta]*Sin[theta]*
           (((-6*((16*r)/E^(r^2/4) - (4*r^3)/E^(r^2/4)))/r^5 + 
              (6*(16/E^(r^2/4) - (16*r^2)/E^(r^2/4) + 8*r^2*
                  (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^4 - 
              (3*((-40*r)/E^(r^2/4) + (8*r^3)/E^(r^2/4) + 16*r*
                  (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 8*r^2*
                  (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/
                       (4*E^(r^2/4))))/2)))/r^3 + (-32/E^(r^2/4) + 
                (32*r^2)/E^(r^2/4) + 32*(-1/2*1/E^(r^2/4) + 
                  r^2/(4*E^(r^2/4))) - 16*r^2*(-1/2*1/E^(r^2/4) + 
                  r^2/(4*E^(r^2/4))) + 32*r*(r/(2*E^(r^2/4)) - 
                  (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 
                8*r^2*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - 
                  (r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/
                         (4*E^(r^2/4))))/2))/2))/r^2)*
             (1 - 3.0000000000000004*^-8*(24/(E^(r^2/4)*r^3) - 
                (3*((16*r)/E^(r^2/4) - (4*r^3)/E^(r^2/4)))/r^4 + 
                (16/E^(r^2/4) - (16*r^2)/E^(r^2/4) + 8*r^2*
                   (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/r^3) + 
              7.500000000000001*^-9*(168/(E^(r^2/4)*r^3) - 
                (21*((16*r)/E^(r^2/4) - (4*r^3)/E^(r^2/4)))/r^4 + 
                (9*(16/E^(r^2/4) - (16*r^2)/E^(r^2/4) + 8*r^2*
                    (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 - 
                (2*((-40*r)/E^(r^2/4) + (8*r^3)/E^(r^2/4) + 16*r*
                    (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 8*r^2*
                    (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/
                         (4*E^(r^2/4))))/2)))/r^2 + (-32/E^(r^2/4) + 
                  (32*r^2)/E^(r^2/4) + 32*(-1/2*1/E^(r^2/4) + r^2/
                     (4*E^(r^2/4))) - 16*r^2*(-1/2*1/E^(r^2/4) + 
                    r^2/(4*E^(r^2/4))) + 32*r*(r/(2*E^(r^2/4)) - 
                    (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 
                  8*r^2*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - 
                    (r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/
                          (4*E^(r^2/4))))/2))/2))/r)*Sin[theta]^2) + 
            1.*^-8*(-48/(E^(r^2/4)*r^3) + (6*((16*r)/E^(r^2/4) - 
                 (4*r^3)/E^(r^2/4)))/r^4 - (3*(16/E^(r^2/4) - (16*r^2)/
                  E^(r^2/4) + 8*r^2*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/
               r^3 + ((-40*r)/E^(r^2/4) + (8*r^3)/E^(r^2/4) + 
                16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 
                8*r^2*(r/(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) - (4*r^3)/E^(r^2/4)))/r^5 - 
                (3*(16/E^(r^2/4) - (16*r^2)/E^(r^2/4) + 8*r^2*
                    (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^4 + 
                ((-40*r)/E^(r^2/4) + (8*r^3)/E^(r^2/4) + 16*r*
                   (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 8*r^2*
                   (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/
                        (4*E^(r^2/4))))/2))/r^3) - 
              (3*((21*((16*r)/E^(r^2/4) - (4*r^3)/E^(r^2/4)))/r^5 - 
                 (21*(16/E^(r^2/4) - (16*r^2)/E^(r^2/4) + 8*r^2*
                     (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^4 + 
                 (9*((-40*r)/E^(r^2/4) + (8*r^3)/E^(r^2/4) + 16*r*
                     (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 8*r^2*
                     (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/
                          (4*E^(r^2/4))))/2)))/r^3 - (2*(-32/E^(r^2/4) + 
                    (32*r^2)/E^(r^2/4) + 32*(-1/2*1/E^(r^2/4) + r^2/
                       (4*E^(r^2/4))) - 16*r^2*(-1/2*1/E^(r^2/4) + 
                      r^2/(4*E^(r^2/4))) + 32*r*(r/(2*E^(r^2/4)) - 
                      (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 
                    8*r^2*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - 
                      (r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/
                          (4*E^(r^2/4))))/2))/2)))/r^2 + ((80*r)/E^(r^2/4) - 
                   (16*r^3)/E^(r^2/4) - 32*r*(-1/2*1/E^(r^2/4) + 
                     r^2/(4*E^(r^2/4))) + 64*(r/(2*E^(r^2/4)) - 
                     (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) - 
                   16*r^2*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + 
                        r^2/(4*E^(r^2/4))))/2) + 32*r*(1/(2*E^(r^2/4)) - 
                     r^2/(4*E^(r^2/4)) + (1/(2*E^(r^2/4)) - r^2/
                        (4*E^(r^2/4)))/2 - (r*((3*r)/(4*E^(r^2/4)) - 
                        r^3/(8*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - 
                     (3*r^2)/(8*E^(r^2/4)) - (r*(r/(2*E^(r^2/4)) - 
                        (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2))/2) + 
                   8*r^2*(-1/4*r/E^(r^2/4) + (r*(-1/2*1/E^(r^2/4) + 
                        r^2/(4*E^(r^2/4))))/4 + (3*(-1/2*r/E^(r^2/4) + 
                        (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2))/2 - 
                     (r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - 
                        (r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/
                          (4*E^(r^2/4))))/2))/2))/2))/r)*Sin[theta]^2)/4))*
           ((3*((3*((16*r)/E^(r^2/4) - (4*r^3)/E^(r^2/4)))/r^5 - 
               (3*(16/E^(r^2/4) - (16*r^2)/E^(r^2/4) + 8*r^2*
                   (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^4 + 
               ((-40*r)/E^(r^2/4) + (8*r^3)/E^(r^2/4) + 16*r*
                  (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 8*r^2*
                  (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/
                       (4*E^(r^2/4))))/2))/r^3)*(2 + 3.0000000000000004*^-8*
                (24/(E^(r^2/4)*r^3) - (3*((16*r)/E^(r^2/4) - (4*r^3)/
                     E^(r^2/4)))/r^4 + (16/E^(r^2/4) - (16*r^2)/E^(r^2/4) + 
                   8*r^2*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/r^3)*
                (1 + 3*Cos[2*theta])))/2 + 3*Sin[theta]^2*
             (3.0000000000000004*^-8*(-48/(E^(r^2/4)*r^3) + 
                (6*((16*r)/E^(r^2/4) - (4*r^3)/E^(r^2/4)))/r^4 - 
                (3*(16/E^(r^2/4) - (16*r^2)/E^(r^2/4) + 8*r^2*
                    (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + 
                ((-40*r)/E^(r^2/4) + (8*r^3)/E^(r^2/4) + 16*r*
                   (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 8*r^2*
                   (r/(2*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) - 
                   (4*r^3)/E^(r^2/4)))/r^5 + (6*(16/E^(r^2/4) - (16*r^2)/
                    E^(r^2/4) + 8*r^2*(-1/2*1/E^(r^2/4) + r^2/
                      (4*E^(r^2/4)))))/r^4 - (3*((-40*r)/E^(r^2/4) + 
                   (8*r^3)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + 
                     r^2/(4*E^(r^2/4))) + 8*r^2*(r/(2*E^(r^2/4)) - 
                     (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2)))/r^3 + 
                (-32/E^(r^2/4) + (32*r^2)/E^(r^2/4) + 32*(-1/2*1/E^(r^2/4) + 
                    r^2/(4*E^(r^2/4))) - 16*r^2*(-1/2*1/E^(r^2/4) + 
                    r^2/(4*E^(r^2/4))) + 32*r*(r/(2*E^(r^2/4)) - 
                    (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 
                  8*r^2*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - 
                    (r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/
                          (4*E^(r^2/4))))/2))/2))/r^2)*Cos[theta]^2 + 
              (((21*((16*r)/E^(r^2/4) - (4*r^3)/E^(r^2/4)))/r^5 - 
                 (21*(16/E^(r^2/4) - (16*r^2)/E^(r^2/4) + 8*r^2*
                     (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^4 + 
                 (9*((-40*r)/E^(r^2/4) + (8*r^3)/E^(r^2/4) + 16*r*
                     (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 8*r^2*
                     (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/
                          (4*E^(r^2/4))))/2)))/r^3 - (2*(-32/E^(r^2/4) + 
                    (32*r^2)/E^(r^2/4) + 32*(-1/2*1/E^(r^2/4) + r^2/
                       (4*E^(r^2/4))) - 16*r^2*(-1/2*1/E^(r^2/4) + 
                      r^2/(4*E^(r^2/4))) + 32*r*(r/(2*E^(r^2/4)) - 
                      (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 
                    8*r^2*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - 
                      (r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/
                          (4*E^(r^2/4))))/2))/2)))/r^2 + ((80*r)/E^(r^2/4) - 
                   (16*r^3)/E^(r^2/4) - 32*r*(-1/2*1/E^(r^2/4) + 
                     r^2/(4*E^(r^2/4))) + 64*(r/(2*E^(r^2/4)) - 
                     (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) - 
                   16*r^2*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + 
                        r^2/(4*E^(r^2/4))))/2) + 32*r*(1/(2*E^(r^2/4)) - 
                     r^2/(4*E^(r^2/4)) + (1/(2*E^(r^2/4)) - r^2/
                        (4*E^(r^2/4)))/2 - (r*((3*r)/(4*E^(r^2/4)) - 
                        r^3/(8*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - 
                     (3*r^2)/(8*E^(r^2/4)) - (r*(r/(2*E^(r^2/4)) - 
                        (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2))/2) + 
                   8*r^2*(-1/4*r/E^(r^2/4) + (r*(-1/2*1/E^(r^2/4) + 
                        r^2/(4*E^(r^2/4))))/4 + (3*(-1/2*r/E^(r^2/4) + 
                        (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2))/2 - 
                     (r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - 
                        (r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/
                          (4*E^(r^2/4))))/2))/2))/2))/r)*(-1 + 
                 3.0000000000000004*^-8*(24/(E^(r^2/4)*r^3) - 
                   (3*((16*r)/E^(r^2/4) - (4*r^3)/E^(r^2/4)))/r^4 + 
                   (16/E^(r^2/4) - (16*r^2)/E^(r^2/4) + 8*r^2*
                      (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/r^3)*
                  (-2 + 3*Sin[theta]^2)))/4)))/
          ((2 - 9.*^-16*(24/(E^(r^2/4)*r^3) - (3*((16*r)/E^(r^2/4) - 
                  (4*r^3)/E^(r^2/4)))/r^4 + (16/E^(r^2/4) - (16*r^2)/
                  E^(r^2/4) + 8*r^2*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/
                r^3)^2*(1 + 3*Cos[2*theta]) + 1.5000000000000002*^-8*
             (168/(E^(r^2/4)*r^3) - (21*((16*r)/E^(r^2/4) - (4*r^3)/
                  E^(r^2/4)))/r^4 + (9*(16/E^(r^2/4) - (16*r^2)/E^(r^2/4) + 
                 8*r^2*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 - 
              (2*((-40*r)/E^(r^2/4) + (8*r^3)/E^(r^2/4) + 16*r*
                  (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 8*r^2*
                  (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/
                       (4*E^(r^2/4))))/2)))/r^2 + (-32/E^(r^2/4) + 
                (32*r^2)/E^(r^2/4) + 32*(-1/2*1/E^(r^2/4) + 
                  r^2/(4*E^(r^2/4))) - 16*r^2*(-1/2*1/E^(r^2/4) + 
                  r^2/(4*E^(r^2/4))) + 32*r*(r/(2*E^(r^2/4)) - 
                  (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 
                8*r^2*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - 
                  (r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/
                         (4*E^(r^2/4))))/2))/2))/r)*Sin[theta]^2 + 
            3.0000000000000004*^-8*(24/(E^(r^2/4)*r^3) - 
              (3*((16*r)/E^(r^2/4) - (4*r^3)/E^(r^2/4)))/r^4 + 
              (16/E^(r^2/4) - (16*r^2)/E^(r^2/4) + 8*r^2*(-1/2*1/E^(r^2/4) + 
                  r^2/(4*E^(r^2/4))))/r^3)*(-1 + 3*Cos[2*theta] + 
              7.500000000000001*^-9*(168/(E^(r^2/4)*r^3) - 
                (21*((16*r)/E^(r^2/4) - (4*r^3)/E^(r^2/4)))/r^4 + 
                (9*(16/E^(r^2/4) - (16*r^2)/E^(r^2/4) + 8*r^2*
                    (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 - 
                (2*((-40*r)/E^(r^2/4) + (8*r^3)/E^(r^2/4) + 16*r*
                    (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 8*r^2*
                    (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/
                         (4*E^(r^2/4))))/2)))/r^2 + (-32/E^(r^2/4) + 
                  (32*r^2)/E^(r^2/4) + 32*(-1/2*1/E^(r^2/4) + r^2/
                     (4*E^(r^2/4))) - 16*r^2*(-1/2*1/E^(r^2/4) + 
                    r^2/(4*E^(r^2/4))) + 32*r*(r/(2*E^(r^2/4)) - 
                    (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 
                  8*r^2*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - 
                    (r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/
                          (4*E^(r^2/4))))/2))/2))/r)*(1 + 3*Cos[2*theta])*
               Sin[theta]^2) - 4.5*^-16*(-48/(E^(r^2/4)*r^3) + 
               (6*((16*r)/E^(r^2/4) - (4*r^3)/E^(r^2/4)))/r^4 - 
               (3*(16/E^(r^2/4) - (16*r^2)/E^(r^2/4) + 8*r^2*
                   (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + 
               ((-40*r)/E^(r^2/4) + (8*r^3)/E^(r^2/4) + 16*r*
                  (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 8*r^2*
                  (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/
                       (4*E^(r^2/4))))/2))/r^2)^2*Sin[2*theta]^2)*
           (-2 + 9.*^-16*(24/(E^(r^2/4)*r^3) - (3*((16*r)/E^(r^2/4) - 
                  (4*r^3)/E^(r^2/4)))/r^4 + (16/E^(r^2/4) - (16*r^2)/
                  E^(r^2/4) + 8*r^2*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/
                r^3)^2*(1 + 3*Cos[2*theta]) - 1.5000000000000002*^-8*
             (168/(E^(r^2/4)*r^3) - (21*((16*r)/E^(r^2/4) - (4*r^3)/
                  E^(r^2/4)))/r^4 + (9*(16/E^(r^2/4) - (16*r^2)/E^(r^2/4) + 
                 8*r^2*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 - 
              (2*((-40*r)/E^(r^2/4) + (8*r^3)/E^(r^2/4) + 16*r*
                  (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 8*r^2*
                  (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/
                       (4*E^(r^2/4))))/2)))/r^2 + (-32/E^(r^2/4) + 
                (32*r^2)/E^(r^2/4) + 32*(-1/2*1/E^(r^2/4) + 
                  r^2/(4*E^(r^2/4))) - 16*r^2*(-1/2*1/E^(r^2/4) + 
                  r^2/(4*E^(r^2/4))) + 32*r*(r/(2*E^(r^2/4)) - 
                  (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 
                8*r^2*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - 
                  (r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/
                         (4*E^(r^2/4))))/2))/2))/r)*Sin[theta]^2 - 
            6.000000000000001*^-8*(24/(E^(r^2/4)*r^3) - 
              (3*((16*r)/E^(r^2/4) - (4*r^3)/E^(r^2/4)))/r^4 + 
              (16/E^(r^2/4) - (16*r^2)/E^(r^2/4) + 8*r^2*(-1/2*1/E^(r^2/4) + 
                  r^2/(4*E^(r^2/4))))/r^3)*(1 - 3*Sin[theta]^2 + 
              3.7500000000000005*^-9*(168/(E^(r^2/4)*r^3) - 
                (21*((16*r)/E^(r^2/4) - (4*r^3)/E^(r^2/4)))/r^4 + 
                (9*(16/E^(r^2/4) - (16*r^2)/E^(r^2/4) + 8*r^2*
                    (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 - 
                (2*((-40*r)/E^(r^2/4) + (8*r^3)/E^(r^2/4) + 16*r*
                    (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 8*r^2*
                    (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/
                         (4*E^(r^2/4))))/2)))/r^2 + (-32/E^(r^2/4) + 
                  (32*r^2)/E^(r^2/4) + 32*(-1/2*1/E^(r^2/4) + r^2/
                     (4*E^(r^2/4))) - 16*r^2*(-1/2*1/E^(r^2/4) + 
                    r^2/(4*E^(r^2/4))) + 32*r*(r/(2*E^(r^2/4)) - 
                    (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 
                  8*r^2*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - 
                    (r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/
                          (4*E^(r^2/4))))/2))/2))/r)*(1 + 3*Cos[2*theta])*
               Sin[theta]^2) + 4.5*^-16*(-48/(E^(r^2/4)*r^3) + 
               (6*((16*r)/E^(r^2/4) - (4*r^3)/E^(r^2/4)))/r^4 - 
               (3*(16/E^(r^2/4) - (16*r^2)/E^(r^2/4) + 8*r^2*
                   (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + 
               ((-40*r)/E^(r^2/4) + (8*r^3)/E^(r^2/4) + 16*r*
                  (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 8*r^2*
                  (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/
                       (4*E^(r^2/4))))/2))/r^2)^2*Sin[2*theta]^2)) - 
         (3.0000000000000004*^-8*r*Cos[theta]*Sin[theta]*
           (-1/2*((((-6*(16/E^(r^2/4) - (16*r^2)/E^(r^2/4) + 8*r^2*
                     (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^5 + 
                 (6*((-40*r)/E^(r^2/4) + (8*r^3)/E^(r^2/4) + 16*r*
                     (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 8*r^2*
                     (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*(-32/E^(r^2/4) + 
                    (32*r^2)/E^(r^2/4) + 32*(-1/2*1/E^(r^2/4) + r^2/
                       (4*E^(r^2/4))) - 16*r^2*(-1/2*1/E^(r^2/4) + 
                      r^2/(4*E^(r^2/4))) + 32*r*(r/(2*E^(r^2/4)) - 
                      (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 
                    8*r^2*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - 
                      (r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/
                          (4*E^(r^2/4))))/2))/2)))/r^3 + ((80*r)/E^(r^2/4) - 
                   (16*r^3)/E^(r^2/4) - 32*r*(-1/2*1/E^(r^2/4) + 
                     r^2/(4*E^(r^2/4))) + 64*(r/(2*E^(r^2/4)) - 
                     (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) - 
                   16*r^2*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + 
                        r^2/(4*E^(r^2/4))))/2) + 32*r*(1/(2*E^(r^2/4)) - 
                     r^2/(4*E^(r^2/4)) + (1/(2*E^(r^2/4)) - r^2/
                        (4*E^(r^2/4)))/2 - (r*((3*r)/(4*E^(r^2/4)) - 
                        r^3/(8*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - 
                     (3*r^2)/(8*E^(r^2/4)) - (r*(r/(2*E^(r^2/4)) - 
                        (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2))/2) + 
                   8*r^2*(-1/4*r/E^(r^2/4) + (r*(-1/2*1/E^(r^2/4) + 
                        r^2/(4*E^(r^2/4))))/4 + (3*(-1/2*r/E^(r^2/4) + 
                        (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2))/2 - 
                     (r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - 
                        (r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/
                          (4*E^(r^2/4))))/2))/2))/2))/r^2)*(-1 + 
                 3.0000000000000004*^-8*(24/(E^(r^2/4)*r^3) - 
                   (3*((16*r)/E^(r^2/4) - (4*r^3)/E^(r^2/4)))/r^4 + 
                   (16/E^(r^2/4) - (16*r^2)/E^(r^2/4) + 8*r^2*
                      (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/r^3) - 
                 7.500000000000001*^-9*(168/(E^(r^2/4)*r^3) - 
                   (21*((16*r)/E^(r^2/4) - (4*r^3)/E^(r^2/4)))/r^4 + 
                   (9*(16/E^(r^2/4) - (16*r^2)/E^(r^2/4) + 8*r^2*
                       (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 - 
                   (2*((-40*r)/E^(r^2/4) + (8*r^3)/E^(r^2/4) + 16*r*
                       (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 8*r^2*
                       (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/
                          (4*E^(r^2/4))))/2)))/r^2 + (-32/E^(r^2/4) + 
                     (32*r^2)/E^(r^2/4) + 32*(-1/2*1/E^(r^2/4) + r^2/
                        (4*E^(r^2/4))) - 16*r^2*(-1/2*1/E^(r^2/4) + 
                       r^2/(4*E^(r^2/4))) + 32*r*(r/(2*E^(r^2/4)) - 
                       (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 
                     8*r^2*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - 
                       (r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/
                          (4*E^(r^2/4))))/2))/2))/r)*Sin[theta]^2) - 1.*^-8*
                (-48/(E^(r^2/4)*r^3) + (6*((16*r)/E^(r^2/4) - (4*r^3)/
                     E^(r^2/4)))/r^4 - (3*(16/E^(r^2/4) - (16*r^2)/
                     E^(r^2/4) + 8*r^2*(-1/2*1/E^(r^2/4) + r^2/
                       (4*E^(r^2/4)))))/r^3 + ((-40*r)/E^(r^2/4) + 
                   (8*r^3)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + 
                     r^2/(4*E^(r^2/4))) + 8*r^2*(r/(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) - (16*r^2)/E^(r^2/4) + 8*r^2*
                       (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^5 - 
                   (3*((-40*r)/E^(r^2/4) + (8*r^3)/E^(r^2/4) + 16*r*
                       (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 8*r^2*
                       (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/
                          (4*E^(r^2/4))))/2)))/r^4 + (-32/E^(r^2/4) + 
                     (32*r^2)/E^(r^2/4) + 32*(-1/2*1/E^(r^2/4) + r^2/
                        (4*E^(r^2/4))) - 16*r^2*(-1/2*1/E^(r^2/4) + 
                       r^2/(4*E^(r^2/4))) + 32*r*(r/(2*E^(r^2/4)) - 
                       (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 
                     8*r^2*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - 
                       (r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/
                          (4*E^(r^2/4))))/2))/2))/r^3) - 
                 (3*((21*(16/E^(r^2/4) - (16*r^2)/E^(r^2/4) + 8*r^2*
                        (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^5 - 
                    (21*((-40*r)/E^(r^2/4) + (8*r^3)/E^(r^2/4) + 16*r*
                        (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 8*r^2*
                        (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*(-32/E^(r^2/4) + 
                       (32*r^2)/E^(r^2/4) + 32*(-1/2*1/E^(r^2/4) + 
                         r^2/(4*E^(r^2/4))) - 16*r^2*(-1/2*1/E^(r^2/4) + 
                         r^2/(4*E^(r^2/4))) + 32*r*(r/(2*E^(r^2/4)) - 
                         (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 
                       8*r^2*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - 
                         (r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/
                          (4*E^(r^2/4))))/2))/2)))/r^3 - 
                    (2*((80*r)/E^(r^2/4) - (16*r^3)/E^(r^2/4) - 32*r*
                        (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 
                       64*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/
                          (4*E^(r^2/4))))/2) - 16*r^2*(r/(2*E^(r^2/4)) - 
                         (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 
                       32*r*(1/(2*E^(r^2/4)) - r^2/(4*E^(r^2/4)) + 
                         (1/(2*E^(r^2/4)) - r^2/(4*E^(r^2/4)))/2 - 
                         (r*((3*r)/(4*E^(r^2/4)) - r^3/(8*E^(r^2/4))))/2) + 
                       16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - 
                         (r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/
                          (4*E^(r^2/4))))/2))/2) + 8*r^2*(-1/4*r/E^(r^2/4) + 
                         (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/4 + 
                         (3*(-1/2*r/E^(r^2/4) + (r*(-1/2*1/E^(r^2/4) + 
                          r^2/(4*E^(r^2/4))))/2))/2 - (r*(3/(4*E^(r^2/4)) - 
                          (3*r^2)/(8*E^(r^2/4)) - (r*(r/(2*E^(r^2/4)) - 
                          (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2))/2))/
                          2)))/r^2 + (64/E^(r^2/4) - (64*r^2)/E^(r^2/4) - 
                      64*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*r^2*
                       (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) - 64*r*
                       (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/
                          (4*E^(r^2/4))))/2) + 64*(1/(2*E^(r^2/4)) - 
                        r^2/(4*E^(r^2/4)) + (1/(2*E^(r^2/4)) - r^2/
                          (4*E^(r^2/4)))/2 - (r*((3*r)/(4*E^(r^2/4)) - 
                          r^3/(8*E^(r^2/4))))/2) + 48*(3/(4*E^(r^2/4)) - 
                        (3*r^2)/(8*E^(r^2/4)) - (r*(r/(2*E^(r^2/4)) - 
                          (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2))/2) - 
                      16*r^2*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - 
                        (r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/
                          (4*E^(r^2/4))))/2))/2) + 32*r*((-5*r)/(4*
                          E^(r^2/4)) + r^3/(8*E^(r^2/4)) + 
                        (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2 - 
                        (r*(3/(4*E^(r^2/4)) - (5*r^2)/(8*E^(r^2/4)) + 
                          (r^2*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/4))/
                         2) + 32*r*(-1/4*r/E^(r^2/4) + (r*(-1/2*1/E^(r^2/4) + 
                          r^2/(4*E^(r^2/4))))/4 + (3*(-1/2*r/E^(r^2/4) + 
                          (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2))/2 - 
                        (r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - 
                          (r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + 
                          r^2/(4*E^(r^2/4))))/2))/2))/2) + 8*r^2*
                       (-1/8*1/E^(r^2/4) + r^2/(16*E^(r^2/4)) + 
                        (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))/2 + 
                        (r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/
                          (4*E^(r^2/4))))/2))/4 + 2*(-3/(4*E^(r^2/4)) + 
                          (3*r^2)/(8*E^(r^2/4)) + (r*(r/(2*E^(r^2/4)) - 
                          (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2))/2) - 
                        (r*(-1/4*r/E^(r^2/4) + (r*(-1/2*1/E^(r^2/4) + 
                          r^2/(4*E^(r^2/4))))/4 + (3*(-1/2*r/E^(r^2/4) + 
                          (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2))/2 - 
                          (r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - 
                          (r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/
                          (4*E^(r^2/4))))/2))/2))/2))/2))/r)*Sin[theta]^2)/
                  4))*(-4 + 1.8*^-15*(24/(E^(r^2/4)*r^3) - 
                  (3*((16*r)/E^(r^2/4) - (4*r^3)/E^(r^2/4)))/r^4 + 
                  (16/E^(r^2/4) - (16*r^2)/E^(r^2/4) + 8*r^2*
                     (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/r^3)^2*
                (1 + 3*Cos[2*theta]) - 3.0000000000000004*^-8*
                (168/(E^(r^2/4)*r^3) - (21*((16*r)/E^(r^2/4) - (4*r^3)/
                     E^(r^2/4)))/r^4 + (9*(16/E^(r^2/4) - (16*r^2)/
                     E^(r^2/4) + 8*r^2*(-1/2*1/E^(r^2/4) + r^2/
                       (4*E^(r^2/4)))))/r^3 - (2*((-40*r)/E^(r^2/4) + 
                    (8*r^3)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + 
                      r^2/(4*E^(r^2/4))) + 8*r^2*(r/(2*E^(r^2/4)) - 
                      (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2)))/r^2 + 
                 (-32/E^(r^2/4) + (32*r^2)/E^(r^2/4) + 32*(-1/2*1/E^(r^2/4) + 
                     r^2/(4*E^(r^2/4))) - 16*r^2*(-1/2*1/E^(r^2/4) + 
                     r^2/(4*E^(r^2/4))) + 32*r*(r/(2*E^(r^2/4)) - 
                     (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 
                   8*r^2*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - 
                     (r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/
                          (4*E^(r^2/4))))/2))/2))/r)*Sin[theta]^2 + 
               1.5000000000000002*^-8*(24/(E^(r^2/4)*r^3) - 
                 (3*((16*r)/E^(r^2/4) - (4*r^3)/E^(r^2/4)))/r^4 + 
                 (16/E^(r^2/4) - (16*r^2)/E^(r^2/4) + 8*r^2*
                    (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/r^3)*
                (4 - 12*Cos[2*theta] - 3.0000000000000004*^-8*
                  (168/(E^(r^2/4)*r^3) - (21*((16*r)/E^(r^2/4) - (4*r^3)/
                       E^(r^2/4)))/r^4 + (9*(16/E^(r^2/4) - (16*r^2)/
                       E^(r^2/4) + 8*r^2*(-1/2*1/E^(r^2/4) + r^2/
                         (4*E^(r^2/4)))))/r^3 - (2*((-40*r)/E^(r^2/4) + 
                      (8*r^3)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + 
                        r^2/(4*E^(r^2/4))) + 8*r^2*(r/(2*E^(r^2/4)) - 
                        (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2)))/r^2 + 
                   (-32/E^(r^2/4) + (32*r^2)/E^(r^2/4) + 32*(-1/2*
                        1/E^(r^2/4) + r^2/(4*E^(r^2/4))) - 16*r^2*
                      (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*r*
                      (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/
                          (4*E^(r^2/4))))/2) + 8*r^2*(3/(4*E^(r^2/4)) - 
                       (3*r^2)/(8*E^(r^2/4)) - (r*(r/(2*E^(r^2/4)) - 
                          (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2))/2))/
                    r)*(1 + 3*Cos[2*theta])*Sin[theta]^2) + 9.*^-16*
                (-48/(E^(r^2/4)*r^3) + (6*((16*r)/E^(r^2/4) - (4*r^3)/
                      E^(r^2/4)))/r^4 - (3*(16/E^(r^2/4) - (16*r^2)/
                      E^(r^2/4) + 8*r^2*(-1/2*1/E^(r^2/4) + r^2/
                        (4*E^(r^2/4)))))/r^3 + ((-40*r)/E^(r^2/4) + 
                    (8*r^3)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + 
                      r^2/(4*E^(r^2/4))) + 8*r^2*(r/(2*E^(r^2/4)) - 
                      (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2))/r^2)^2*
                Sin[2*theta]^2)) + 1.*^-8*(((-6*((16*r)/E^(r^2/4) - 
                   (4*r^3)/E^(r^2/4)))/r^5 + (6*(16/E^(r^2/4) - (16*r^2)/
                    E^(r^2/4) + 8*r^2*(-1/2*1/E^(r^2/4) + r^2/
                      (4*E^(r^2/4)))))/r^4 - (3*((-40*r)/E^(r^2/4) + 
                   (8*r^3)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + 
                     r^2/(4*E^(r^2/4))) + 8*r^2*(r/(2*E^(r^2/4)) - 
                     (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2)))/r^3 + 
                (-32/E^(r^2/4) + (32*r^2)/E^(r^2/4) + 32*(-1/2*1/E^(r^2/4) + 
                    r^2/(4*E^(r^2/4))) - 16*r^2*(-1/2*1/E^(r^2/4) + 
                    r^2/(4*E^(r^2/4))) + 32*r*(r/(2*E^(r^2/4)) - 
                    (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 
                  8*r^2*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - 
                    (r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/
                          (4*E^(r^2/4))))/2))/2))/r^2)*(1 - 
                3.0000000000000004*^-8*(24/(E^(r^2/4)*r^3) - 
                  (3*((16*r)/E^(r^2/4) - (4*r^3)/E^(r^2/4)))/r^4 + 
                  (16/E^(r^2/4) - (16*r^2)/E^(r^2/4) + 8*r^2*
                     (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/r^3) + 
                7.500000000000001*^-9*(168/(E^(r^2/4)*r^3) - 
                  (21*((16*r)/E^(r^2/4) - (4*r^3)/E^(r^2/4)))/r^4 + 
                  (9*(16/E^(r^2/4) - (16*r^2)/E^(r^2/4) + 8*r^2*
                      (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 - 
                  (2*((-40*r)/E^(r^2/4) + (8*r^3)/E^(r^2/4) + 16*r*
                      (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 8*r^2*
                      (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/
                          (4*E^(r^2/4))))/2)))/r^2 + (-32/E^(r^2/4) + 
                    (32*r^2)/E^(r^2/4) + 32*(-1/2*1/E^(r^2/4) + r^2/
                       (4*E^(r^2/4))) - 16*r^2*(-1/2*1/E^(r^2/4) + 
                      r^2/(4*E^(r^2/4))) + 32*r*(r/(2*E^(r^2/4)) - 
                      (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 
                    8*r^2*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - 
                      (r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/
                          (4*E^(r^2/4))))/2))/2))/r)*Sin[theta]^2) + 
              1.*^-8*(-48/(E^(r^2/4)*r^3) + (6*((16*r)/E^(r^2/4) - 
                   (4*r^3)/E^(r^2/4)))/r^4 - (3*(16/E^(r^2/4) - (16*r^2)/
                    E^(r^2/4) + 8*r^2*(-1/2*1/E^(r^2/4) + r^2/
                      (4*E^(r^2/4)))))/r^3 + ((-40*r)/E^(r^2/4) + 
                  (8*r^3)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + 
                    r^2/(4*E^(r^2/4))) + 8*r^2*(r/(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) - (4*r^3)/E^(r^2/4)))/r^5 - 
                  (3*(16/E^(r^2/4) - (16*r^2)/E^(r^2/4) + 8*r^2*
                      (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^4 + 
                  ((-40*r)/E^(r^2/4) + (8*r^3)/E^(r^2/4) + 16*r*
                     (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 8*r^2*
                     (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/
                          (4*E^(r^2/4))))/2))/r^3) - 
                (3*((21*((16*r)/E^(r^2/4) - (4*r^3)/E^(r^2/4)))/r^5 - 
                   (21*(16/E^(r^2/4) - (16*r^2)/E^(r^2/4) + 8*r^2*
                       (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^4 + 
                   (9*((-40*r)/E^(r^2/4) + (8*r^3)/E^(r^2/4) + 16*r*
                       (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 8*r^2*
                       (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/
                          (4*E^(r^2/4))))/2)))/r^3 - (2*(-32/E^(r^2/4) + 
                      (32*r^2)/E^(r^2/4) + 32*(-1/2*1/E^(r^2/4) + r^2/
                         (4*E^(r^2/4))) - 16*r^2*(-1/2*1/E^(r^2/4) + 
                        r^2/(4*E^(r^2/4))) + 32*r*(r/(2*E^(r^2/4)) - 
                        (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 
                      8*r^2*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - 
                        (r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/
                          (4*E^(r^2/4))))/2))/2)))/r^2 + ((80*r)/E^(r^2/4) - 
                     (16*r^3)/E^(r^2/4) - 32*r*(-1/2*1/E^(r^2/4) + 
                       r^2/(4*E^(r^2/4))) + 64*(r/(2*E^(r^2/4)) - 
                       (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) - 
                     16*r^2*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + 
                          r^2/(4*E^(r^2/4))))/2) + 32*r*(1/(2*E^(r^2/4)) - 
                       r^2/(4*E^(r^2/4)) + (1/(2*E^(r^2/4)) - r^2/
                          (4*E^(r^2/4)))/2 - (r*((3*r)/(4*E^(r^2/4)) - 
                          r^3/(8*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - 
                       (3*r^2)/(8*E^(r^2/4)) - (r*(r/(2*E^(r^2/4)) - 
                          (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2))/2) + 
                     8*r^2*(-1/4*r/E^(r^2/4) + (r*(-1/2*1/E^(r^2/4) + 
                          r^2/(4*E^(r^2/4))))/4 + (3*(-1/2*r/E^(r^2/4) + 
                          (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2))/2 - 
                       (r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - 
                          (r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + 
                          r^2/(4*E^(r^2/4))))/2))/2))/2))/r)*Sin[theta]^2)/
                 4))*((3*((21*((16*r)/E^(r^2/4) - (4*r^3)/E^(r^2/4)))/r^5 - 
                 (21*(16/E^(r^2/4) - (16*r^2)/E^(r^2/4) + 8*r^2*
                     (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^4 + 
                 (9*((-40*r)/E^(r^2/4) + (8*r^3)/E^(r^2/4) + 16*r*
                     (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 8*r^2*
                     (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/
                          (4*E^(r^2/4))))/2)))/r^3 - (2*(-32/E^(r^2/4) + 
                    (32*r^2)/E^(r^2/4) + 32*(-1/2*1/E^(r^2/4) + r^2/
                       (4*E^(r^2/4))) - 16*r^2*(-1/2*1/E^(r^2/4) + 
                      r^2/(4*E^(r^2/4))) + 32*r*(r/(2*E^(r^2/4)) - 
                      (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 
                    8*r^2*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - 
                      (r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/
                          (4*E^(r^2/4))))/2))/2)))/r^2 + ((80*r)/E^(r^2/4) - 
                   (16*r^3)/E^(r^2/4) - 32*r*(-1/2*1/E^(r^2/4) + 
                     r^2/(4*E^(r^2/4))) + 64*(r/(2*E^(r^2/4)) - 
                     (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) - 
                   16*r^2*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + 
                        r^2/(4*E^(r^2/4))))/2) + 32*r*(1/(2*E^(r^2/4)) - 
                     r^2/(4*E^(r^2/4)) + (1/(2*E^(r^2/4)) - r^2/
                        (4*E^(r^2/4)))/2 - (r*((3*r)/(4*E^(r^2/4)) - 
                        r^3/(8*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - 
                     (3*r^2)/(8*E^(r^2/4)) - (r*(r/(2*E^(r^2/4)) - 
                        (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2))/2) + 
                   8*r^2*(-1/4*r/E^(r^2/4) + (r*(-1/2*1/E^(r^2/4) + 
                        r^2/(4*E^(r^2/4))))/4 + (3*(-1/2*r/E^(r^2/4) + 
                        (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2))/2 - 
                     (r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - 
                        (r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/
                          (4*E^(r^2/4))))/2))/2))/2))/r)*(2 + 
                 3.0000000000000004*^-8*(24/(E^(r^2/4)*r^3) - 
                   (3*((16*r)/E^(r^2/4) - (4*r^3)/E^(r^2/4)))/r^4 + 
                   (16/E^(r^2/4) - (16*r^2)/E^(r^2/4) + 8*r^2*
                      (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/r^3)*
                  (1 + 3*Cos[2*theta]))*Sin[theta]^2)/4 + 
              3*((3*((16*r)/E^(r^2/4) - (4*r^3)/E^(r^2/4)))/r^5 - 
                (3*(16/E^(r^2/4) - (16*r^2)/E^(r^2/4) + 8*r^2*
                    (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^4 + 
                ((-40*r)/E^(r^2/4) + (8*r^3)/E^(r^2/4) + 16*r*
                   (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 8*r^2*
                   (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/
                        (4*E^(r^2/4))))/2))/r^3)*(-1 + 3*Cos[2*theta] - 
                6.000000000000001*^-8*(24/(E^(r^2/4)*r^3) - 
                  (3*((16*r)/E^(r^2/4) - (4*r^3)/E^(r^2/4)))/r^4 + 
                  (16/E^(r^2/4) - (16*r^2)/E^(r^2/4) + 8*r^2*
                     (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/r^3)*
                 (1 + 3*Cos[2*theta]) + 7.500000000000001*^-9*
                 (168/(E^(r^2/4)*r^3) - (21*((16*r)/E^(r^2/4) - (4*r^3)/
                      E^(r^2/4)))/r^4 + (9*(16/E^(r^2/4) - (16*r^2)/
                      E^(r^2/4) + 8*r^2*(-1/2*1/E^(r^2/4) + r^2/
                        (4*E^(r^2/4)))))/r^3 - (2*((-40*r)/E^(r^2/4) + 
                     (8*r^3)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + 
                       r^2/(4*E^(r^2/4))) + 8*r^2*(r/(2*E^(r^2/4)) - 
                       (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2)))/r^2 + 
                  (-32/E^(r^2/4) + (32*r^2)/E^(r^2/4) + 32*
                     (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) - 16*r^2*
                     (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*r*
                     (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/
                          (4*E^(r^2/4))))/2) + 8*r^2*(3/(4*E^(r^2/4)) - 
                      (3*r^2)/(8*E^(r^2/4)) - (r*(r/(2*E^(r^2/4)) - 
                         (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2))/2))/
                   r)*(1 + 3*Cos[2*theta])*Sin[theta]^2) - 
              9.*^-8*(-48/(E^(r^2/4)*r^3) + (6*((16*r)/E^(r^2/4) - 
                   (4*r^3)/E^(r^2/4)))/r^4 - (3*(16/E^(r^2/4) - (16*r^2)/
                    E^(r^2/4) + 8*r^2*(-1/2*1/E^(r^2/4) + r^2/
                      (4*E^(r^2/4)))))/r^3 + ((-40*r)/E^(r^2/4) + 
                  (8*r^3)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + 
                    r^2/(4*E^(r^2/4))) + 8*r^2*(r/(2*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) - (4*r^3)/E^(r^2/4)))/r^5 + 
                (6*(16/E^(r^2/4) - (16*r^2)/E^(r^2/4) + 8*r^2*
                    (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^4 - 
                (3*((-40*r)/E^(r^2/4) + (8*r^3)/E^(r^2/4) + 16*r*
                    (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 8*r^2*
                    (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/
                         (4*E^(r^2/4))))/2)))/r^3 + (-32/E^(r^2/4) + 
                  (32*r^2)/E^(r^2/4) + 32*(-1/2*1/E^(r^2/4) + r^2/
                     (4*E^(r^2/4))) - 16*r^2*(-1/2*1/E^(r^2/4) + 
                    r^2/(4*E^(r^2/4))) + 32*r*(r/(2*E^(r^2/4)) - 
                    (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 
                  8*r^2*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - 
                    (r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/
                          (4*E^(r^2/4))))/2))/2))/r^2)*Sin[2*theta]^2)))/
          (2 - 9.*^-16*(24/(E^(r^2/4)*r^3) - (3*((16*r)/E^(r^2/4) - 
                  (4*r^3)/E^(r^2/4)))/r^4 + (16/E^(r^2/4) - (16*r^2)/
                  E^(r^2/4) + 8*r^2*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/
                r^3)^2*(1 + 3*Cos[2*theta]) + 1.5000000000000002*^-8*
             (168/(E^(r^2/4)*r^3) - (21*((16*r)/E^(r^2/4) - (4*r^3)/
                  E^(r^2/4)))/r^4 + (9*(16/E^(r^2/4) - (16*r^2)/E^(r^2/4) + 
                 8*r^2*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 - 
              (2*((-40*r)/E^(r^2/4) + (8*r^3)/E^(r^2/4) + 16*r*
                  (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 8*r^2*
                  (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/
                       (4*E^(r^2/4))))/2)))/r^2 + (-32/E^(r^2/4) + 
                (32*r^2)/E^(r^2/4) + 32*(-1/2*1/E^(r^2/4) + 
                  r^2/(4*E^(r^2/4))) - 16*r^2*(-1/2*1/E^(r^2/4) + 
                  r^2/(4*E^(r^2/4))) + 32*r*(r/(2*E^(r^2/4)) - 
                  (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 
                8*r^2*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - 
                  (r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/
                         (4*E^(r^2/4))))/2))/2))/r)*Sin[theta]^2 + 
            3.0000000000000004*^-8*(24/(E^(r^2/4)*r^3) - 
              (3*((16*r)/E^(r^2/4) - (4*r^3)/E^(r^2/4)))/r^4 + 
              (16/E^(r^2/4) - (16*r^2)/E^(r^2/4) + 8*r^2*(-1/2*1/E^(r^2/4) + 
                  r^2/(4*E^(r^2/4))))/r^3)*(-1 + 3*Cos[2*theta] + 
              7.500000000000001*^-9*(168/(E^(r^2/4)*r^3) - 
                (21*((16*r)/E^(r^2/4) - (4*r^3)/E^(r^2/4)))/r^4 + 
                (9*(16/E^(r^2/4) - (16*r^2)/E^(r^2/4) + 8*r^2*
                    (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 - 
                (2*((-40*r)/E^(r^2/4) + (8*r^3)/E^(r^2/4) + 16*r*
                    (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 8*r^2*
                    (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/
                         (4*E^(r^2/4))))/2)))/r^2 + (-32/E^(r^2/4) + 
                  (32*r^2)/E^(r^2/4) + 32*(-1/2*1/E^(r^2/4) + r^2/
                     (4*E^(r^2/4))) - 16*r^2*(-1/2*1/E^(r^2/4) + 
                    r^2/(4*E^(r^2/4))) + 32*r*(r/(2*E^(r^2/4)) - 
                    (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 
                  8*r^2*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - 
                    (r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/
                          (4*E^(r^2/4))))/2))/2))/r)*(1 + 3*Cos[2*theta])*
               Sin[theta]^2) - 4.5*^-16*(-48/(E^(r^2/4)*r^3) + 
               (6*((16*r)/E^(r^2/4) - (4*r^3)/E^(r^2/4)))/r^4 - 
               (3*(16/E^(r^2/4) - (16*r^2)/E^(r^2/4) + 8*r^2*
                   (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + 
               ((-40*r)/E^(r^2/4) + (8*r^3)/E^(r^2/4) + 16*r*
                  (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 8*r^2*
                  (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/
                       (4*E^(r^2/4))))/2))/r^2)^2*Sin[2*theta]^2)^2) + 
       r^2*(1 - 3.0000000000000004*^-8*(24/(E^(r^2/4)*r^3) - 
           (3*((16*r)/E^(r^2/4) - (4*r^3)/E^(r^2/4)))/r^4 + 
           (16/E^(r^2/4) - (16*r^2)/E^(r^2/4) + 8*r^2*(-1/2*1/E^(r^2/4) + r^2/
                (4*E^(r^2/4))))/r^3) + 7.500000000000001*^-9*
          (168/(E^(r^2/4)*r^3) - (21*((16*r)/E^(r^2/4) - (4*r^3)/E^(r^2/4)))/
            r^4 + (9*(16/E^(r^2/4) - (16*r^2)/E^(r^2/4) + 
              8*r^2*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 - 
           (2*((-40*r)/E^(r^2/4) + (8*r^3)/E^(r^2/4) + 
              16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 
              8*r^2*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + 
                   r^2/(4*E^(r^2/4))))/2)))/r^2 + 
           (-32/E^(r^2/4) + (32*r^2)/E^(r^2/4) + 32*(-1/2*1/E^(r^2/4) + r^2/
                (4*E^(r^2/4))) - 16*r^2*(-1/2*1/E^(r^2/4) + r^2/
                (4*E^(r^2/4))) + 32*r*(r/(2*E^(r^2/4)) - 
               (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 
             8*r^2*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - 
               (r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/
                      (4*E^(r^2/4))))/2))/2))/r)*Sin[theta]^2)*
        ((-1.0000000000000001*^-16*
           ((3*((3*((16*r)/E^(r^2/4) - (4*r^3)/E^(r^2/4)))/r^5 - 
                (3*(16/E^(r^2/4) - (16*r^2)/E^(r^2/4) + 8*r^2*
                    (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^4 + 
                ((-40*r)/E^(r^2/4) + (8*r^3)/E^(r^2/4) + 16*r*
                   (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 8*r^2*
                   (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/
                        (4*E^(r^2/4))))/2))/r^3)*(2 + 3.0000000000000004*^-8*
                 (24/(E^(r^2/4)*r^3) - (3*((16*r)/E^(r^2/4) - (4*r^3)/
                      E^(r^2/4)))/r^4 + (16/E^(r^2/4) - (16*r^2)/E^(r^2/4) + 
                    8*r^2*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/r^3)*
                 (1 + 3*Cos[2*theta])))/2 + 3*Sin[theta]^2*
              (3.0000000000000004*^-8*(-48/(E^(r^2/4)*r^3) + 
                 (6*((16*r)/E^(r^2/4) - (4*r^3)/E^(r^2/4)))/r^4 - 
                 (3*(16/E^(r^2/4) - (16*r^2)/E^(r^2/4) + 8*r^2*
                     (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + 
                 ((-40*r)/E^(r^2/4) + (8*r^3)/E^(r^2/4) + 16*r*
                    (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 8*r^2*
                    (r/(2*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) - 
                    (4*r^3)/E^(r^2/4)))/r^5 + (6*(16/E^(r^2/4) - (16*r^2)/
                     E^(r^2/4) + 8*r^2*(-1/2*1/E^(r^2/4) + r^2/
                       (4*E^(r^2/4)))))/r^4 - (3*((-40*r)/E^(r^2/4) + 
                    (8*r^3)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + 
                      r^2/(4*E^(r^2/4))) + 8*r^2*(r/(2*E^(r^2/4)) - 
                      (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2)))/r^3 + 
                 (-32/E^(r^2/4) + (32*r^2)/E^(r^2/4) + 32*(-1/2*1/E^(r^2/4) + 
                     r^2/(4*E^(r^2/4))) - 16*r^2*(-1/2*1/E^(r^2/4) + 
                     r^2/(4*E^(r^2/4))) + 32*r*(r/(2*E^(r^2/4)) - 
                     (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 
                   8*r^2*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - 
                     (r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/
                          (4*E^(r^2/4))))/2))/2))/r^2)*Cos[theta]^2 + 
               (((21*((16*r)/E^(r^2/4) - (4*r^3)/E^(r^2/4)))/r^5 - 
                  (21*(16/E^(r^2/4) - (16*r^2)/E^(r^2/4) + 8*r^2*
                      (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^4 + 
                  (9*((-40*r)/E^(r^2/4) + (8*r^3)/E^(r^2/4) + 16*r*
                      (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 8*r^2*
                      (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/
                          (4*E^(r^2/4))))/2)))/r^3 - (2*(-32/E^(r^2/4) + 
                     (32*r^2)/E^(r^2/4) + 32*(-1/2*1/E^(r^2/4) + r^2/
                        (4*E^(r^2/4))) - 16*r^2*(-1/2*1/E^(r^2/4) + 
                       r^2/(4*E^(r^2/4))) + 32*r*(r/(2*E^(r^2/4)) - 
                       (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 
                     8*r^2*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - 
                       (r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/
                          (4*E^(r^2/4))))/2))/2)))/r^2 + ((80*r)/E^(r^2/4) - 
                    (16*r^3)/E^(r^2/4) - 32*r*(-1/2*1/E^(r^2/4) + 
                      r^2/(4*E^(r^2/4))) + 64*(r/(2*E^(r^2/4)) - 
                      (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) - 
                    16*r^2*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + 
                         r^2/(4*E^(r^2/4))))/2) + 32*r*(1/(2*E^(r^2/4)) - 
                      r^2/(4*E^(r^2/4)) + (1/(2*E^(r^2/4)) - r^2/
                         (4*E^(r^2/4)))/2 - (r*((3*r)/(4*E^(r^2/4)) - 
                         r^3/(8*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - 
                      (3*r^2)/(8*E^(r^2/4)) - (r*(r/(2*E^(r^2/4)) - 
                         (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2))/2) + 
                    8*r^2*(-1/4*r/E^(r^2/4) + (r*(-1/2*1/E^(r^2/4) + 
                         r^2/(4*E^(r^2/4))))/4 + (3*(-1/2*r/E^(r^2/4) + 
                         (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2))/2 - 
                      (r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - 
                         (r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/
                          (4*E^(r^2/4))))/2))/2))/2))/r)*(-1 + 
                  3.0000000000000004*^-8*(24/(E^(r^2/4)*r^3) - 
                    (3*((16*r)/E^(r^2/4) - (4*r^3)/E^(r^2/4)))/r^4 + 
                    (16/E^(r^2/4) - (16*r^2)/E^(r^2/4) + 8*r^2*
                       (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/r^3)*
                   (-2 + 3*Sin[theta]^2)))/4))^2)/
          (-2 + 9.*^-16*(24/(E^(r^2/4)*r^3) - (3*((16*r)/E^(r^2/4) - 
                  (4*r^3)/E^(r^2/4)))/r^4 + (16/E^(r^2/4) - (16*r^2)/
                  E^(r^2/4) + 8*r^2*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/
                r^3)^2*(1 + 3*Cos[2*theta]) - 1.5000000000000002*^-8*
             (168/(E^(r^2/4)*r^3) - (21*((16*r)/E^(r^2/4) - (4*r^3)/
                  E^(r^2/4)))/r^4 + (9*(16/E^(r^2/4) - (16*r^2)/E^(r^2/4) + 
                 8*r^2*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 - 
              (2*((-40*r)/E^(r^2/4) + (8*r^3)/E^(r^2/4) + 16*r*
                  (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 8*r^2*
                  (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/
                       (4*E^(r^2/4))))/2)))/r^2 + (-32/E^(r^2/4) + 
                (32*r^2)/E^(r^2/4) + 32*(-1/2*1/E^(r^2/4) + 
                  r^2/(4*E^(r^2/4))) - 16*r^2*(-1/2*1/E^(r^2/4) + 
                  r^2/(4*E^(r^2/4))) + 32*r*(r/(2*E^(r^2/4)) - 
                  (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 
                8*r^2*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - 
                  (r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/
                         (4*E^(r^2/4))))/2))/2))/r)*Sin[theta]^2 - 
            6.000000000000001*^-8*(24/(E^(r^2/4)*r^3) - 
              (3*((16*r)/E^(r^2/4) - (4*r^3)/E^(r^2/4)))/r^4 + 
              (16/E^(r^2/4) - (16*r^2)/E^(r^2/4) + 8*r^2*(-1/2*1/E^(r^2/4) + 
                  r^2/(4*E^(r^2/4))))/r^3)*(1 - 3*Sin[theta]^2 + 
              3.7500000000000005*^-9*(168/(E^(r^2/4)*r^3) - 
                (21*((16*r)/E^(r^2/4) - (4*r^3)/E^(r^2/4)))/r^4 + 
                (9*(16/E^(r^2/4) - (16*r^2)/E^(r^2/4) + 8*r^2*
                    (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 - 
                (2*((-40*r)/E^(r^2/4) + (8*r^3)/E^(r^2/4) + 16*r*
                    (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 8*r^2*
                    (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/
                         (4*E^(r^2/4))))/2)))/r^2 + (-32/E^(r^2/4) + 
                  (32*r^2)/E^(r^2/4) + 32*(-1/2*1/E^(r^2/4) + r^2/
                     (4*E^(r^2/4))) - 16*r^2*(-1/2*1/E^(r^2/4) + 
                    r^2/(4*E^(r^2/4))) + 32*r*(r/(2*E^(r^2/4)) - 
                    (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 
                  8*r^2*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - 
                    (r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/
                          (4*E^(r^2/4))))/2))/2))/r)*(1 + 3*Cos[2*theta])*
               Sin[theta]^2) + 4.5*^-16*(-48/(E^(r^2/4)*r^3) + 
               (6*((16*r)/E^(r^2/4) - (4*r^3)/E^(r^2/4)))/r^4 - 
               (3*(16/E^(r^2/4) - (16*r^2)/E^(r^2/4) + 8*r^2*
                   (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + 
               ((-40*r)/E^(r^2/4) + (8*r^3)/E^(r^2/4) + 16*r*
                  (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 8*r^2*
                  (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/
                       (4*E^(r^2/4))))/2))/r^2)^2*Sin[2*theta]^2)^2 + 
         (4.5*^-16*Cos[theta]^2*(-3.0000000000000004*^-8*
             ((3*((16*r)/E^(r^2/4) - (4*r^3)/E^(r^2/4)))/r^5 - 
              (3*(16/E^(r^2/4) - (16*r^2)/E^(r^2/4) + 8*r^2*
                  (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^4 + 
              ((-40*r)/E^(r^2/4) + (8*r^3)/E^(r^2/4) + 16*r*
                 (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 8*r^2*
                 (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/
                      (4*E^(r^2/4))))/2))/r^3)*(-48/(E^(r^2/4)*r^3) + 
              (6*((16*r)/E^(r^2/4) - (4*r^3)/E^(r^2/4)))/r^4 - 
              (3*(16/E^(r^2/4) - (16*r^2)/E^(r^2/4) + 8*r^2*
                  (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + 
              ((-40*r)/E^(r^2/4) + (8*r^3)/E^(r^2/4) + 16*r*
                 (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 8*r^2*
                 (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/
                      (4*E^(r^2/4))))/2))/r^2)*(1 + 3*Cos[2*theta]) + 
            ((-6*((16*r)/E^(r^2/4) - (4*r^3)/E^(r^2/4)))/r^5 + 
              (6*(16/E^(r^2/4) - (16*r^2)/E^(r^2/4) + 8*r^2*
                  (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^4 - 
              (3*((-40*r)/E^(r^2/4) + (8*r^3)/E^(r^2/4) + 16*r*
                  (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 8*r^2*
                  (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/
                       (4*E^(r^2/4))))/2)))/r^3 + (-32/E^(r^2/4) + 
                (32*r^2)/E^(r^2/4) + 32*(-1/2*1/E^(r^2/4) + 
                  r^2/(4*E^(r^2/4))) - 16*r^2*(-1/2*1/E^(r^2/4) + 
                  r^2/(4*E^(r^2/4))) + 32*r*(r/(2*E^(r^2/4)) - 
                  (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 
                8*r^2*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - 
                  (r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/
                         (4*E^(r^2/4))))/2))/2))/r^2)*
             (2 + 3.0000000000000004*^-8*(24/(E^(r^2/4)*r^3) - 
                (3*((16*r)/E^(r^2/4) - (4*r^3)/E^(r^2/4)))/r^4 + 
                (16/E^(r^2/4) - (16*r^2)/E^(r^2/4) + 8*r^2*
                   (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/r^3)*(1 + 
                3*Cos[2*theta])))*Sin[theta]^2*
           (((-6*((16*r)/E^(r^2/4) - (4*r^3)/E^(r^2/4)))/r^5 + 
              (6*(16/E^(r^2/4) - (16*r^2)/E^(r^2/4) + 8*r^2*
                  (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^4 - 
              (3*((-40*r)/E^(r^2/4) + (8*r^3)/E^(r^2/4) + 16*r*
                  (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 8*r^2*
                  (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/
                       (4*E^(r^2/4))))/2)))/r^3 + (-32/E^(r^2/4) + 
                (32*r^2)/E^(r^2/4) + 32*(-1/2*1/E^(r^2/4) + 
                  r^2/(4*E^(r^2/4))) - 16*r^2*(-1/2*1/E^(r^2/4) + 
                  r^2/(4*E^(r^2/4))) + 32*r*(r/(2*E^(r^2/4)) - 
                  (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 
                8*r^2*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - 
                  (r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/
                         (4*E^(r^2/4))))/2))/2))/r^2)*
             (1 - 3.0000000000000004*^-8*(24/(E^(r^2/4)*r^3) - 
                (3*((16*r)/E^(r^2/4) - (4*r^3)/E^(r^2/4)))/r^4 + 
                (16/E^(r^2/4) - (16*r^2)/E^(r^2/4) + 8*r^2*
                   (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/r^3) + 
              7.500000000000001*^-9*(168/(E^(r^2/4)*r^3) - 
                (21*((16*r)/E^(r^2/4) - (4*r^3)/E^(r^2/4)))/r^4 + 
                (9*(16/E^(r^2/4) - (16*r^2)/E^(r^2/4) + 8*r^2*
                    (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 - 
                (2*((-40*r)/E^(r^2/4) + (8*r^3)/E^(r^2/4) + 16*r*
                    (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 8*r^2*
                    (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/
                         (4*E^(r^2/4))))/2)))/r^2 + (-32/E^(r^2/4) + 
                  (32*r^2)/E^(r^2/4) + 32*(-1/2*1/E^(r^2/4) + r^2/
                     (4*E^(r^2/4))) - 16*r^2*(-1/2*1/E^(r^2/4) + 
                    r^2/(4*E^(r^2/4))) + 32*r*(r/(2*E^(r^2/4)) - 
                    (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 
                  8*r^2*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - 
                    (r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/
                          (4*E^(r^2/4))))/2))/2))/r)*Sin[theta]^2) + 
            1.*^-8*(-48/(E^(r^2/4)*r^3) + (6*((16*r)/E^(r^2/4) - 
                 (4*r^3)/E^(r^2/4)))/r^4 - (3*(16/E^(r^2/4) - (16*r^2)/
                  E^(r^2/4) + 8*r^2*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/
               r^3 + ((-40*r)/E^(r^2/4) + (8*r^3)/E^(r^2/4) + 
                16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 
                8*r^2*(r/(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) - (4*r^3)/E^(r^2/4)))/r^5 - 
                (3*(16/E^(r^2/4) - (16*r^2)/E^(r^2/4) + 8*r^2*
                    (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^4 + 
                ((-40*r)/E^(r^2/4) + (8*r^3)/E^(r^2/4) + 16*r*
                   (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 8*r^2*
                   (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/
                        (4*E^(r^2/4))))/2))/r^3) - 
              (3*((21*((16*r)/E^(r^2/4) - (4*r^3)/E^(r^2/4)))/r^5 - 
                 (21*(16/E^(r^2/4) - (16*r^2)/E^(r^2/4) + 8*r^2*
                     (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^4 + 
                 (9*((-40*r)/E^(r^2/4) + (8*r^3)/E^(r^2/4) + 16*r*
                     (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 8*r^2*
                     (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/
                          (4*E^(r^2/4))))/2)))/r^3 - (2*(-32/E^(r^2/4) + 
                    (32*r^2)/E^(r^2/4) + 32*(-1/2*1/E^(r^2/4) + r^2/
                       (4*E^(r^2/4))) - 16*r^2*(-1/2*1/E^(r^2/4) + 
                      r^2/(4*E^(r^2/4))) + 32*r*(r/(2*E^(r^2/4)) - 
                      (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 
                    8*r^2*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - 
                      (r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/
                          (4*E^(r^2/4))))/2))/2)))/r^2 + ((80*r)/E^(r^2/4) - 
                   (16*r^3)/E^(r^2/4) - 32*r*(-1/2*1/E^(r^2/4) + 
                     r^2/(4*E^(r^2/4))) + 64*(r/(2*E^(r^2/4)) - 
                     (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) - 
                   16*r^2*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + 
                        r^2/(4*E^(r^2/4))))/2) + 32*r*(1/(2*E^(r^2/4)) - 
                     r^2/(4*E^(r^2/4)) + (1/(2*E^(r^2/4)) - r^2/
                        (4*E^(r^2/4)))/2 - (r*((3*r)/(4*E^(r^2/4)) - 
                        r^3/(8*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - 
                     (3*r^2)/(8*E^(r^2/4)) - (r*(r/(2*E^(r^2/4)) - 
                        (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2))/2) + 
                   8*r^2*(-1/4*r/E^(r^2/4) + (r*(-1/2*1/E^(r^2/4) + 
                        r^2/(4*E^(r^2/4))))/4 + (3*(-1/2*r/E^(r^2/4) + 
                        (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2))/2 - 
                     (r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - 
                        (r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/
                          (4*E^(r^2/4))))/2))/2))/2))/r)*Sin[theta]^2)/4)))/
          ((2 - 9.*^-16*(24/(E^(r^2/4)*r^3) - (3*((16*r)/E^(r^2/4) - 
                  (4*r^3)/E^(r^2/4)))/r^4 + (16/E^(r^2/4) - (16*r^2)/
                  E^(r^2/4) + 8*r^2*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/
                r^3)^2*(1 + 3*Cos[2*theta]) + 1.5000000000000002*^-8*
             (168/(E^(r^2/4)*r^3) - (21*((16*r)/E^(r^2/4) - (4*r^3)/
                  E^(r^2/4)))/r^4 + (9*(16/E^(r^2/4) - (16*r^2)/E^(r^2/4) + 
                 8*r^2*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 - 
              (2*((-40*r)/E^(r^2/4) + (8*r^3)/E^(r^2/4) + 16*r*
                  (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 8*r^2*
                  (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/
                       (4*E^(r^2/4))))/2)))/r^2 + (-32/E^(r^2/4) + 
                (32*r^2)/E^(r^2/4) + 32*(-1/2*1/E^(r^2/4) + 
                  r^2/(4*E^(r^2/4))) - 16*r^2*(-1/2*1/E^(r^2/4) + 
                  r^2/(4*E^(r^2/4))) + 32*r*(r/(2*E^(r^2/4)) - 
                  (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 
                8*r^2*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - 
                  (r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/
                         (4*E^(r^2/4))))/2))/2))/r)*Sin[theta]^2 + 
            3.0000000000000004*^-8*(24/(E^(r^2/4)*r^3) - 
              (3*((16*r)/E^(r^2/4) - (4*r^3)/E^(r^2/4)))/r^4 + 
              (16/E^(r^2/4) - (16*r^2)/E^(r^2/4) + 8*r^2*(-1/2*1/E^(r^2/4) + 
                  r^2/(4*E^(r^2/4))))/r^3)*(-1 + 3*Cos[2*theta] + 
              7.500000000000001*^-9*(168/(E^(r^2/4)*r^3) - 
                (21*((16*r)/E^(r^2/4) - (4*r^3)/E^(r^2/4)))/r^4 + 
                (9*(16/E^(r^2/4) - (16*r^2)/E^(r^2/4) + 8*r^2*
                    (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 - 
                (2*((-40*r)/E^(r^2/4) + (8*r^3)/E^(r^2/4) + 16*r*
                    (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 8*r^2*
                    (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/
                         (4*E^(r^2/4))))/2)))/r^2 + (-32/E^(r^2/4) + 
                  (32*r^2)/E^(r^2/4) + 32*(-1/2*1/E^(r^2/4) + r^2/
                     (4*E^(r^2/4))) - 16*r^2*(-1/2*1/E^(r^2/4) + 
                    r^2/(4*E^(r^2/4))) + 32*r*(r/(2*E^(r^2/4)) - 
                    (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 
                  8*r^2*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - 
                    (r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/
                          (4*E^(r^2/4))))/2))/2))/r)*(1 + 3*Cos[2*theta])*
               Sin[theta]^2) - 4.5*^-16*(-48/(E^(r^2/4)*r^3) + 
               (6*((16*r)/E^(r^2/4) - (4*r^3)/E^(r^2/4)))/r^4 - 
               (3*(16/E^(r^2/4) - (16*r^2)/E^(r^2/4) + 8*r^2*
                   (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + 
               ((-40*r)/E^(r^2/4) + (8*r^3)/E^(r^2/4) + 16*r*
                  (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 8*r^2*
                  (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/
                       (4*E^(r^2/4))))/2))/r^2)^2*Sin[2*theta]^2)*
           (-2 + 9.*^-16*(24/(E^(r^2/4)*r^3) - (3*((16*r)/E^(r^2/4) - 
                  (4*r^3)/E^(r^2/4)))/r^4 + (16/E^(r^2/4) - (16*r^2)/
                  E^(r^2/4) + 8*r^2*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/
                r^3)^2*(1 + 3*Cos[2*theta]) - 1.5000000000000002*^-8*
             (168/(E^(r^2/4)*r^3) - (21*((16*r)/E^(r^2/4) - (4*r^3)/
                  E^(r^2/4)))/r^4 + (9*(16/E^(r^2/4) - (16*r^2)/E^(r^2/4) + 
                 8*r^2*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 - 
              (2*((-40*r)/E^(r^2/4) + (8*r^3)/E^(r^2/4) + 16*r*
                  (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 8*r^2*
                  (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/
                       (4*E^(r^2/4))))/2)))/r^2 + (-32/E^(r^2/4) + 
                (32*r^2)/E^(r^2/4) + 32*(-1/2*1/E^(r^2/4) + 
                  r^2/(4*E^(r^2/4))) - 16*r^2*(-1/2*1/E^(r^2/4) + 
                  r^2/(4*E^(r^2/4))) + 32*r*(r/(2*E^(r^2/4)) - 
                  (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 
                8*r^2*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - 
                  (r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/
                         (4*E^(r^2/4))))/2))/2))/r)*Sin[theta]^2 - 
            3.0000000000000004*^-8*(24/(E^(r^2/4)*r^3) - 
              (3*((16*r)/E^(r^2/4) - (4*r^3)/E^(r^2/4)))/r^4 + 
              (16/E^(r^2/4) - (16*r^2)/E^(r^2/4) + 8*r^2*(-1/2*1/E^(r^2/4) + 
                  r^2/(4*E^(r^2/4))))/r^3)*(-1 + 3*Cos[2*theta] + 
              7.500000000000001*^-9*(168/(E^(r^2/4)*r^3) - 
                (21*((16*r)/E^(r^2/4) - (4*r^3)/E^(r^2/4)))/r^4 + 
                (9*(16/E^(r^2/4) - (16*r^2)/E^(r^2/4) + 8*r^2*
                    (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 - 
                (2*((-40*r)/E^(r^2/4) + (8*r^3)/E^(r^2/4) + 16*r*
                    (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 8*r^2*
                    (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/
                         (4*E^(r^2/4))))/2)))/r^2 + (-32/E^(r^2/4) + 
                  (32*r^2)/E^(r^2/4) + 32*(-1/2*1/E^(r^2/4) + r^2/
                     (4*E^(r^2/4))) - 16*r^2*(-1/2*1/E^(r^2/4) + 
                    r^2/(4*E^(r^2/4))) + 32*r*(r/(2*E^(r^2/4)) - 
                    (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 
                  8*r^2*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - 
                    (r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/
                          (4*E^(r^2/4))))/2))/2))/r)*(1 + 3*Cos[2*theta])*
               Sin[theta]^2) + 4.5*^-16*(-48/(E^(r^2/4)*r^3) + 
               (6*((16*r)/E^(r^2/4) - (4*r^3)/E^(r^2/4)))/r^4 - 
               (3*(16/E^(r^2/4) - (16*r^2)/E^(r^2/4) + 8*r^2*
                   (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + 
               ((-40*r)/E^(r^2/4) + (8*r^3)/E^(r^2/4) + 16*r*
                  (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 8*r^2*
                  (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/
                       (4*E^(r^2/4))))/2))/r^2)^2*Sin[2*theta]^2)) - 
         (1.*^-8*(((9.*^-8*((3*((16*r)/E^(r^2/4) - (4*r^3)/E^(r^2/4)))/r^5 - 
                  (3*(16/E^(r^2/4) - (16*r^2)/E^(r^2/4) + 8*r^2*
                      (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^4 + 
                  ((-40*r)/E^(r^2/4) + (8*r^3)/E^(r^2/4) + 16*r*
                     (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 8*r^2*
                     (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/
                          (4*E^(r^2/4))))/2))/r^3)^2*(1 + 3*Cos[2*theta]) + 3*
                ((3*(16/E^(r^2/4) - (16*r^2)/E^(r^2/4) + 8*r^2*
                     (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^5 - 
                 (3*((-40*r)/E^(r^2/4) + (8*r^3)/E^(r^2/4) + 16*r*
                     (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 8*r^2*
                     (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/
                          (4*E^(r^2/4))))/2)))/r^4 + (-32/E^(r^2/4) + 
                   (32*r^2)/E^(r^2/4) + 32*(-1/2*1/E^(r^2/4) + r^2/
                      (4*E^(r^2/4))) - 16*r^2*(-1/2*1/E^(r^2/4) + 
                     r^2/(4*E^(r^2/4))) + 32*r*(r/(2*E^(r^2/4)) - 
                     (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 
                   8*r^2*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - 
                     (r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/
                          (4*E^(r^2/4))))/2))/2))/r^3)*(2 + 
                 3.0000000000000004*^-8*(24/(E^(r^2/4)*r^3) - 
                   (3*((16*r)/E^(r^2/4) - (4*r^3)/E^(r^2/4)))/r^4 + 
                   (16/E^(r^2/4) - (16*r^2)/E^(r^2/4) + 8*r^2*
                      (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/r^3)*
                  (1 + 3*Cos[2*theta])) + 6*Sin[theta]^2*
                (3.0000000000000004*^-8*((-6*((16*r)/E^(r^2/4) - (4*r^3)/
                        E^(r^2/4)))/r^5 + (6*(16/E^(r^2/4) - (16*r^2)/
                        E^(r^2/4) + 8*r^2*(-1/2*1/E^(r^2/4) + r^2/
                          (4*E^(r^2/4)))))/r^4 - (3*((-40*r)/E^(r^2/4) + 
                       (8*r^3)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + 
                         r^2/(4*E^(r^2/4))) + 8*r^2*(r/(2*E^(r^2/4)) - 
                         (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2)))/
                     r^3 + (-32/E^(r^2/4) + (32*r^2)/E^(r^2/4) + 
                      32*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) - 16*r^2*
                       (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*r*
                       (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/
                          (4*E^(r^2/4))))/2) + 8*r^2*(3/(4*E^(r^2/4)) - 
                        (3*r^2)/(8*E^(r^2/4)) - (r*(r/(2*E^(r^2/4)) - 
                          (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2))/2))/
                     r^2)^2*Cos[theta]^2 + 3.0000000000000004*^-8*
                  (-48/(E^(r^2/4)*r^3) + (6*((16*r)/E^(r^2/4) - (4*r^3)/
                       E^(r^2/4)))/r^4 - (3*(16/E^(r^2/4) - (16*r^2)/
                       E^(r^2/4) + 8*r^2*(-1/2*1/E^(r^2/4) + r^2/
                         (4*E^(r^2/4)))))/r^3 + ((-40*r)/E^(r^2/4) + 
                     (8*r^3)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + 
                       r^2/(4*E^(r^2/4))) + 8*r^2*(r/(2*E^(r^2/4)) - 
                       (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2))/r^2)*
                  ((-6*(16/E^(r^2/4) - (16*r^2)/E^(r^2/4) + 8*r^2*
                       (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^5 + 
                   (6*((-40*r)/E^(r^2/4) + (8*r^3)/E^(r^2/4) + 16*r*
                       (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 8*r^2*
                       (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*(-32/E^(r^2/4) + 
                      (32*r^2)/E^(r^2/4) + 32*(-1/2*1/E^(r^2/4) + r^2/
                         (4*E^(r^2/4))) - 16*r^2*(-1/2*1/E^(r^2/4) + 
                        r^2/(4*E^(r^2/4))) + 32*r*(r/(2*E^(r^2/4)) - 
                        (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 
                      8*r^2*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - 
                        (r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/
                          (4*E^(r^2/4))))/2))/2)))/r^3 + ((80*r)/E^(r^2/4) - 
                     (16*r^3)/E^(r^2/4) - 32*r*(-1/2*1/E^(r^2/4) + 
                       r^2/(4*E^(r^2/4))) + 64*(r/(2*E^(r^2/4)) - 
                       (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) - 
                     16*r^2*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + 
                          r^2/(4*E^(r^2/4))))/2) + 32*r*(1/(2*E^(r^2/4)) - 
                       r^2/(4*E^(r^2/4)) + (1/(2*E^(r^2/4)) - r^2/
                          (4*E^(r^2/4)))/2 - (r*((3*r)/(4*E^(r^2/4)) - 
                          r^3/(8*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - 
                       (3*r^2)/(8*E^(r^2/4)) - (r*(r/(2*E^(r^2/4)) - 
                          (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2))/2) + 
                     8*r^2*(-1/4*r/E^(r^2/4) + (r*(-1/2*1/E^(r^2/4) + 
                          r^2/(4*E^(r^2/4))))/4 + (3*(-1/2*r/E^(r^2/4) + 
                          (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2))/2 - 
                       (r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - 
                          (r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + 
                          r^2/(4*E^(r^2/4))))/2))/2))/2))/r^2)*Cos[theta]^2 + 
                 7.500000000000001*^-9*((3*((16*r)/E^(r^2/4) - (4*r^3)/
                       E^(r^2/4)))/r^5 - (3*(16/E^(r^2/4) - (16*r^2)/
                       E^(r^2/4) + 8*r^2*(-1/2*1/E^(r^2/4) + r^2/
                         (4*E^(r^2/4)))))/r^4 + ((-40*r)/E^(r^2/4) + 
                     (8*r^3)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + 
                       r^2/(4*E^(r^2/4))) + 8*r^2*(r/(2*E^(r^2/4)) - 
                       (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2))/r^3)*
                  ((21*((16*r)/E^(r^2/4) - (4*r^3)/E^(r^2/4)))/r^5 - 
                   (21*(16/E^(r^2/4) - (16*r^2)/E^(r^2/4) + 8*r^2*
                       (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^4 + 
                   (9*((-40*r)/E^(r^2/4) + (8*r^3)/E^(r^2/4) + 16*r*
                       (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 8*r^2*
                       (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/
                          (4*E^(r^2/4))))/2)))/r^3 - (2*(-32/E^(r^2/4) + 
                      (32*r^2)/E^(r^2/4) + 32*(-1/2*1/E^(r^2/4) + r^2/
                         (4*E^(r^2/4))) - 16*r^2*(-1/2*1/E^(r^2/4) + 
                        r^2/(4*E^(r^2/4))) + 32*r*(r/(2*E^(r^2/4)) - 
                        (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 
                      8*r^2*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - 
                        (r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/
                          (4*E^(r^2/4))))/2))/2)))/r^2 + ((80*r)/E^(r^2/4) - 
                     (16*r^3)/E^(r^2/4) - 32*r*(-1/2*1/E^(r^2/4) + 
                       r^2/(4*E^(r^2/4))) + 64*(r/(2*E^(r^2/4)) - 
                       (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) - 
                     16*r^2*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + 
                          r^2/(4*E^(r^2/4))))/2) + 32*r*(1/(2*E^(r^2/4)) - 
                       r^2/(4*E^(r^2/4)) + (1/(2*E^(r^2/4)) - r^2/
                          (4*E^(r^2/4)))/2 - (r*((3*r)/(4*E^(r^2/4)) - 
                          r^3/(8*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - 
                       (3*r^2)/(8*E^(r^2/4)) - (r*(r/(2*E^(r^2/4)) - 
                          (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2))/2) + 
                     8*r^2*(-1/4*r/E^(r^2/4) + (r*(-1/2*1/E^(r^2/4) + 
                          r^2/(4*E^(r^2/4))))/4 + (3*(-1/2*r/E^(r^2/4) + 
                          (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2))/2 - 
                       (r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - 
                          (r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + 
                          r^2/(4*E^(r^2/4))))/2))/2))/2))/r)*(-2 + 
                   3*Sin[theta]^2) + (((21*(16/E^(r^2/4) - (16*r^2)/
                        E^(r^2/4) + 8*r^2*(-1/2*1/E^(r^2/4) + r^2/
                          (4*E^(r^2/4)))))/r^5 - (21*((-40*r)/E^(r^2/4) + 
                       (8*r^3)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + 
                         r^2/(4*E^(r^2/4))) + 8*r^2*(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*(-32/E^(r^2/4) + (32*r^2)/E^(r^2/4) + 
                       32*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) - 16*r^2*
                        (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*r*
                        (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/
                          (4*E^(r^2/4))))/2) + 8*r^2*(3/(4*E^(r^2/4)) - 
                         (3*r^2)/(8*E^(r^2/4)) - (r*(r/(2*E^(r^2/4)) - 
                          (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2))/2)))/
                     r^3 - (2*((80*r)/E^(r^2/4) - (16*r^3)/E^(r^2/4) - 
                       32*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 
                       64*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/
                          (4*E^(r^2/4))))/2) - 16*r^2*(r/(2*E^(r^2/4)) - 
                         (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 
                       32*r*(1/(2*E^(r^2/4)) - r^2/(4*E^(r^2/4)) + 
                         (1/(2*E^(r^2/4)) - r^2/(4*E^(r^2/4)))/2 - 
                         (r*((3*r)/(4*E^(r^2/4)) - r^3/(8*E^(r^2/4))))/2) + 
                       16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - 
                         (r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/
                          (4*E^(r^2/4))))/2))/2) + 8*r^2*(-1/4*r/E^(r^2/4) + 
                         (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/4 + 
                         (3*(-1/2*r/E^(r^2/4) + (r*(-1/2*1/E^(r^2/4) + 
                          r^2/(4*E^(r^2/4))))/2))/2 - (r*(3/(4*E^(r^2/4)) - 
                          (3*r^2)/(8*E^(r^2/4)) - (r*(r/(2*E^(r^2/4)) - 
                          (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2))/2))/
                          2)))/r^2 + (64/E^(r^2/4) - (64*r^2)/E^(r^2/4) - 
                      64*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*r^2*
                       (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) - 64*r*
                       (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/
                          (4*E^(r^2/4))))/2) + 64*(1/(2*E^(r^2/4)) - 
                        r^2/(4*E^(r^2/4)) + (1/(2*E^(r^2/4)) - r^2/
                          (4*E^(r^2/4)))/2 - (r*((3*r)/(4*E^(r^2/4)) - 
                          r^3/(8*E^(r^2/4))))/2) + 48*(3/(4*E^(r^2/4)) - 
                        (3*r^2)/(8*E^(r^2/4)) - (r*(r/(2*E^(r^2/4)) - 
                          (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2))/2) - 
                      16*r^2*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - 
                        (r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/
                          (4*E^(r^2/4))))/2))/2) + 32*r*((-5*r)/(4*
                          E^(r^2/4)) + r^3/(8*E^(r^2/4)) + 
                        (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2 - 
                        (r*(3/(4*E^(r^2/4)) - (5*r^2)/(8*E^(r^2/4)) + 
                          (r^2*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/4))/
                         2) + 32*r*(-1/4*r/E^(r^2/4) + (r*(-1/2*1/E^(r^2/4) + 
                          r^2/(4*E^(r^2/4))))/4 + (3*(-1/2*r/E^(r^2/4) + 
                          (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2))/2 - 
                        (r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - 
                          (r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + 
                          r^2/(4*E^(r^2/4))))/2))/2))/2) + 8*r^2*
                       (-1/8*1/E^(r^2/4) + r^2/(16*E^(r^2/4)) + 
                        (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))/2 + 
                        (r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/
                          (4*E^(r^2/4))))/2))/4 + 2*(-3/(4*E^(r^2/4)) + 
                          (3*r^2)/(8*E^(r^2/4)) + (r*(r/(2*E^(r^2/4)) - 
                          (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2))/2) - 
                        (r*(-1/4*r/E^(r^2/4) + (r*(-1/2*1/E^(r^2/4) + 
                          r^2/(4*E^(r^2/4))))/4 + (3*(-1/2*r/E^(r^2/4) + 
                          (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2))/2 - 
                          (r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - 
                          (r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/
                          (4*E^(r^2/4))))/2))/2))/2))/2))/r)*(-1 + 
                    3.0000000000000004*^-8*(24/(E^(r^2/4)*r^3) - 
                      (3*((16*r)/E^(r^2/4) - (4*r^3)/E^(r^2/4)))/r^4 + 
                      (16/E^(r^2/4) - (16*r^2)/E^(r^2/4) + 8*r^2*
                         (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/r^3)*
                     (-2 + 3*Sin[theta]^2)))/4))*(-2 + 9.*^-16*
                (24/(E^(r^2/4)*r^3) - (3*((16*r)/E^(r^2/4) - (4*r^3)/
                      E^(r^2/4)))/r^4 + (16/E^(r^2/4) - (16*r^2)/E^(r^2/4) + 
                    8*r^2*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/r^3)^2*
                (1 + 3*Cos[2*theta]) - 1.5000000000000002*^-8*
                (168/(E^(r^2/4)*r^3) - (21*((16*r)/E^(r^2/4) - (4*r^3)/
                     E^(r^2/4)))/r^4 + (9*(16/E^(r^2/4) - (16*r^2)/
                     E^(r^2/4) + 8*r^2*(-1/2*1/E^(r^2/4) + r^2/
                       (4*E^(r^2/4)))))/r^3 - (2*((-40*r)/E^(r^2/4) + 
                    (8*r^3)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + 
                      r^2/(4*E^(r^2/4))) + 8*r^2*(r/(2*E^(r^2/4)) - 
                      (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2)))/r^2 + 
                 (-32/E^(r^2/4) + (32*r^2)/E^(r^2/4) + 32*(-1/2*1/E^(r^2/4) + 
                     r^2/(4*E^(r^2/4))) - 16*r^2*(-1/2*1/E^(r^2/4) + 
                     r^2/(4*E^(r^2/4))) + 32*r*(r/(2*E^(r^2/4)) - 
                     (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 
                   8*r^2*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - 
                     (r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/
                          (4*E^(r^2/4))))/2))/2))/r)*Sin[theta]^2 - 
               6.000000000000001*^-8*(24/(E^(r^2/4)*r^3) - 
                 (3*((16*r)/E^(r^2/4) - (4*r^3)/E^(r^2/4)))/r^4 + 
                 (16/E^(r^2/4) - (16*r^2)/E^(r^2/4) + 8*r^2*
                    (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/r^3)*
                (1 - 3*Sin[theta]^2 + 3.7500000000000005*^-9*
                  (168/(E^(r^2/4)*r^3) - (21*((16*r)/E^(r^2/4) - (4*r^3)/
                       E^(r^2/4)))/r^4 + (9*(16/E^(r^2/4) - (16*r^2)/
                       E^(r^2/4) + 8*r^2*(-1/2*1/E^(r^2/4) + r^2/
                         (4*E^(r^2/4)))))/r^3 - (2*((-40*r)/E^(r^2/4) + 
                      (8*r^3)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + 
                        r^2/(4*E^(r^2/4))) + 8*r^2*(r/(2*E^(r^2/4)) - 
                        (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2)))/r^2 + 
                   (-32/E^(r^2/4) + (32*r^2)/E^(r^2/4) + 32*(-1/2*
                        1/E^(r^2/4) + r^2/(4*E^(r^2/4))) - 16*r^2*
                      (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*r*
                      (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/
                          (4*E^(r^2/4))))/2) + 8*r^2*(3/(4*E^(r^2/4)) - 
                       (3*r^2)/(8*E^(r^2/4)) - (r*(r/(2*E^(r^2/4)) - 
                          (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2))/2))/
                    r)*(1 + 3*Cos[2*theta])*Sin[theta]^2) + 4.5*^-16*
                (-48/(E^(r^2/4)*r^3) + (6*((16*r)/E^(r^2/4) - (4*r^3)/
                      E^(r^2/4)))/r^4 - (3*(16/E^(r^2/4) - (16*r^2)/
                      E^(r^2/4) + 8*r^2*(-1/2*1/E^(r^2/4) + r^2/
                        (4*E^(r^2/4)))))/r^3 + ((-40*r)/E^(r^2/4) + 
                    (8*r^3)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + 
                      r^2/(4*E^(r^2/4))) + 8*r^2*(r/(2*E^(r^2/4)) - 
                      (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2))/r^2)^2*
                Sin[2*theta]^2))/2 - 2.5*^-9*(6*((3*((16*r)/E^(r^2/4) - 
                   (4*r^3)/E^(r^2/4)))/r^5 - (3*(16/E^(r^2/4) - (16*r^2)/
                    E^(r^2/4) + 8*r^2*(-1/2*1/E^(r^2/4) + r^2/
                      (4*E^(r^2/4)))))/r^4 + ((-40*r)/E^(r^2/4) + 
                  (8*r^3)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + 
                    r^2/(4*E^(r^2/4))) + 8*r^2*(r/(2*E^(r^2/4)) - 
                    (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2))/r^3)*(2 + 
                3.0000000000000004*^-8*(24/(E^(r^2/4)*r^3) - 
                  (3*((16*r)/E^(r^2/4) - (4*r^3)/E^(r^2/4)))/r^4 + 
                  (16/E^(r^2/4) - (16*r^2)/E^(r^2/4) + 8*r^2*
                     (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/r^3)*
                 (1 + 3*Cos[2*theta])) - (3*((21*((16*r)/E^(r^2/4) - 
                    (4*r^3)/E^(r^2/4)))/r^5 - (21*(16/E^(r^2/4) - (16*r^2)/
                     E^(r^2/4) + 8*r^2*(-1/2*1/E^(r^2/4) + r^2/
                       (4*E^(r^2/4)))))/r^4 + (9*((-40*r)/E^(r^2/4) + 
                    (8*r^3)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + 
                      r^2/(4*E^(r^2/4))) + 8*r^2*(r/(2*E^(r^2/4)) - 
                      (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2)))/r^3 - 
                 (2*(-32/E^(r^2/4) + (32*r^2)/E^(r^2/4) + 
                    32*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) - 16*r^2*
                     (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*r*
                     (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/
                          (4*E^(r^2/4))))/2) + 8*r^2*(3/(4*E^(r^2/4)) - 
                      (3*r^2)/(8*E^(r^2/4)) - (r*(r/(2*E^(r^2/4)) - 
                         (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2))/2)))/
                  r^2 + ((80*r)/E^(r^2/4) - (16*r^3)/E^(r^2/4) - 
                   32*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 
                   64*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/
                         (4*E^(r^2/4))))/2) - 16*r^2*(r/(2*E^(r^2/4)) - 
                     (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 
                   32*r*(1/(2*E^(r^2/4)) - r^2/(4*E^(r^2/4)) + 
                     (1/(2*E^(r^2/4)) - r^2/(4*E^(r^2/4)))/2 - 
                     (r*((3*r)/(4*E^(r^2/4)) - r^3/(8*E^(r^2/4))))/2) + 
                   16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - 
                     (r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/
                          (4*E^(r^2/4))))/2))/2) + 8*r^2*(-1/4*r/E^(r^2/4) + 
                     (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/4 + 
                     (3*(-1/2*r/E^(r^2/4) + (r*(-1/2*1/E^(r^2/4) + r^2/
                          (4*E^(r^2/4))))/2))/2 - (r*(3/(4*E^(r^2/4)) - 
                        (3*r^2)/(8*E^(r^2/4)) - (r*(r/(2*E^(r^2/4)) - 
                          (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2))/2))/
                      2))/r)*(2 + 3.0000000000000004*^-8*(24/(E^(r^2/4)*
                     r^3) - (3*((16*r)/E^(r^2/4) - (4*r^3)/E^(r^2/4)))/r^4 + 
                   (16/E^(r^2/4) - (16*r^2)/E^(r^2/4) + 8*r^2*
                      (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/r^3)*
                  (1 + 3*Cos[2*theta]))*Sin[theta]^2)/2 + 
              9.*^-8*(-48/(E^(r^2/4)*r^3) + (6*((16*r)/E^(r^2/4) - 
                   (4*r^3)/E^(r^2/4)))/r^4 - (3*(16/E^(r^2/4) - (16*r^2)/
                    E^(r^2/4) + 8*r^2*(-1/2*1/E^(r^2/4) + r^2/
                      (4*E^(r^2/4)))))/r^3 + ((-40*r)/E^(r^2/4) + 
                  (8*r^3)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + 
                    r^2/(4*E^(r^2/4))) + 8*r^2*(r/(2*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) - (4*r^3)/E^(r^2/4)))/r^5 + 
                (6*(16/E^(r^2/4) - (16*r^2)/E^(r^2/4) + 8*r^2*
                    (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^4 - 
                (3*((-40*r)/E^(r^2/4) + (8*r^3)/E^(r^2/4) + 16*r*
                    (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 8*r^2*
                    (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/
                         (4*E^(r^2/4))))/2)))/r^3 + (-32/E^(r^2/4) + 
                  (32*r^2)/E^(r^2/4) + 32*(-1/2*1/E^(r^2/4) + r^2/
                     (4*E^(r^2/4))) - 16*r^2*(-1/2*1/E^(r^2/4) + 
                    r^2/(4*E^(r^2/4))) + 32*r*(r/(2*E^(r^2/4)) - 
                    (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 
                  8*r^2*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - 
                    (r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/
                          (4*E^(r^2/4))))/2))/2))/r^2)*Sin[2*theta]^2)*
             ((-3*((21*((16*r)/E^(r^2/4) - (4*r^3)/E^(r^2/4)))/r^5 - 
                 (21*(16/E^(r^2/4) - (16*r^2)/E^(r^2/4) + 8*r^2*
                     (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^4 + 
                 (9*((-40*r)/E^(r^2/4) + (8*r^3)/E^(r^2/4) + 16*r*
                     (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 8*r^2*
                     (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/
                          (4*E^(r^2/4))))/2)))/r^3 - (2*(-32/E^(r^2/4) + 
                    (32*r^2)/E^(r^2/4) + 32*(-1/2*1/E^(r^2/4) + r^2/
                       (4*E^(r^2/4))) - 16*r^2*(-1/2*1/E^(r^2/4) + 
                      r^2/(4*E^(r^2/4))) + 32*r*(r/(2*E^(r^2/4)) - 
                      (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 
                    8*r^2*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - 
                      (r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/
                          (4*E^(r^2/4))))/2))/2)))/r^2 + ((80*r)/E^(r^2/4) - 
                   (16*r^3)/E^(r^2/4) - 32*r*(-1/2*1/E^(r^2/4) + 
                     r^2/(4*E^(r^2/4))) + 64*(r/(2*E^(r^2/4)) - 
                     (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) - 
                   16*r^2*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + 
                        r^2/(4*E^(r^2/4))))/2) + 32*r*(1/(2*E^(r^2/4)) - 
                     r^2/(4*E^(r^2/4)) + (1/(2*E^(r^2/4)) - r^2/
                        (4*E^(r^2/4)))/2 - (r*((3*r)/(4*E^(r^2/4)) - 
                        r^3/(8*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - 
                     (3*r^2)/(8*E^(r^2/4)) - (r*(r/(2*E^(r^2/4)) - 
                        (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2))/2) + 
                   8*r^2*(-1/4*r/E^(r^2/4) + (r*(-1/2*1/E^(r^2/4) + 
                        r^2/(4*E^(r^2/4))))/4 + (3*(-1/2*r/E^(r^2/4) + 
                        (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2))/2 - 
                     (r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - 
                        (r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/
                          (4*E^(r^2/4))))/2))/2))/2))/r)*(2 + 
                 3.0000000000000004*^-8*(24/(E^(r^2/4)*r^3) - 
                   (3*((16*r)/E^(r^2/4) - (4*r^3)/E^(r^2/4)))/r^4 + 
                   (16/E^(r^2/4) - (16*r^2)/E^(r^2/4) + 8*r^2*
                      (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/r^3)*
                  (1 + 3*Cos[2*theta]))*Sin[theta]^2)/4 + 
              3*((3*((16*r)/E^(r^2/4) - (4*r^3)/E^(r^2/4)))/r^5 - 
                (3*(16/E^(r^2/4) - (16*r^2)/E^(r^2/4) + 8*r^2*
                    (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^4 + 
                ((-40*r)/E^(r^2/4) + (8*r^3)/E^(r^2/4) + 16*r*
                   (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 8*r^2*
                   (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/
                        (4*E^(r^2/4))))/2))/r^3)*(1 - 3*Cos[2*theta] + 
                6.000000000000001*^-8*(24/(E^(r^2/4)*r^3) - 
                  (3*((16*r)/E^(r^2/4) - (4*r^3)/E^(r^2/4)))/r^4 + 
                  (16/E^(r^2/4) - (16*r^2)/E^(r^2/4) + 8*r^2*
                     (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/r^3)*
                 (1 + 3*Cos[2*theta]) - 7.500000000000001*^-9*
                 (168/(E^(r^2/4)*r^3) - (21*((16*r)/E^(r^2/4) - (4*r^3)/
                      E^(r^2/4)))/r^4 + (9*(16/E^(r^2/4) - (16*r^2)/
                      E^(r^2/4) + 8*r^2*(-1/2*1/E^(r^2/4) + r^2/
                        (4*E^(r^2/4)))))/r^3 - (2*((-40*r)/E^(r^2/4) + 
                     (8*r^3)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + 
                       r^2/(4*E^(r^2/4))) + 8*r^2*(r/(2*E^(r^2/4)) - 
                       (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2)))/r^2 + 
                  (-32/E^(r^2/4) + (32*r^2)/E^(r^2/4) + 32*
                     (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) - 16*r^2*
                     (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*r*
                     (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/
                          (4*E^(r^2/4))))/2) + 8*r^2*(3/(4*E^(r^2/4)) - 
                      (3*r^2)/(8*E^(r^2/4)) - (r*(r/(2*E^(r^2/4)) - 
                         (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2))/2))/
                   r)*(1 + 3*Cos[2*theta])*Sin[theta]^2) + 
              9.*^-8*(-48/(E^(r^2/4)*r^3) + (6*((16*r)/E^(r^2/4) - 
                   (4*r^3)/E^(r^2/4)))/r^4 - (3*(16/E^(r^2/4) - (16*r^2)/
                    E^(r^2/4) + 8*r^2*(-1/2*1/E^(r^2/4) + r^2/
                      (4*E^(r^2/4)))))/r^3 + ((-40*r)/E^(r^2/4) + 
                  (8*r^3)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + 
                    r^2/(4*E^(r^2/4))) + 8*r^2*(r/(2*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) - (4*r^3)/E^(r^2/4)))/r^5 + 
                (6*(16/E^(r^2/4) - (16*r^2)/E^(r^2/4) + 8*r^2*
                    (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^4 - 
                (3*((-40*r)/E^(r^2/4) + (8*r^3)/E^(r^2/4) + 16*r*
                    (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 8*r^2*
                    (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/
                         (4*E^(r^2/4))))/2)))/r^3 + (-32/E^(r^2/4) + 
                  (32*r^2)/E^(r^2/4) + 32*(-1/2*1/E^(r^2/4) + r^2/
                     (4*E^(r^2/4))) - 16*r^2*(-1/2*1/E^(r^2/4) + 
                    r^2/(4*E^(r^2/4))) + 32*r*(r/(2*E^(r^2/4)) - 
                    (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 
                  8*r^2*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - 
                    (r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/
                          (4*E^(r^2/4))))/2))/2))/r^2)*Sin[2*theta]^2)))/
          (2 - 9.*^-16*(24/(E^(r^2/4)*r^3) - (3*((16*r)/E^(r^2/4) - 
                  (4*r^3)/E^(r^2/4)))/r^4 + (16/E^(r^2/4) - (16*r^2)/
                  E^(r^2/4) + 8*r^2*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/
                r^3)^2*(1 + 3*Cos[2*theta]) + 1.5000000000000002*^-8*
             (168/(E^(r^2/4)*r^3) - (21*((16*r)/E^(r^2/4) - (4*r^3)/
                  E^(r^2/4)))/r^4 + (9*(16/E^(r^2/4) - (16*r^2)/E^(r^2/4) + 
                 8*r^2*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 - 
              (2*((-40*r)/E^(r^2/4) + (8*r^3)/E^(r^2/4) + 16*r*
                  (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 8*r^2*
                  (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/
                       (4*E^(r^2/4))))/2)))/r^2 + (-32/E^(r^2/4) + 
                (32*r^2)/E^(r^2/4) + 32*(-1/2*1/E^(r^2/4) + 
                  r^2/(4*E^(r^2/4))) - 16*r^2*(-1/2*1/E^(r^2/4) + 
                  r^2/(4*E^(r^2/4))) + 32*r*(r/(2*E^(r^2/4)) - 
                  (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 
                8*r^2*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - 
                  (r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/
                         (4*E^(r^2/4))))/2))/2))/r)*Sin[theta]^2 + 
            3.0000000000000004*^-8*(24/(E^(r^2/4)*r^3) - 
              (3*((16*r)/E^(r^2/4) - (4*r^3)/E^(r^2/4)))/r^4 + 
              (16/E^(r^2/4) - (16*r^2)/E^(r^2/4) + 8*r^2*(-1/2*1/E^(r^2/4) + 
                  r^2/(4*E^(r^2/4))))/r^3)*(-1 + 3*Cos[2*theta] + 
              7.500000000000001*^-9*(168/(E^(r^2/4)*r^3) - 
                (21*((16*r)/E^(r^2/4) - (4*r^3)/E^(r^2/4)))/r^4 + 
                (9*(16/E^(r^2/4) - (16*r^2)/E^(r^2/4) + 8*r^2*
                    (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 - 
                (2*((-40*r)/E^(r^2/4) + (8*r^3)/E^(r^2/4) + 16*r*
                    (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 8*r^2*
                    (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/
                         (4*E^(r^2/4))))/2)))/r^2 + (-32/E^(r^2/4) + 
                  (32*r^2)/E^(r^2/4) + 32*(-1/2*1/E^(r^2/4) + r^2/
                     (4*E^(r^2/4))) - 16*r^2*(-1/2*1/E^(r^2/4) + 
                    r^2/(4*E^(r^2/4))) + 32*r*(r/(2*E^(r^2/4)) - 
                    (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 
                  8*r^2*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - 
                    (r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/
                          (4*E^(r^2/4))))/2))/2))/r)*(1 + 3*Cos[2*theta])*
               Sin[theta]^2) - 4.5*^-16*(-48/(E^(r^2/4)*r^3) + 
               (6*((16*r)/E^(r^2/4) - (4*r^3)/E^(r^2/4)))/r^4 - 
               (3*(16/E^(r^2/4) - (16*r^2)/E^(r^2/4) + 8*r^2*
                   (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + 
               ((-40*r)/E^(r^2/4) + (8*r^3)/E^(r^2/4) + 16*r*
                  (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 8*r^2*
                  (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/
                       (4*E^(r^2/4))))/2))/r^2)^2*Sin[2*theta]^2)^2))/
      (2*Sqrt[2]*r))/(Sqrt[2]*r))/2 + 
 ((I*Csc[theta]*(((-1/2*I)*r*Sin[theta]*(1 - 7.500000000000001*^-9*
          (168/(E^(r^2/4)*r^3) - (21*((16*r)/E^(r^2/4) - (4*r^3)/E^(r^2/4)))/
            r^4 + (9*(16/E^(r^2/4) - (16*r^2)/E^(r^2/4) + 
              8*r^2*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 - 
           (2*((-40*r)/E^(r^2/4) + (8*r^3)/E^(r^2/4) + 
              16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 
              8*r^2*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + 
                   r^2/(4*E^(r^2/4))))/2)))/r^2 + 
           (-32/E^(r^2/4) + (32*r^2)/E^(r^2/4) + 32*(-1/2*1/E^(r^2/4) + r^2/
                (4*E^(r^2/4))) - 16*r^2*(-1/2*1/E^(r^2/4) + r^2/
                (4*E^(r^2/4))) + 32*r*(r/(2*E^(r^2/4)) - 
               (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 
             8*r^2*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - 
               (r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/
                      (4*E^(r^2/4))))/2))/2))/r)*Sin[theta]^2 + 
         3.0000000000000004*^-8*(24/(E^(r^2/4)*r^3) - 
           (3*((16*r)/E^(r^2/4) - (4*r^3)/E^(r^2/4)))/r^4 + 
           (16/E^(r^2/4) - (16*r^2)/E^(r^2/4) + 8*r^2*(-1/2*1/E^(r^2/4) + r^2/
                (4*E^(r^2/4))))/r^3)*(-1 + 3*Sin[theta]^2))*
        ((-5.*^-9*(-9.000000000000001*^-8*r*(-120/(E^(r^2/4)*r^4) + 
              (15*((16*r)/E^(r^2/4) - (4*r^3)/E^(r^2/4)))/r^5 - 
              (6*(16/E^(r^2/4) - (16*r^2)/E^(r^2/4) + 8*r^2*
                  (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^4 + 
              ((-40*r)/E^(r^2/4) + (8*r^3)/E^(r^2/4) + 16*r*
                 (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 8*r^2*
                 (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/
                      (4*E^(r^2/4))))/2))/r^3) + 1.5000000000000002*^-8*
             (168/(E^(r^2/4)*r^3) - (21*((16*r)/E^(r^2/4) - (4*r^3)/
                  E^(r^2/4)))/r^4 + (9*(16/E^(r^2/4) - (16*r^2)/E^(r^2/4) + 
                 8*r^2*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 - 
              (2*((-40*r)/E^(r^2/4) + (8*r^3)/E^(r^2/4) + 16*r*
                  (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 8*r^2*
                  (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/
                       (4*E^(r^2/4))))/2)))/r^2 + (-32/E^(r^2/4) + 
                (32*r^2)/E^(r^2/4) + 32*(-1/2*1/E^(r^2/4) + 
                  r^2/(4*E^(r^2/4))) - 16*r^2*(-1/2*1/E^(r^2/4) + 
                  r^2/(4*E^(r^2/4))) + 32*r*(r/(2*E^(r^2/4)) - 
                  (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 
                8*r^2*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - 
                  (r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/
                         (4*E^(r^2/4))))/2))/2))/r) + 7.500000000000001*^-9*r*
             (-840/(E^(r^2/4)*r^4) + (105*((16*r)/E^(r^2/4) - (4*r^3)/
                  E^(r^2/4)))/r^5 - (48*(16/E^(r^2/4) - (16*r^2)/E^(r^2/4) + 
                 8*r^2*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^4 + 
              (13*((-40*r)/E^(r^2/4) + (8*r^3)/E^(r^2/4) + 16*r*
                  (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 8*r^2*
                  (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/
                       (4*E^(r^2/4))))/2)))/r^3 - (3*(-32/E^(r^2/4) + 
                 (32*r^2)/E^(r^2/4) + 32*(-1/2*1/E^(r^2/4) + 
                   r^2/(4*E^(r^2/4))) - 16*r^2*(-1/2*1/E^(r^2/4) + 
                   r^2/(4*E^(r^2/4))) + 32*r*(r/(2*E^(r^2/4)) - 
                   (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 
                 8*r^2*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - 
                   (r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/
                          (4*E^(r^2/4))))/2))/2)))/r^2 + ((80*r)/E^(r^2/4) - 
                (16*r^3)/E^(r^2/4) - 32*r*(-1/2*1/E^(r^2/4) + 
                  r^2/(4*E^(r^2/4))) + 64*(r/(2*E^(r^2/4)) - 
                  (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) - 
                16*r^2*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + 
                     r^2/(4*E^(r^2/4))))/2) + 32*r*(1/(2*E^(r^2/4)) - 
                  r^2/(4*E^(r^2/4)) + (1/(2*E^(r^2/4)) - r^2/(4*E^(r^2/4)))/
                   2 - (r*((3*r)/(4*E^(r^2/4)) - r^3/(8*E^(r^2/4))))/2) + 
                16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - 
                  (r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/
                         (4*E^(r^2/4))))/2))/2) + 8*r^2*(-1/4*r/E^(r^2/4) + 
                  (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/4 + 
                  (3*(-1/2*r/E^(r^2/4) + (r*(-1/2*1/E^(r^2/4) + r^2/
                         (4*E^(r^2/4))))/2))/2 - (r*(3/(4*E^(r^2/4)) - 
                     (3*r^2)/(8*E^(r^2/4)) - (r*(r/(2*E^(r^2/4)) - 
                        (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2))/2))/
                   2))/r) - 2*Csc[theta]^2 + 3.0000000000000004*^-8*r*
             (-120/(E^(r^2/4)*r^4) + (15*((16*r)/E^(r^2/4) - (4*r^3)/
                  E^(r^2/4)))/r^5 - (6*(16/E^(r^2/4) - (16*r^2)/E^(r^2/4) + 
                 8*r^2*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^4 + 
              ((-40*r)/E^(r^2/4) + (8*r^3)/E^(r^2/4) + 16*r*
                 (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 8*r^2*
                 (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/
                      (4*E^(r^2/4))))/2))/r^3)*Csc[theta]^2 + 
            6.000000000000001*^-8*(24/(E^(r^2/4)*r^3) - 
              (3*((16*r)/E^(r^2/4) - (4*r^3)/E^(r^2/4)))/r^4 + 
              (16/E^(r^2/4) - (16*r^2)/E^(r^2/4) + 8*r^2*(-1/2*1/E^(r^2/4) + 
                  r^2/(4*E^(r^2/4))))/r^3)*(-3 + Csc[theta]^2))*
           ((3*((21*((16*r)/E^(r^2/4) - (4*r^3)/E^(r^2/4)))/r^5 - 
               (21*(16/E^(r^2/4) - (16*r^2)/E^(r^2/4) + 8*r^2*
                   (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^4 + 
               (9*((-40*r)/E^(r^2/4) + (8*r^3)/E^(r^2/4) + 16*r*
                   (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 8*r^2*
                   (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/
                        (4*E^(r^2/4))))/2)))/r^3 - (2*(-32/E^(r^2/4) + 
                  (32*r^2)/E^(r^2/4) + 32*(-1/2*1/E^(r^2/4) + r^2/
                     (4*E^(r^2/4))) - 16*r^2*(-1/2*1/E^(r^2/4) + 
                    r^2/(4*E^(r^2/4))) + 32*r*(r/(2*E^(r^2/4)) - 
                    (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 
                  8*r^2*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - 
                    (r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/
                          (4*E^(r^2/4))))/2))/2)))/r^2 + ((80*r)/E^(r^2/4) - 
                 (16*r^3)/E^(r^2/4) - 32*r*(-1/2*1/E^(r^2/4) + 
                   r^2/(4*E^(r^2/4))) + 64*(r/(2*E^(r^2/4)) - 
                   (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) - 
                 16*r^2*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + 
                      r^2/(4*E^(r^2/4))))/2) + 32*r*(1/(2*E^(r^2/4)) - 
                   r^2/(4*E^(r^2/4)) + (1/(2*E^(r^2/4)) - r^2/(4*E^(r^2/4)))/
                    2 - (r*((3*r)/(4*E^(r^2/4)) - r^3/(8*E^(r^2/4))))/2) + 
                 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - 
                   (r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/
                          (4*E^(r^2/4))))/2))/2) + 8*r^2*(-1/4*r/E^(r^2/4) + 
                   (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/4 + 
                   (3*(-1/2*r/E^(r^2/4) + (r*(-1/2*1/E^(r^2/4) + r^2/
                          (4*E^(r^2/4))))/2))/2 - (r*(3/(4*E^(r^2/4)) - 
                      (3*r^2)/(8*E^(r^2/4)) - (r*(r/(2*E^(r^2/4)) - 
                         (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2))/2))/
                    2))/r)*Sin[theta]^2)/4 + 
            3*((3*((16*r)/E^(r^2/4) - (4*r^3)/E^(r^2/4)))/r^5 - 
              (3*(16/E^(r^2/4) - (16*r^2)/E^(r^2/4) + 8*r^2*
                  (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^4 + 
              ((-40*r)/E^(r^2/4) + (8*r^3)/E^(r^2/4) + 16*r*
                 (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 8*r^2*
                 (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/
                      (4*E^(r^2/4))))/2))/r^3)*(1 - 3*Sin[theta]^2)))/
          (r*(7.500000000000001*^-9*(168/(E^(r^2/4)*r^3) - 
              (21*((16*r)/E^(r^2/4) - (4*r^3)/E^(r^2/4)))/r^4 + 
              (9*(16/E^(r^2/4) - (16*r^2)/E^(r^2/4) + 8*r^2*
                  (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 - 
              (2*((-40*r)/E^(r^2/4) + (8*r^3)/E^(r^2/4) + 16*r*
                  (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 8*r^2*
                  (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/
                       (4*E^(r^2/4))))/2)))/r^2 + (-32/E^(r^2/4) + 
                (32*r^2)/E^(r^2/4) + 32*(-1/2*1/E^(r^2/4) + 
                  r^2/(4*E^(r^2/4))) - 16*r^2*(-1/2*1/E^(r^2/4) + 
                  r^2/(4*E^(r^2/4))) + 32*r*(r/(2*E^(r^2/4)) - 
                  (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 
                8*r^2*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - 
                  (r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/
                         (4*E^(r^2/4))))/2))/2))/r) - Csc[theta]^2 + 
            3.0000000000000004*^-8*(24/(E^(r^2/4)*r^3) - 
              (3*((16*r)/E^(r^2/4) - (4*r^3)/E^(r^2/4)))/r^4 + 
              (16/E^(r^2/4) - (16*r^2)/E^(r^2/4) + 8*r^2*(-1/2*1/E^(r^2/4) + 
                  r^2/(4*E^(r^2/4))))/r^3)*(-3 + Csc[theta]^2))*
           (-2 + 3.0000000000000004*^-8*(24/(E^(r^2/4)*r^3) - 
              (3*((16*r)/E^(r^2/4) - (4*r^3)/E^(r^2/4)))/r^4 + 
              (16/E^(r^2/4) - (16*r^2)/E^(r^2/4) + 8*r^2*(-1/2*1/E^(r^2/4) + 
                  r^2/(4*E^(r^2/4))))/r^3)*(-1 + 3*Cos[2*theta]) + 
            1.5000000000000002*^-8*(168/(E^(r^2/4)*r^3) - 
              (21*((16*r)/E^(r^2/4) - (4*r^3)/E^(r^2/4)))/r^4 + 
              (9*(16/E^(r^2/4) - (16*r^2)/E^(r^2/4) + 8*r^2*
                  (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 - 
              (2*((-40*r)/E^(r^2/4) + (8*r^3)/E^(r^2/4) + 16*r*
                  (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 8*r^2*
                  (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/
                       (4*E^(r^2/4))))/2)))/r^2 + (-32/E^(r^2/4) + 
                (32*r^2)/E^(r^2/4) + 32*(-1/2*1/E^(r^2/4) + 
                  r^2/(4*E^(r^2/4))) - 16*r^2*(-1/2*1/E^(r^2/4) + 
                  r^2/(4*E^(r^2/4))) + 32*r*(r/(2*E^(r^2/4)) - 
                  (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 
                8*r^2*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - 
                  (r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/
                         (4*E^(r^2/4))))/2))/2))/r)*Sin[theta]^2)) - 
         (1.*^-8*(-((3.0000000000000004*^-8*(-120/(E^(r^2/4)*r^4) + 
                 (15*((16*r)/E^(r^2/4) - (4*r^3)/E^(r^2/4)))/r^5 - 
                 (6*(16/E^(r^2/4) - (16*r^2)/E^(r^2/4) + 8*r^2*
                     (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^4 + 
                 ((-40*r)/E^(r^2/4) + (8*r^3)/E^(r^2/4) + 16*r*
                    (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 8*r^2*
                    (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/
                         (4*E^(r^2/4))))/2))/r^3)*(-1 + 3*Cos[2*theta]) + 
               1.5000000000000002*^-8*(-840/(E^(r^2/4)*r^4) + 
                 (105*((16*r)/E^(r^2/4) - (4*r^3)/E^(r^2/4)))/r^5 - 
                 (48*(16/E^(r^2/4) - (16*r^2)/E^(r^2/4) + 8*r^2*
                     (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^4 + 
                 (13*((-40*r)/E^(r^2/4) + (8*r^3)/E^(r^2/4) + 16*r*
                     (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 8*r^2*
                     (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/
                          (4*E^(r^2/4))))/2)))/r^3 - (3*(-32/E^(r^2/4) + 
                    (32*r^2)/E^(r^2/4) + 32*(-1/2*1/E^(r^2/4) + r^2/
                       (4*E^(r^2/4))) - 16*r^2*(-1/2*1/E^(r^2/4) + 
                      r^2/(4*E^(r^2/4))) + 32*r*(r/(2*E^(r^2/4)) - 
                      (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 
                    8*r^2*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - 
                      (r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/
                          (4*E^(r^2/4))))/2))/2)))/r^2 + ((80*r)/E^(r^2/4) - 
                   (16*r^3)/E^(r^2/4) - 32*r*(-1/2*1/E^(r^2/4) + 
                     r^2/(4*E^(r^2/4))) + 64*(r/(2*E^(r^2/4)) - 
                     (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) - 
                   16*r^2*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + 
                        r^2/(4*E^(r^2/4))))/2) + 32*r*(1/(2*E^(r^2/4)) - 
                     r^2/(4*E^(r^2/4)) + (1/(2*E^(r^2/4)) - r^2/
                        (4*E^(r^2/4)))/2 - (r*((3*r)/(4*E^(r^2/4)) - 
                        r^3/(8*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - 
                     (3*r^2)/(8*E^(r^2/4)) - (r*(r/(2*E^(r^2/4)) - 
                        (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2))/2) + 
                   8*r^2*(-1/4*r/E^(r^2/4) + (r*(-1/2*1/E^(r^2/4) + 
                        r^2/(4*E^(r^2/4))))/4 + (3*(-1/2*r/E^(r^2/4) + 
                        (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2))/2 - 
                     (r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - 
                        (r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/
                          (4*E^(r^2/4))))/2))/2))/2))/r)*Sin[theta]^2)*
              ((3*((21*((16*r)/E^(r^2/4) - (4*r^3)/E^(r^2/4)))/r^5 - 
                  (21*(16/E^(r^2/4) - (16*r^2)/E^(r^2/4) + 8*r^2*
                      (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^4 + 
                  (9*((-40*r)/E^(r^2/4) + (8*r^3)/E^(r^2/4) + 16*r*
                      (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 8*r^2*
                      (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/
                          (4*E^(r^2/4))))/2)))/r^3 - (2*(-32/E^(r^2/4) + 
                     (32*r^2)/E^(r^2/4) + 32*(-1/2*1/E^(r^2/4) + r^2/
                        (4*E^(r^2/4))) - 16*r^2*(-1/2*1/E^(r^2/4) + 
                       r^2/(4*E^(r^2/4))) + 32*r*(r/(2*E^(r^2/4)) - 
                       (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 
                     8*r^2*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - 
                       (r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/
                          (4*E^(r^2/4))))/2))/2)))/r^2 + ((80*r)/E^(r^2/4) - 
                    (16*r^3)/E^(r^2/4) - 32*r*(-1/2*1/E^(r^2/4) + 
                      r^2/(4*E^(r^2/4))) + 64*(r/(2*E^(r^2/4)) - 
                      (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) - 
                    16*r^2*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + 
                         r^2/(4*E^(r^2/4))))/2) + 32*r*(1/(2*E^(r^2/4)) - 
                      r^2/(4*E^(r^2/4)) + (1/(2*E^(r^2/4)) - r^2/
                         (4*E^(r^2/4)))/2 - (r*((3*r)/(4*E^(r^2/4)) - 
                         r^3/(8*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - 
                      (3*r^2)/(8*E^(r^2/4)) - (r*(r/(2*E^(r^2/4)) - 
                         (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2))/2) + 
                    8*r^2*(-1/4*r/E^(r^2/4) + (r*(-1/2*1/E^(r^2/4) + 
                         r^2/(4*E^(r^2/4))))/4 + (3*(-1/2*r/E^(r^2/4) + 
                         (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2))/2 - 
                      (r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - 
                         (r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/
                          (4*E^(r^2/4))))/2))/2))/2))/r)*Sin[theta]^2)/4 + 3*
                ((3*((16*r)/E^(r^2/4) - (4*r^3)/E^(r^2/4)))/r^5 - 
                 (3*(16/E^(r^2/4) - (16*r^2)/E^(r^2/4) + 8*r^2*
                     (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^4 + 
                 ((-40*r)/E^(r^2/4) + (8*r^3)/E^(r^2/4) + 16*r*
                    (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 8*r^2*
                    (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/
                         (4*E^(r^2/4))))/2))/r^3)*(1 - 3*Sin[theta]^2))) + 
            (-2 + 3.0000000000000004*^-8*(24/(E^(r^2/4)*r^3) - 
                (3*((16*r)/E^(r^2/4) - (4*r^3)/E^(r^2/4)))/r^4 + 
                (16/E^(r^2/4) - (16*r^2)/E^(r^2/4) + 8*r^2*
                   (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/r^3)*(-1 + 
                3*Cos[2*theta]) + 1.5000000000000002*^-8*(168/(E^(r^2/4)*
                  r^3) - (21*((16*r)/E^(r^2/4) - (4*r^3)/E^(r^2/4)))/r^4 + 
                (9*(16/E^(r^2/4) - (16*r^2)/E^(r^2/4) + 8*r^2*
                    (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 - 
                (2*((-40*r)/E^(r^2/4) + (8*r^3)/E^(r^2/4) + 16*r*
                    (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 8*r^2*
                    (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/
                         (4*E^(r^2/4))))/2)))/r^2 + (-32/E^(r^2/4) + 
                  (32*r^2)/E^(r^2/4) + 32*(-1/2*1/E^(r^2/4) + r^2/
                     (4*E^(r^2/4))) - 16*r^2*(-1/2*1/E^(r^2/4) + 
                    r^2/(4*E^(r^2/4))) + 32*r*(r/(2*E^(r^2/4)) - 
                    (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 
                  8*r^2*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - 
                    (r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/
                          (4*E^(r^2/4))))/2))/2))/r)*Sin[theta]^2)*
             ((3*((-105*((16*r)/E^(r^2/4) - (4*r^3)/E^(r^2/4)))/r^6 + 
                 (105*(16/E^(r^2/4) - (16*r^2)/E^(r^2/4) + 8*r^2*
                     (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^5 - 
                 (48*((-40*r)/E^(r^2/4) + (8*r^3)/E^(r^2/4) + 16*r*
                     (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 8*r^2*
                     (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*(-32/E^(r^2/4) + 
                    (32*r^2)/E^(r^2/4) + 32*(-1/2*1/E^(r^2/4) + r^2/
                       (4*E^(r^2/4))) - 16*r^2*(-1/2*1/E^(r^2/4) + 
                      r^2/(4*E^(r^2/4))) + 32*r*(r/(2*E^(r^2/4)) - 
                      (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 
                    8*r^2*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - 
                      (r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/
                          (4*E^(r^2/4))))/2))/2)))/r^3 - 
                 (3*((80*r)/E^(r^2/4) - (16*r^3)/E^(r^2/4) - 32*r*
                     (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 
                    64*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/
                          (4*E^(r^2/4))))/2) - 16*r^2*(r/(2*E^(r^2/4)) - 
                      (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 
                    32*r*(1/(2*E^(r^2/4)) - r^2/(4*E^(r^2/4)) + 
                      (1/(2*E^(r^2/4)) - r^2/(4*E^(r^2/4)))/2 - 
                      (r*((3*r)/(4*E^(r^2/4)) - r^3/(8*E^(r^2/4))))/2) + 
                    16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - 
                      (r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/
                          (4*E^(r^2/4))))/2))/2) + 8*r^2*(-1/4*r/E^(r^2/4) + 
                      (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/4 + 
                      (3*(-1/2*r/E^(r^2/4) + (r*(-1/2*1/E^(r^2/4) + r^2/
                          (4*E^(r^2/4))))/2))/2 - (r*(3/(4*E^(r^2/4)) - 
                         (3*r^2)/(8*E^(r^2/4)) - (r*(r/(2*E^(r^2/4)) - 
                          (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2))/2))/
                       2)))/r^2 + (64/E^(r^2/4) - (64*r^2)/E^(r^2/4) - 
                   64*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*r^2*
                    (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) - 64*r*
                    (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/
                         (4*E^(r^2/4))))/2) + 64*(1/(2*E^(r^2/4)) - 
                     r^2/(4*E^(r^2/4)) + (1/(2*E^(r^2/4)) - r^2/
                        (4*E^(r^2/4)))/2 - (r*((3*r)/(4*E^(r^2/4)) - 
                        r^3/(8*E^(r^2/4))))/2) + 48*(3/(4*E^(r^2/4)) - 
                     (3*r^2)/(8*E^(r^2/4)) - (r*(r/(2*E^(r^2/4)) - 
                        (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2))/2) - 
                   16*r^2*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - 
                     (r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/
                          (4*E^(r^2/4))))/2))/2) + 32*r*((-5*r)/
                      (4*E^(r^2/4)) + r^3/(8*E^(r^2/4)) + 
                     (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2 - 
                     (r*(3/(4*E^(r^2/4)) - (5*r^2)/(8*E^(r^2/4)) + 
                        (r^2*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/4))/2) + 
                   32*r*(-1/4*r/E^(r^2/4) + (r*(-1/2*1/E^(r^2/4) + 
                        r^2/(4*E^(r^2/4))))/4 + (3*(-1/2*r/E^(r^2/4) + 
                        (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2))/2 - 
                     (r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - 
                        (r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/
                          (4*E^(r^2/4))))/2))/2))/2) + 8*r^2*
                    (-1/8*1/E^(r^2/4) + r^2/(16*E^(r^2/4)) + 
                     (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))/2 + 
                     (r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/
                          (4*E^(r^2/4))))/2))/4 + 2*(-3/(4*E^(r^2/4)) + 
                       (3*r^2)/(8*E^(r^2/4)) + (r*(r/(2*E^(r^2/4)) - 
                          (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2))/2) - 
                     (r*(-1/4*r/E^(r^2/4) + (r*(-1/2*1/E^(r^2/4) + r^2/
                          (4*E^(r^2/4))))/4 + (3*(-1/2*r/E^(r^2/4) + 
                          (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2))/2 - 
                        (r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - 
                          (r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + 
                          r^2/(4*E^(r^2/4))))/2))/2))/2))/2))/r)*
                Sin[theta]^2)/4 + 3*((-15*((16*r)/E^(r^2/4) - (4*r^3)/
                    E^(r^2/4)))/r^6 + (15*(16/E^(r^2/4) - (16*r^2)/
                    E^(r^2/4) + 8*r^2*(-1/2*1/E^(r^2/4) + r^2/
                      (4*E^(r^2/4)))))/r^5 - (6*((-40*r)/E^(r^2/4) + 
                   (8*r^3)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + 
                     r^2/(4*E^(r^2/4))) + 8*r^2*(r/(2*E^(r^2/4)) - 
                     (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2)))/r^4 + 
                (-32/E^(r^2/4) + (32*r^2)/E^(r^2/4) + 32*(-1/2*1/E^(r^2/4) + 
                    r^2/(4*E^(r^2/4))) - 16*r^2*(-1/2*1/E^(r^2/4) + 
                    r^2/(4*E^(r^2/4))) + 32*r*(r/(2*E^(r^2/4)) - 
                    (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 
                  8*r^2*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - 
                    (r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/
                          (4*E^(r^2/4))))/2))/2))/r^3)*(1 - 
                3*Sin[theta]^2))))/(-2 + 3.0000000000000004*^-8*
             (24/(E^(r^2/4)*r^3) - (3*((16*r)/E^(r^2/4) - (4*r^3)/E^(r^2/4)))/
               r^4 + (16/E^(r^2/4) - (16*r^2)/E^(r^2/4) + 8*r^2*
                 (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/r^3)*
             (-1 + 3*Cos[2*theta]) + 1.5000000000000002*^-8*
             (168/(E^(r^2/4)*r^3) - (21*((16*r)/E^(r^2/4) - (4*r^3)/
                  E^(r^2/4)))/r^4 + (9*(16/E^(r^2/4) - (16*r^2)/E^(r^2/4) + 
                 8*r^2*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 - 
              (2*((-40*r)/E^(r^2/4) + (8*r^3)/E^(r^2/4) + 16*r*
                  (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 8*r^2*
                  (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/
                       (4*E^(r^2/4))))/2)))/r^2 + (-32/E^(r^2/4) + 
                (32*r^2)/E^(r^2/4) + 32*(-1/2*1/E^(r^2/4) + 
                  r^2/(4*E^(r^2/4))) - 16*r^2*(-1/2*1/E^(r^2/4) + 
                  r^2/(4*E^(r^2/4))) + 32*r*(r/(2*E^(r^2/4)) - 
                  (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 
                8*r^2*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - 
                  (r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/
                         (4*E^(r^2/4))))/2))/2))/r)*Sin[theta]^2)^2 + 
         (5.*^-9*(-9.000000000000001*^-8*r*(-120/(E^(r^2/4)*r^4) + 
              (15*((16*r)/E^(r^2/4) - (4*r^3)/E^(r^2/4)))/r^5 - 
              (6*(16/E^(r^2/4) - (16*r^2)/E^(r^2/4) + 8*r^2*
                  (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^4 + 
              ((-40*r)/E^(r^2/4) + (8*r^3)/E^(r^2/4) + 16*r*
                 (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 8*r^2*
                 (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/
                      (4*E^(r^2/4))))/2))/r^3) + 1.5000000000000002*^-8*
             (168/(E^(r^2/4)*r^3) - (21*((16*r)/E^(r^2/4) - (4*r^3)/
                  E^(r^2/4)))/r^4 + (9*(16/E^(r^2/4) - (16*r^2)/E^(r^2/4) + 
                 8*r^2*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 - 
              (2*((-40*r)/E^(r^2/4) + (8*r^3)/E^(r^2/4) + 16*r*
                  (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 8*r^2*
                  (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/
                       (4*E^(r^2/4))))/2)))/r^2 + (-32/E^(r^2/4) + 
                (32*r^2)/E^(r^2/4) + 32*(-1/2*1/E^(r^2/4) + 
                  r^2/(4*E^(r^2/4))) - 16*r^2*(-1/2*1/E^(r^2/4) + 
                  r^2/(4*E^(r^2/4))) + 32*r*(r/(2*E^(r^2/4)) - 
                  (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 
                8*r^2*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - 
                  (r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/
                         (4*E^(r^2/4))))/2))/2))/r) + 7.500000000000001*^-9*r*
             (-840/(E^(r^2/4)*r^4) + (105*((16*r)/E^(r^2/4) - (4*r^3)/
                  E^(r^2/4)))/r^5 - (48*(16/E^(r^2/4) - (16*r^2)/E^(r^2/4) + 
                 8*r^2*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^4 + 
              (13*((-40*r)/E^(r^2/4) + (8*r^3)/E^(r^2/4) + 16*r*
                  (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 8*r^2*
                  (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/
                       (4*E^(r^2/4))))/2)))/r^3 - (3*(-32/E^(r^2/4) + 
                 (32*r^2)/E^(r^2/4) + 32*(-1/2*1/E^(r^2/4) + 
                   r^2/(4*E^(r^2/4))) - 16*r^2*(-1/2*1/E^(r^2/4) + 
                   r^2/(4*E^(r^2/4))) + 32*r*(r/(2*E^(r^2/4)) - 
                   (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 
                 8*r^2*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - 
                   (r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/
                          (4*E^(r^2/4))))/2))/2)))/r^2 + ((80*r)/E^(r^2/4) - 
                (16*r^3)/E^(r^2/4) - 32*r*(-1/2*1/E^(r^2/4) + 
                  r^2/(4*E^(r^2/4))) + 64*(r/(2*E^(r^2/4)) - 
                  (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) - 
                16*r^2*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + 
                     r^2/(4*E^(r^2/4))))/2) + 32*r*(1/(2*E^(r^2/4)) - 
                  r^2/(4*E^(r^2/4)) + (1/(2*E^(r^2/4)) - r^2/(4*E^(r^2/4)))/
                   2 - (r*((3*r)/(4*E^(r^2/4)) - r^3/(8*E^(r^2/4))))/2) + 
                16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - 
                  (r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/
                         (4*E^(r^2/4))))/2))/2) + 8*r^2*(-1/4*r/E^(r^2/4) + 
                  (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/4 + 
                  (3*(-1/2*r/E^(r^2/4) + (r*(-1/2*1/E^(r^2/4) + r^2/
                         (4*E^(r^2/4))))/2))/2 - (r*(3/(4*E^(r^2/4)) - 
                     (3*r^2)/(8*E^(r^2/4)) - (r*(r/(2*E^(r^2/4)) - 
                        (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2))/2))/
                   2))/r) - 2*Csc[theta]^2 + 3.0000000000000004*^-8*r*
             (-120/(E^(r^2/4)*r^4) + (15*((16*r)/E^(r^2/4) - (4*r^3)/
                  E^(r^2/4)))/r^5 - (6*(16/E^(r^2/4) - (16*r^2)/E^(r^2/4) + 
                 8*r^2*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^4 + 
              ((-40*r)/E^(r^2/4) + (8*r^3)/E^(r^2/4) + 16*r*
                 (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 8*r^2*
                 (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/
                      (4*E^(r^2/4))))/2))/r^3)*Csc[theta]^2 + 
            6.000000000000001*^-8*(24/(E^(r^2/4)*r^3) - 
              (3*((16*r)/E^(r^2/4) - (4*r^3)/E^(r^2/4)))/r^4 + 
              (16/E^(r^2/4) - (16*r^2)/E^(r^2/4) + 8*r^2*(-1/2*1/E^(r^2/4) + 
                  r^2/(4*E^(r^2/4))))/r^3)*(-3 + Csc[theta]^2))*
           (-9.*^-8*(-48/(E^(r^2/4)*r^3) + (6*((16*r)/E^(r^2/4) - 
                 (4*r^3)/E^(r^2/4)))/r^4 - (3*(16/E^(r^2/4) - (16*r^2)/
                  E^(r^2/4) + 8*r^2*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/
               r^3 + ((-40*r)/E^(r^2/4) + (8*r^3)/E^(r^2/4) + 
                16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 
                8*r^2*(r/(2*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) - 
                 (4*r^3)/E^(r^2/4)))/r^5 + (6*(16/E^(r^2/4) - (16*r^2)/
                  E^(r^2/4) + 8*r^2*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/
               r^4 - (3*((-40*r)/E^(r^2/4) + (8*r^3)/E^(r^2/4) + 
                 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 
                 8*r^2*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + 
                      r^2/(4*E^(r^2/4))))/2)))/r^3 + (-32/E^(r^2/4) + 
                (32*r^2)/E^(r^2/4) + 32*(-1/2*1/E^(r^2/4) + 
                  r^2/(4*E^(r^2/4))) - 16*r^2*(-1/2*1/E^(r^2/4) + 
                  r^2/(4*E^(r^2/4))) + 32*r*(r/(2*E^(r^2/4)) - 
                  (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 
                8*r^2*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - 
                  (r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/
                         (4*E^(r^2/4))))/2))/2))/r^2)*Cos[theta]^2*
             Sin[theta]^2 - (3*((3*((16*r)/E^(r^2/4) - (4*r^3)/E^(r^2/4)))/
                r^5 - (3*(16/E^(r^2/4) - (16*r^2)/E^(r^2/4) + 8*r^2*
                   (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^4 + 
               ((-40*r)/E^(r^2/4) + (8*r^3)/E^(r^2/4) + 16*r*
                  (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 8*r^2*
                  (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/
                       (4*E^(r^2/4))))/2))/r^3)*(1 + 3*Cos[2*theta])*
              (-1 + 3.0000000000000004*^-8*(24/(E^(r^2/4)*r^3) - 
                 (3*((16*r)/E^(r^2/4) - (4*r^3)/E^(r^2/4)))/r^4 + 
                 (16/E^(r^2/4) - (16*r^2)/E^(r^2/4) + 8*r^2*
                    (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/r^3) - 
               7.500000000000001*^-9*(168/(E^(r^2/4)*r^3) - 
                 (21*((16*r)/E^(r^2/4) - (4*r^3)/E^(r^2/4)))/r^4 + 
                 (9*(16/E^(r^2/4) - (16*r^2)/E^(r^2/4) + 8*r^2*
                     (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 - 
                 (2*((-40*r)/E^(r^2/4) + (8*r^3)/E^(r^2/4) + 16*r*
                     (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 8*r^2*
                     (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/
                          (4*E^(r^2/4))))/2)))/r^2 + (-32/E^(r^2/4) + 
                   (32*r^2)/E^(r^2/4) + 32*(-1/2*1/E^(r^2/4) + r^2/
                      (4*E^(r^2/4))) - 16*r^2*(-1/2*1/E^(r^2/4) + 
                     r^2/(4*E^(r^2/4))) + 32*r*(r/(2*E^(r^2/4)) - 
                     (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 
                   8*r^2*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - 
                     (r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/
                          (4*E^(r^2/4))))/2))/2))/r)*Sin[theta]^2))/2))/
          (r*(7.500000000000001*^-9*(168/(E^(r^2/4)*r^3) - 
              (21*((16*r)/E^(r^2/4) - (4*r^3)/E^(r^2/4)))/r^4 + 
              (9*(16/E^(r^2/4) - (16*r^2)/E^(r^2/4) + 8*r^2*
                  (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 - 
              (2*((-40*r)/E^(r^2/4) + (8*r^3)/E^(r^2/4) + 16*r*
                  (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 8*r^2*
                  (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/
                       (4*E^(r^2/4))))/2)))/r^2 + (-32/E^(r^2/4) + 
                (32*r^2)/E^(r^2/4) + 32*(-1/2*1/E^(r^2/4) + 
                  r^2/(4*E^(r^2/4))) - 16*r^2*(-1/2*1/E^(r^2/4) + 
                  r^2/(4*E^(r^2/4))) + 32*r*(r/(2*E^(r^2/4)) - 
                  (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 
                8*r^2*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - 
                  (r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/
                         (4*E^(r^2/4))))/2))/2))/r) - Csc[theta]^2 + 
            3.0000000000000004*^-8*(24/(E^(r^2/4)*r^3) - 
              (3*((16*r)/E^(r^2/4) - (4*r^3)/E^(r^2/4)))/r^4 + 
              (16/E^(r^2/4) - (16*r^2)/E^(r^2/4) + 8*r^2*(-1/2*1/E^(r^2/4) + 
                  r^2/(4*E^(r^2/4))))/r^3)*(-3 + Csc[theta]^2))*
           (2 - 9.*^-16*(24/(E^(r^2/4)*r^3) - (3*((16*r)/E^(r^2/4) - 
                  (4*r^3)/E^(r^2/4)))/r^4 + (16/E^(r^2/4) - (16*r^2)/
                  E^(r^2/4) + 8*r^2*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/
                r^3)^2*(1 + 3*Cos[2*theta]) + 1.5000000000000002*^-8*
             (168/(E^(r^2/4)*r^3) - (21*((16*r)/E^(r^2/4) - (4*r^3)/
                  E^(r^2/4)))/r^4 + (9*(16/E^(r^2/4) - (16*r^2)/E^(r^2/4) + 
                 8*r^2*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 - 
              (2*((-40*r)/E^(r^2/4) + (8*r^3)/E^(r^2/4) + 16*r*
                  (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 8*r^2*
                  (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/
                       (4*E^(r^2/4))))/2)))/r^2 + (-32/E^(r^2/4) + 
                (32*r^2)/E^(r^2/4) + 32*(-1/2*1/E^(r^2/4) + 
                  r^2/(4*E^(r^2/4))) - 16*r^2*(-1/2*1/E^(r^2/4) + 
                  r^2/(4*E^(r^2/4))) + 32*r*(r/(2*E^(r^2/4)) - 
                  (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 
                8*r^2*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - 
                  (r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/
                         (4*E^(r^2/4))))/2))/2))/r)*Sin[theta]^2 + 
            3.0000000000000004*^-8*(24/(E^(r^2/4)*r^3) - 
              (3*((16*r)/E^(r^2/4) - (4*r^3)/E^(r^2/4)))/r^4 + 
              (16/E^(r^2/4) - (16*r^2)/E^(r^2/4) + 8*r^2*(-1/2*1/E^(r^2/4) + 
                  r^2/(4*E^(r^2/4))))/r^3)*(-1 + 3*Cos[2*theta] + 
              7.500000000000001*^-9*(168/(E^(r^2/4)*r^3) - 
                (21*((16*r)/E^(r^2/4) - (4*r^3)/E^(r^2/4)))/r^4 + 
                (9*(16/E^(r^2/4) - (16*r^2)/E^(r^2/4) + 8*r^2*
                    (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 - 
                (2*((-40*r)/E^(r^2/4) + (8*r^3)/E^(r^2/4) + 16*r*
                    (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 8*r^2*
                    (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/
                         (4*E^(r^2/4))))/2)))/r^2 + (-32/E^(r^2/4) + 
                  (32*r^2)/E^(r^2/4) + 32*(-1/2*1/E^(r^2/4) + r^2/
                     (4*E^(r^2/4))) - 16*r^2*(-1/2*1/E^(r^2/4) + 
                    r^2/(4*E^(r^2/4))) + 32*r*(r/(2*E^(r^2/4)) - 
                    (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 
                  8*r^2*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - 
                    (r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/
                          (4*E^(r^2/4))))/2))/2))/r)*(1 + 3*Cos[2*theta])*
               Sin[theta]^2) - 4.5*^-16*(-48/(E^(r^2/4)*r^3) + 
               (6*((16*r)/E^(r^2/4) - (4*r^3)/E^(r^2/4)))/r^4 - 
               (3*(16/E^(r^2/4) - (16*r^2)/E^(r^2/4) + 8*r^2*
                   (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + 
               ((-40*r)/E^(r^2/4) + (8*r^3)/E^(r^2/4) + 16*r*
                  (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 8*r^2*
                  (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/
                       (4*E^(r^2/4))))/2))/r^2)^2*Sin[2*theta]^2)) + 
         (1.5000000000000002*^-8*Cos[theta]*(-3.0000000000000004*^-8*
             ((3*((16*r)/E^(r^2/4) - (4*r^3)/E^(r^2/4)))/r^5 - 
              (3*(16/E^(r^2/4) - (16*r^2)/E^(r^2/4) + 8*r^2*
                  (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^4 + 
              ((-40*r)/E^(r^2/4) + (8*r^3)/E^(r^2/4) + 16*r*
                 (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 8*r^2*
                 (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/
                      (4*E^(r^2/4))))/2))/r^3)*(-48/(E^(r^2/4)*r^3) + 
              (6*((16*r)/E^(r^2/4) - (4*r^3)/E^(r^2/4)))/r^4 - 
              (3*(16/E^(r^2/4) - (16*r^2)/E^(r^2/4) + 8*r^2*
                  (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + 
              ((-40*r)/E^(r^2/4) + (8*r^3)/E^(r^2/4) + 16*r*
                 (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 8*r^2*
                 (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/
                      (4*E^(r^2/4))))/2))/r^2)*(1 + 3*Cos[2*theta]) + 
            ((-6*((16*r)/E^(r^2/4) - (4*r^3)/E^(r^2/4)))/r^5 + 
              (6*(16/E^(r^2/4) - (16*r^2)/E^(r^2/4) + 8*r^2*
                  (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^4 - 
              (3*((-40*r)/E^(r^2/4) + (8*r^3)/E^(r^2/4) + 16*r*
                  (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 8*r^2*
                  (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/
                       (4*E^(r^2/4))))/2)))/r^3 + (-32/E^(r^2/4) + 
                (32*r^2)/E^(r^2/4) + 32*(-1/2*1/E^(r^2/4) + 
                  r^2/(4*E^(r^2/4))) - 16*r^2*(-1/2*1/E^(r^2/4) + 
                  r^2/(4*E^(r^2/4))) + 32*r*(r/(2*E^(r^2/4)) - 
                  (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 
                8*r^2*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - 
                  (r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/
                         (4*E^(r^2/4))))/2))/2))/r^2)*
             (2 + 3.0000000000000004*^-8*(24/(E^(r^2/4)*r^3) - 
                (3*((16*r)/E^(r^2/4) - (4*r^3)/E^(r^2/4)))/r^4 + 
                (16/E^(r^2/4) - (16*r^2)/E^(r^2/4) + 8*r^2*
                   (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/r^3)*(1 + 
                3*Cos[2*theta])))*(1.5000000000000002*^-8*
             (168/(E^(r^2/4)*r^3) - (21*((16*r)/E^(r^2/4) - (4*r^3)/
                  E^(r^2/4)))/r^4 + (9*(16/E^(r^2/4) - (16*r^2)/E^(r^2/4) + 
                 8*r^2*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 - 
              (2*((-40*r)/E^(r^2/4) + (8*r^3)/E^(r^2/4) + 16*r*
                  (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 8*r^2*
                  (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/
                       (4*E^(r^2/4))))/2)))/r^2 + (-32/E^(r^2/4) + 
                (32*r^2)/E^(r^2/4) + 32*(-1/2*1/E^(r^2/4) + 
                  r^2/(4*E^(r^2/4))) - 16*r^2*(-1/2*1/E^(r^2/4) + 
                  r^2/(4*E^(r^2/4))) + 32*r*(r/(2*E^(r^2/4)) - 
                  (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 
                8*r^2*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - 
                  (r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/
                         (4*E^(r^2/4))))/2))/2))/r)*Cos[theta] - 
            Cot[theta]*Csc[theta] + 3*(24/(E^(r^2/4)*r^3) - 
              (3*((16*r)/E^(r^2/4) - (4*r^3)/E^(r^2/4)))/r^4 + 
              (16/E^(r^2/4) - (16*r^2)/E^(r^2/4) + 8*r^2*(-1/2*1/E^(r^2/4) + 
                  r^2/(4*E^(r^2/4))))/r^3)*(-6.000000000000001*^-8*Cos[
                theta] + 1.*^-8*Cot[theta]*Csc[theta])))/
          (r*(7.500000000000001*^-9*(168/(E^(r^2/4)*r^3) - 
              (21*((16*r)/E^(r^2/4) - (4*r^3)/E^(r^2/4)))/r^4 + 
              (9*(16/E^(r^2/4) - (16*r^2)/E^(r^2/4) + 8*r^2*
                  (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 - 
              (2*((-40*r)/E^(r^2/4) + (8*r^3)/E^(r^2/4) + 16*r*
                  (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 8*r^2*
                  (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/
                       (4*E^(r^2/4))))/2)))/r^2 + (-32/E^(r^2/4) + 
                (32*r^2)/E^(r^2/4) + 32*(-1/2*1/E^(r^2/4) + 
                  r^2/(4*E^(r^2/4))) - 16*r^2*(-1/2*1/E^(r^2/4) + 
                  r^2/(4*E^(r^2/4))) + 32*r*(r/(2*E^(r^2/4)) - 
                  (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 
                8*r^2*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - 
                  (r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/
                         (4*E^(r^2/4))))/2))/2))/r) - Csc[theta]^2 + 
            3.0000000000000004*^-8*(24/(E^(r^2/4)*r^3) - 
              (3*((16*r)/E^(r^2/4) - (4*r^3)/E^(r^2/4)))/r^4 + 
              (16/E^(r^2/4) - (16*r^2)/E^(r^2/4) + 8*r^2*(-1/2*1/E^(r^2/4) + 
                  r^2/(4*E^(r^2/4))))/r^3)*(-3 + Csc[theta]^2))*
           (-2 + 9.*^-16*(24/(E^(r^2/4)*r^3) - (3*((16*r)/E^(r^2/4) - 
                  (4*r^3)/E^(r^2/4)))/r^4 + (16/E^(r^2/4) - (16*r^2)/
                  E^(r^2/4) + 8*r^2*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/
                r^3)^2*(1 + 3*Cos[2*theta]) - 1.5000000000000002*^-8*
             (168/(E^(r^2/4)*r^3) - (21*((16*r)/E^(r^2/4) - (4*r^3)/
                  E^(r^2/4)))/r^4 + (9*(16/E^(r^2/4) - (16*r^2)/E^(r^2/4) + 
                 8*r^2*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 - 
              (2*((-40*r)/E^(r^2/4) + (8*r^3)/E^(r^2/4) + 16*r*
                  (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 8*r^2*
                  (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/
                       (4*E^(r^2/4))))/2)))/r^2 + (-32/E^(r^2/4) + 
                (32*r^2)/E^(r^2/4) + 32*(-1/2*1/E^(r^2/4) + 
                  r^2/(4*E^(r^2/4))) - 16*r^2*(-1/2*1/E^(r^2/4) + 
                  r^2/(4*E^(r^2/4))) + 32*r*(r/(2*E^(r^2/4)) - 
                  (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 
                8*r^2*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - 
                  (r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/
                         (4*E^(r^2/4))))/2))/2))/r)*Sin[theta]^2 - 
            3.0000000000000004*^-8*(24/(E^(r^2/4)*r^3) - 
              (3*((16*r)/E^(r^2/4) - (4*r^3)/E^(r^2/4)))/r^4 + 
              (16/E^(r^2/4) - (16*r^2)/E^(r^2/4) + 8*r^2*(-1/2*1/E^(r^2/4) + 
                  r^2/(4*E^(r^2/4))))/r^3)*(-1 + 3*Cos[2*theta] + 
              7.500000000000001*^-9*(168/(E^(r^2/4)*r^3) - 
                (21*((16*r)/E^(r^2/4) - (4*r^3)/E^(r^2/4)))/r^4 + 
                (9*(16/E^(r^2/4) - (16*r^2)/E^(r^2/4) + 8*r^2*
                    (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 - 
                (2*((-40*r)/E^(r^2/4) + (8*r^3)/E^(r^2/4) + 16*r*
                    (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 8*r^2*
                    (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/
                         (4*E^(r^2/4))))/2)))/r^2 + (-32/E^(r^2/4) + 
                  (32*r^2)/E^(r^2/4) + 32*(-1/2*1/E^(r^2/4) + r^2/
                     (4*E^(r^2/4))) - 16*r^2*(-1/2*1/E^(r^2/4) + 
                    r^2/(4*E^(r^2/4))) + 32*r*(r/(2*E^(r^2/4)) - 
                    (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 
                  8*r^2*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - 
                    (r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/
                          (4*E^(r^2/4))))/2))/2))/r)*(1 + 3*Cos[2*theta])*
               Sin[theta]^2) + 4.5*^-16*(-48/(E^(r^2/4)*r^3) + 
               (6*((16*r)/E^(r^2/4) - (4*r^3)/E^(r^2/4)))/r^4 - 
               (3*(16/E^(r^2/4) - (16*r^2)/E^(r^2/4) + 8*r^2*
                   (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + 
               ((-40*r)/E^(r^2/4) + (8*r^3)/E^(r^2/4) + 16*r*
                  (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 8*r^2*
                  (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/
                       (4*E^(r^2/4))))/2))/r^2)^2*Sin[2*theta]^2))))/
       Sqrt[2] + ((I/2)*r*Sin[theta]*(1 - 7.500000000000001*^-9*
          (168/(E^(r^2/4)*r^3) - (21*((16*r)/E^(r^2/4) - (4*r^3)/E^(r^2/4)))/
            r^4 + (9*(16/E^(r^2/4) - (16*r^2)/E^(r^2/4) + 
              8*r^2*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 - 
           (2*((-40*r)/E^(r^2/4) + (8*r^3)/E^(r^2/4) + 
              16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 
              8*r^2*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + 
                   r^2/(4*E^(r^2/4))))/2)))/r^2 + 
           (-32/E^(r^2/4) + (32*r^2)/E^(r^2/4) + 32*(-1/2*1/E^(r^2/4) + r^2/
                (4*E^(r^2/4))) - 16*r^2*(-1/2*1/E^(r^2/4) + r^2/
                (4*E^(r^2/4))) + 32*r*(r/(2*E^(r^2/4)) - 
               (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 
             8*r^2*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - 
               (r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/
                      (4*E^(r^2/4))))/2))/2))/r)*Sin[theta]^2 + 
         3.0000000000000004*^-8*(24/(E^(r^2/4)*r^3) - 
           (3*((16*r)/E^(r^2/4) - (4*r^3)/E^(r^2/4)))/r^4 + 
           (16/E^(r^2/4) - (16*r^2)/E^(r^2/4) + 8*r^2*(-1/2*1/E^(r^2/4) + r^2/
                (4*E^(r^2/4))))/r^3)*(-1 + 3*Sin[theta]^2))*
        (-1/4*(-9.000000000000001*^-8*r*(-120/(E^(r^2/4)*r^4) + 
               (15*((16*r)/E^(r^2/4) - (4*r^3)/E^(r^2/4)))/r^5 - 
               (6*(16/E^(r^2/4) - (16*r^2)/E^(r^2/4) + 8*r^2*
                   (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^4 + 
               ((-40*r)/E^(r^2/4) + (8*r^3)/E^(r^2/4) + 16*r*
                  (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 8*r^2*
                  (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/
                       (4*E^(r^2/4))))/2))/r^3) + 1.5000000000000002*^-8*
              (168/(E^(r^2/4)*r^3) - (21*((16*r)/E^(r^2/4) - (4*r^3)/
                   E^(r^2/4)))/r^4 + (9*(16/E^(r^2/4) - (16*r^2)/E^(r^2/4) + 
                  8*r^2*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 - 
               (2*((-40*r)/E^(r^2/4) + (8*r^3)/E^(r^2/4) + 16*r*
                   (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 8*r^2*
                   (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/
                        (4*E^(r^2/4))))/2)))/r^2 + (-32/E^(r^2/4) + 
                 (32*r^2)/E^(r^2/4) + 32*(-1/2*1/E^(r^2/4) + 
                   r^2/(4*E^(r^2/4))) - 16*r^2*(-1/2*1/E^(r^2/4) + 
                   r^2/(4*E^(r^2/4))) + 32*r*(r/(2*E^(r^2/4)) - 
                   (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 
                 8*r^2*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - 
                   (r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/
                          (4*E^(r^2/4))))/2))/2))/r) + 7.500000000000001*^-9*
              r*(-840/(E^(r^2/4)*r^4) + (105*((16*r)/E^(r^2/4) - (4*r^3)/
                   E^(r^2/4)))/r^5 - (48*(16/E^(r^2/4) - (16*r^2)/E^(r^2/4) + 
                  8*r^2*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^4 + 
               (13*((-40*r)/E^(r^2/4) + (8*r^3)/E^(r^2/4) + 16*r*
                   (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 8*r^2*
                   (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/
                        (4*E^(r^2/4))))/2)))/r^3 - (3*(-32/E^(r^2/4) + 
                  (32*r^2)/E^(r^2/4) + 32*(-1/2*1/E^(r^2/4) + r^2/
                     (4*E^(r^2/4))) - 16*r^2*(-1/2*1/E^(r^2/4) + 
                    r^2/(4*E^(r^2/4))) + 32*r*(r/(2*E^(r^2/4)) - 
                    (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 
                  8*r^2*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - 
                    (r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/
                          (4*E^(r^2/4))))/2))/2)))/r^2 + ((80*r)/E^(r^2/4) - 
                 (16*r^3)/E^(r^2/4) - 32*r*(-1/2*1/E^(r^2/4) + 
                   r^2/(4*E^(r^2/4))) + 64*(r/(2*E^(r^2/4)) - 
                   (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) - 
                 16*r^2*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + 
                      r^2/(4*E^(r^2/4))))/2) + 32*r*(1/(2*E^(r^2/4)) - 
                   r^2/(4*E^(r^2/4)) + (1/(2*E^(r^2/4)) - r^2/(4*E^(r^2/4)))/
                    2 - (r*((3*r)/(4*E^(r^2/4)) - r^3/(8*E^(r^2/4))))/2) + 
                 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - 
                   (r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/
                          (4*E^(r^2/4))))/2))/2) + 8*r^2*(-1/4*r/E^(r^2/4) + 
                   (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/4 + 
                   (3*(-1/2*r/E^(r^2/4) + (r*(-1/2*1/E^(r^2/4) + r^2/
                          (4*E^(r^2/4))))/2))/2 - (r*(3/(4*E^(r^2/4)) - 
                      (3*r^2)/(8*E^(r^2/4)) - (r*(r/(2*E^(r^2/4)) - 
                         (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2))/2))/
                    2))/r) - 2*Csc[theta]^2 + 3.0000000000000004*^-8*r*
              (-120/(E^(r^2/4)*r^4) + (15*((16*r)/E^(r^2/4) - (4*r^3)/
                   E^(r^2/4)))/r^5 - (6*(16/E^(r^2/4) - (16*r^2)/E^(r^2/4) + 
                  8*r^2*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^4 + 
               ((-40*r)/E^(r^2/4) + (8*r^3)/E^(r^2/4) + 16*r*
                  (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 8*r^2*
                  (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/
                       (4*E^(r^2/4))))/2))/r^3)*Csc[theta]^2 + 
             6.000000000000001*^-8*(24/(E^(r^2/4)*r^3) - 
               (3*((16*r)/E^(r^2/4) - (4*r^3)/E^(r^2/4)))/r^4 + 
               (16/E^(r^2/4) - (16*r^2)/E^(r^2/4) + 8*r^2*(-1/2*1/E^(r^2/4) + 
                   r^2/(4*E^(r^2/4))))/r^3)*(-3 + Csc[theta]^2))^2/
           (r^2*(7.500000000000001*^-9*(168/(E^(r^2/4)*r^3) - 
                (21*((16*r)/E^(r^2/4) - (4*r^3)/E^(r^2/4)))/r^4 + 
                (9*(16/E^(r^2/4) - (16*r^2)/E^(r^2/4) + 8*r^2*
                    (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 - 
                (2*((-40*r)/E^(r^2/4) + (8*r^3)/E^(r^2/4) + 16*r*
                    (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 8*r^2*
                    (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/
                         (4*E^(r^2/4))))/2)))/r^2 + (-32/E^(r^2/4) + 
                  (32*r^2)/E^(r^2/4) + 32*(-1/2*1/E^(r^2/4) + r^2/
                     (4*E^(r^2/4))) - 16*r^2*(-1/2*1/E^(r^2/4) + 
                    r^2/(4*E^(r^2/4))) + 32*r*(r/(2*E^(r^2/4)) - 
                    (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 
                  8*r^2*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - 
                    (r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/
                          (4*E^(r^2/4))))/2))/2))/r) - Csc[theta]^2 + 
              3.0000000000000004*^-8*(24/(E^(r^2/4)*r^3) - 
                (3*((16*r)/E^(r^2/4) - (4*r^3)/E^(r^2/4)))/r^4 + 
                (16/E^(r^2/4) - (16*r^2)/E^(r^2/4) + 8*r^2*
                   (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/r^3)*(-3 + 
                Csc[theta]^2))^2) + (7.500000000000001*^-17*
           ((3*((16*r)/E^(r^2/4) - (4*r^3)/E^(r^2/4)))/r^5 - 
            (3*(16/E^(r^2/4) - (16*r^2)/E^(r^2/4) + 8*r^2*(-1/2*1/E^(r^2/4) + 
                 r^2/(4*E^(r^2/4)))))/r^4 + ((-40*r)/E^(r^2/4) + 
              (8*r^3)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + 
                r^2/(4*E^(r^2/4))) + 8*r^2*(r/(2*E^(r^2/4)) - 
                (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2))/r^3)*
           (1 + 3*Cos[2*theta])*((3*((21*((16*r)/E^(r^2/4) - (4*r^3)/
                   E^(r^2/4)))/r^5 - (21*(16/E^(r^2/4) - (16*r^2)/E^(r^2/4) + 
                  8*r^2*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^4 + 
               (9*((-40*r)/E^(r^2/4) + (8*r^3)/E^(r^2/4) + 16*r*
                   (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 8*r^2*
                   (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/
                        (4*E^(r^2/4))))/2)))/r^3 - (2*(-32/E^(r^2/4) + 
                  (32*r^2)/E^(r^2/4) + 32*(-1/2*1/E^(r^2/4) + r^2/
                     (4*E^(r^2/4))) - 16*r^2*(-1/2*1/E^(r^2/4) + 
                    r^2/(4*E^(r^2/4))) + 32*r*(r/(2*E^(r^2/4)) - 
                    (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 
                  8*r^2*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - 
                    (r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/
                          (4*E^(r^2/4))))/2))/2)))/r^2 + ((80*r)/E^(r^2/4) - 
                 (16*r^3)/E^(r^2/4) - 32*r*(-1/2*1/E^(r^2/4) + 
                   r^2/(4*E^(r^2/4))) + 64*(r/(2*E^(r^2/4)) - 
                   (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) - 
                 16*r^2*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + 
                      r^2/(4*E^(r^2/4))))/2) + 32*r*(1/(2*E^(r^2/4)) - 
                   r^2/(4*E^(r^2/4)) + (1/(2*E^(r^2/4)) - r^2/(4*E^(r^2/4)))/
                    2 - (r*((3*r)/(4*E^(r^2/4)) - r^3/(8*E^(r^2/4))))/2) + 
                 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - 
                   (r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/
                          (4*E^(r^2/4))))/2))/2) + 8*r^2*(-1/4*r/E^(r^2/4) + 
                   (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/4 + 
                   (3*(-1/2*r/E^(r^2/4) + (r*(-1/2*1/E^(r^2/4) + r^2/
                          (4*E^(r^2/4))))/2))/2 - (r*(3/(4*E^(r^2/4)) - 
                      (3*r^2)/(8*E^(r^2/4)) - (r*(r/(2*E^(r^2/4)) - 
                         (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2))/2))/
                    2))/r)*Sin[theta]^2)/4 + 
            3*((3*((16*r)/E^(r^2/4) - (4*r^3)/E^(r^2/4)))/r^5 - 
              (3*(16/E^(r^2/4) - (16*r^2)/E^(r^2/4) + 8*r^2*
                  (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^4 + 
              ((-40*r)/E^(r^2/4) + (8*r^3)/E^(r^2/4) + 16*r*
                 (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 8*r^2*
                 (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/
                      (4*E^(r^2/4))))/2))/r^3)*(1 - 3*Sin[theta]^2)))/
          (-2 + 3.0000000000000004*^-8*(24/(E^(r^2/4)*r^3) - 
             (3*((16*r)/E^(r^2/4) - (4*r^3)/E^(r^2/4)))/r^4 + 
             (16/E^(r^2/4) - (16*r^2)/E^(r^2/4) + 8*r^2*(-1/2*1/E^(r^2/4) + 
                 r^2/(4*E^(r^2/4))))/r^3)*(-1 + 3*Cos[2*theta]) + 
           1.5000000000000002*^-8*(168/(E^(r^2/4)*r^3) - 
             (21*((16*r)/E^(r^2/4) - (4*r^3)/E^(r^2/4)))/r^4 + 
             (9*(16/E^(r^2/4) - (16*r^2)/E^(r^2/4) + 8*r^2*
                 (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 - 
             (2*((-40*r)/E^(r^2/4) + (8*r^3)/E^(r^2/4) + 16*r*
                 (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 8*r^2*
                 (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/
                      (4*E^(r^2/4))))/2)))/r^2 + (-32/E^(r^2/4) + (32*r^2)/
                E^(r^2/4) + 32*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) - 16*
                r^2*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*r*
                (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/
                  2) + 8*r^2*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - 
                 (r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/
                        (4*E^(r^2/4))))/2))/2))/r)*Sin[theta]^2) + 
         (1.125*^-16*(168/(E^(r^2/4)*r^3) - (21*((16*r)/E^(r^2/4) - 
                 (4*r^3)/E^(r^2/4)))/r^4 + (9*(16/E^(r^2/4) - (16*r^2)/
                  E^(r^2/4) + 8*r^2*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/
               r^3 - (2*((-40*r)/E^(r^2/4) + (8*r^3)/E^(r^2/4) + 
                 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 
                 8*r^2*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + 
                      r^2/(4*E^(r^2/4))))/2)))/r^2 + (-32/E^(r^2/4) + 
                (32*r^2)/E^(r^2/4) + 32*(-1/2*1/E^(r^2/4) + 
                  r^2/(4*E^(r^2/4))) - 16*r^2*(-1/2*1/E^(r^2/4) + 
                  r^2/(4*E^(r^2/4))) + 32*r*(r/(2*E^(r^2/4)) - 
                  (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 
                8*r^2*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - 
                  (r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/
                         (4*E^(r^2/4))))/2))/2))/r)^2 - 7.500000000000001*^-9*
            (168/(E^(r^2/4)*r^3) - (21*((16*r)/E^(r^2/4) - (4*r^3)/
                 E^(r^2/4)))/r^4 + (9*(16/E^(r^2/4) - (16*r^2)/E^(r^2/4) + 
                8*r^2*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 - 
             (2*((-40*r)/E^(r^2/4) + (8*r^3)/E^(r^2/4) + 16*r*
                 (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 8*r^2*
                 (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/
                      (4*E^(r^2/4))))/2)))/r^2 + (-32/E^(r^2/4) + (32*r^2)/
                E^(r^2/4) + 32*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) - 16*
                r^2*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*r*
                (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/
                  2) + 8*r^2*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - 
                 (r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/
                        (4*E^(r^2/4))))/2))/2))/r)*(7.500000000000001*^-9*r^2*
              (5040/(E^(r^2/4)*r^5) - (630*((16*r)/E^(r^2/4) - (4*r^3)/
                   E^(r^2/4)))/r^6 + (297*(16/E^(r^2/4) - (16*r^2)/
                   E^(r^2/4) + 8*r^2*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/
                r^5 - (87*((-40*r)/E^(r^2/4) + (8*r^3)/E^(r^2/4) + 
                  16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 
                  8*r^2*(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*(-32/E^(r^2/4) + 
                  (32*r^2)/E^(r^2/4) + 32*(-1/2*1/E^(r^2/4) + r^2/
                     (4*E^(r^2/4))) - 16*r^2*(-1/2*1/E^(r^2/4) + 
                    r^2/(4*E^(r^2/4))) + 32*r*(r/(2*E^(r^2/4)) - 
                    (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 
                  8*r^2*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - 
                    (r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/
                          (4*E^(r^2/4))))/2))/2)))/r^3 - 
               (4*((80*r)/E^(r^2/4) - (16*r^3)/E^(r^2/4) - 32*r*
                   (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 
                  64*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/
                        (4*E^(r^2/4))))/2) - 16*r^2*(r/(2*E^(r^2/4)) - 
                    (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 
                  32*r*(1/(2*E^(r^2/4)) - r^2/(4*E^(r^2/4)) + 
                    (1/(2*E^(r^2/4)) - r^2/(4*E^(r^2/4)))/2 - 
                    (r*((3*r)/(4*E^(r^2/4)) - r^3/(8*E^(r^2/4))))/2) + 
                  16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - 
                    (r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/
                          (4*E^(r^2/4))))/2))/2) + 8*r^2*(-1/4*r/E^(r^2/4) + 
                    (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/4 + 
                    (3*(-1/2*r/E^(r^2/4) + (r*(-1/2*1/E^(r^2/4) + r^2/
                          (4*E^(r^2/4))))/2))/2 - (r*(3/(4*E^(r^2/4)) - 
                       (3*r^2)/(8*E^(r^2/4)) - (r*(r/(2*E^(r^2/4)) - 
                          (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2))/2))/
                     2)))/r^2 + (64/E^(r^2/4) - (64*r^2)/E^(r^2/4) - 
                 64*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*r^2*
                  (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) - 64*r*
                  (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/
                       (4*E^(r^2/4))))/2) + 64*(1/(2*E^(r^2/4)) - 
                   r^2/(4*E^(r^2/4)) + (1/(2*E^(r^2/4)) - r^2/(4*E^(r^2/4)))/
                    2 - (r*((3*r)/(4*E^(r^2/4)) - r^3/(8*E^(r^2/4))))/2) + 
                 48*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - 
                   (r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/
                          (4*E^(r^2/4))))/2))/2) - 16*r^2*(3/(4*E^(r^2/4)) - 
                   (3*r^2)/(8*E^(r^2/4)) - (r*(r/(2*E^(r^2/4)) - 
                      (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2))/2) + 
                 32*r*((-5*r)/(4*E^(r^2/4)) + r^3/(8*E^(r^2/4)) + 
                   (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2 - 
                   (r*(3/(4*E^(r^2/4)) - (5*r^2)/(8*E^(r^2/4)) + 
                      (r^2*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/4))/2) + 
                 32*r*(-1/4*r/E^(r^2/4) + (r*(-1/2*1/E^(r^2/4) + 
                      r^2/(4*E^(r^2/4))))/4 + (3*(-1/2*r/E^(r^2/4) + 
                      (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2))/2 - 
                   (r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - 
                      (r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/
                          (4*E^(r^2/4))))/2))/2))/2) + 8*r^2*
                  (-1/8*1/E^(r^2/4) + r^2/(16*E^(r^2/4)) + 
                   (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))/2 + 
                   (r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/
                          (4*E^(r^2/4))))/2))/4 + 2*(-3/(4*E^(r^2/4)) + 
                     (3*r^2)/(8*E^(r^2/4)) + (r*(r/(2*E^(r^2/4)) - 
                        (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2))/2) - 
                   (r*(-1/4*r/E^(r^2/4) + (r*(-1/2*1/E^(r^2/4) + r^2/
                          (4*E^(r^2/4))))/4 + (3*(-1/2*r/E^(r^2/4) + 
                         (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2))/2 - 
                      (r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - 
                         (r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/
                          (4*E^(r^2/4))))/2))/2))/2))/2))/r) + 
             4*Csc[theta]^2 - 6.000000000000001*^-8*(24/(E^(r^2/4)*r^3) - 
               (3*((16*r)/E^(r^2/4) - (4*r^3)/E^(r^2/4)))/r^4 + 
               (16/E^(r^2/4) - (16*r^2)/E^(r^2/4) + 8*r^2*(-1/2*1/E^(r^2/4) + 
                   r^2/(4*E^(r^2/4))))/r^3)*(-1 + 3*Cos[2*theta])*
              Csc[theta]^2 + 3.0000000000000004*^-8*r^2*(720/(E^(r^2/4)*
                 r^5) - (90*((16*r)/E^(r^2/4) - (4*r^3)/E^(r^2/4)))/r^6 + 
               (39*(16/E^(r^2/4) - (16*r^2)/E^(r^2/4) + 8*r^2*
                   (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^5 - 
               (9*((-40*r)/E^(r^2/4) + (8*r^3)/E^(r^2/4) + 16*r*
                   (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 8*r^2*
                   (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/
                        (4*E^(r^2/4))))/2)))/r^4 + (-32/E^(r^2/4) + 
                 (32*r^2)/E^(r^2/4) + 32*(-1/2*1/E^(r^2/4) + 
                   r^2/(4*E^(r^2/4))) - 16*r^2*(-1/2*1/E^(r^2/4) + 
                   r^2/(4*E^(r^2/4))) + 32*r*(r/(2*E^(r^2/4)) - 
                   (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 
                 8*r^2*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - 
                   (r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/
                          (4*E^(r^2/4))))/2))/2))/r^3)*(-3 + Csc[theta]^2)) + 
           (2.25*^-16*r^2*(-840/(E^(r^2/4)*r^4) + (105*((16*r)/E^(r^2/4) - 
                   (4*r^3)/E^(r^2/4)))/r^5 - (48*(16/E^(r^2/4) - (16*r^2)/
                    E^(r^2/4) + 8*r^2*(-1/2*1/E^(r^2/4) + r^2/
                      (4*E^(r^2/4)))))/r^4 + (13*((-40*r)/E^(r^2/4) + 
                   (8*r^3)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + 
                     r^2/(4*E^(r^2/4))) + 8*r^2*(r/(2*E^(r^2/4)) - 
                     (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2)))/r^3 - 
                (3*(-32/E^(r^2/4) + (32*r^2)/E^(r^2/4) + 
                   32*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) - 16*r^2*
                    (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*r*
                    (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/
                         (4*E^(r^2/4))))/2) + 8*r^2*(3/(4*E^(r^2/4)) - 
                     (3*r^2)/(8*E^(r^2/4)) - (r*(r/(2*E^(r^2/4)) - 
                        (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2))/2)))/
                 r^2 + ((80*r)/E^(r^2/4) - (16*r^3)/E^(r^2/4) - 
                  32*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 
                  64*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/
                        (4*E^(r^2/4))))/2) - 16*r^2*(r/(2*E^(r^2/4)) - 
                    (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 
                  32*r*(1/(2*E^(r^2/4)) - r^2/(4*E^(r^2/4)) + 
                    (1/(2*E^(r^2/4)) - r^2/(4*E^(r^2/4)))/2 - 
                    (r*((3*r)/(4*E^(r^2/4)) - r^3/(8*E^(r^2/4))))/2) + 
                  16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - 
                    (r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/
                          (4*E^(r^2/4))))/2))/2) + 8*r^2*(-1/4*r/E^(r^2/4) + 
                    (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/4 + 
                    (3*(-1/2*r/E^(r^2/4) + (r*(-1/2*1/E^(r^2/4) + r^2/
                          (4*E^(r^2/4))))/2))/2 - (r*(3/(4*E^(r^2/4)) - 
                       (3*r^2)/(8*E^(r^2/4)) - (r*(r/(2*E^(r^2/4)) - 
                          (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2))/2))/
                     2))/r)^2 + 9.*^-16*r^2*(-120/(E^(r^2/4)*r^4) + 
               (15*((16*r)/E^(r^2/4) - (4*r^3)/E^(r^2/4)))/r^5 - 
               (6*(16/E^(r^2/4) - (16*r^2)/E^(r^2/4) + 8*r^2*
                   (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^4 + 
               ((-40*r)/E^(r^2/4) + (8*r^3)/E^(r^2/4) + 16*r*
                  (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 8*r^2*
                  (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/
                       (4*E^(r^2/4))))/2))/r^3)*(-840/(E^(r^2/4)*r^4) + 
               (105*((16*r)/E^(r^2/4) - (4*r^3)/E^(r^2/4)))/r^5 - 
               (48*(16/E^(r^2/4) - (16*r^2)/E^(r^2/4) + 8*r^2*
                   (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^4 + 
               (13*((-40*r)/E^(r^2/4) + (8*r^3)/E^(r^2/4) + 16*r*
                   (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 8*r^2*
                   (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/
                        (4*E^(r^2/4))))/2)))/r^3 - (3*(-32/E^(r^2/4) + 
                  (32*r^2)/E^(r^2/4) + 32*(-1/2*1/E^(r^2/4) + r^2/
                     (4*E^(r^2/4))) - 16*r^2*(-1/2*1/E^(r^2/4) + 
                    r^2/(4*E^(r^2/4))) + 32*r*(r/(2*E^(r^2/4)) - 
                    (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 
                  8*r^2*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - 
                    (r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/
                          (4*E^(r^2/4))))/2))/2)))/r^2 + ((80*r)/E^(r^2/4) - 
                 (16*r^3)/E^(r^2/4) - 32*r*(-1/2*1/E^(r^2/4) + 
                   r^2/(4*E^(r^2/4))) + 64*(r/(2*E^(r^2/4)) - 
                   (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) - 
                 16*r^2*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + 
                      r^2/(4*E^(r^2/4))))/2) + 32*r*(1/(2*E^(r^2/4)) - 
                   r^2/(4*E^(r^2/4)) + (1/(2*E^(r^2/4)) - r^2/(4*E^(r^2/4)))/
                    2 - (r*((3*r)/(4*E^(r^2/4)) - r^3/(8*E^(r^2/4))))/2) + 
                 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - 
                   (r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/
                          (4*E^(r^2/4))))/2))/2) + 8*r^2*(-1/4*r/E^(r^2/4) + 
                   (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/4 + 
                   (3*(-1/2*r/E^(r^2/4) + (r*(-1/2*1/E^(r^2/4) + r^2/
                          (4*E^(r^2/4))))/2))/2 - (r*(3/(4*E^(r^2/4)) - 
                      (3*r^2)/(8*E^(r^2/4)) - (r*(r/(2*E^(r^2/4)) - 
                         (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2))/2))/
                    2))/r)*(-1 + 3*Cos[2*theta])*Csc[theta]^2 + 
             1.8*^-15*(24/(E^(r^2/4)*r^3) - (3*((16*r)/E^(r^2/4) - 
                   (4*r^3)/E^(r^2/4)))/r^4 + (16/E^(r^2/4) - (16*r^2)/
                   E^(r^2/4) + 8*r^2*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/
                 r^3)^2*(1 - 3*Cos[2*theta])^2*Csc[theta]^4 + 
             9.*^-16*r^2*(-120/(E^(r^2/4)*r^4) + (15*((16*r)/E^(r^2/4) - 
                   (4*r^3)/E^(r^2/4)))/r^5 - (6*(16/E^(r^2/4) - (16*r^2)/
                    E^(r^2/4) + 8*r^2*(-1/2*1/E^(r^2/4) + r^2/
                      (4*E^(r^2/4)))))/r^4 + ((-40*r)/E^(r^2/4) + 
                  (8*r^3)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + 
                    r^2/(4*E^(r^2/4))) + 8*r^2*(r/(2*E^(r^2/4)) - 
                    (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2))/r^3)^2*
              (1 - 3*Cos[2*theta])^2*Csc[theta]^4 + 4*Csc[theta]^2*
              (7.500000000000001*^-9*r^2*(5040/(E^(r^2/4)*r^5) - 
                 (630*((16*r)/E^(r^2/4) - (4*r^3)/E^(r^2/4)))/r^6 + 
                 (297*(16/E^(r^2/4) - (16*r^2)/E^(r^2/4) + 8*r^2*
                     (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^5 - 
                 (87*((-40*r)/E^(r^2/4) + (8*r^3)/E^(r^2/4) + 16*r*
                     (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 8*r^2*
                     (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*(-32/E^(r^2/4) + 
                    (32*r^2)/E^(r^2/4) + 32*(-1/2*1/E^(r^2/4) + r^2/
                       (4*E^(r^2/4))) - 16*r^2*(-1/2*1/E^(r^2/4) + 
                      r^2/(4*E^(r^2/4))) + 32*r*(r/(2*E^(r^2/4)) - 
                      (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 
                    8*r^2*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - 
                      (r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/
                          (4*E^(r^2/4))))/2))/2)))/r^3 - 
                 (4*((80*r)/E^(r^2/4) - (16*r^3)/E^(r^2/4) - 32*r*
                     (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 
                    64*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/
                          (4*E^(r^2/4))))/2) - 16*r^2*(r/(2*E^(r^2/4)) - 
                      (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 
                    32*r*(1/(2*E^(r^2/4)) - r^2/(4*E^(r^2/4)) + 
                      (1/(2*E^(r^2/4)) - r^2/(4*E^(r^2/4)))/2 - 
                      (r*((3*r)/(4*E^(r^2/4)) - r^3/(8*E^(r^2/4))))/2) + 
                    16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - 
                      (r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/
                          (4*E^(r^2/4))))/2))/2) + 8*r^2*(-1/4*r/E^(r^2/4) + 
                      (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/4 + 
                      (3*(-1/2*r/E^(r^2/4) + (r*(-1/2*1/E^(r^2/4) + r^2/
                          (4*E^(r^2/4))))/2))/2 - (r*(3/(4*E^(r^2/4)) - 
                         (3*r^2)/(8*E^(r^2/4)) - (r*(r/(2*E^(r^2/4)) - 
                          (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2))/2))/
                       2)))/r^2 + (64/E^(r^2/4) - (64*r^2)/E^(r^2/4) - 
                   64*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*r^2*
                    (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) - 64*r*
                    (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/
                         (4*E^(r^2/4))))/2) + 64*(1/(2*E^(r^2/4)) - 
                     r^2/(4*E^(r^2/4)) + (1/(2*E^(r^2/4)) - r^2/
                        (4*E^(r^2/4)))/2 - (r*((3*r)/(4*E^(r^2/4)) - 
                        r^3/(8*E^(r^2/4))))/2) + 48*(3/(4*E^(r^2/4)) - 
                     (3*r^2)/(8*E^(r^2/4)) - (r*(r/(2*E^(r^2/4)) - 
                        (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2))/2) - 
                   16*r^2*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - 
                     (r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/
                          (4*E^(r^2/4))))/2))/2) + 32*r*((-5*r)/
                      (4*E^(r^2/4)) + r^3/(8*E^(r^2/4)) + 
                     (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2 - 
                     (r*(3/(4*E^(r^2/4)) - (5*r^2)/(8*E^(r^2/4)) + 
                        (r^2*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/4))/2) + 
                   32*r*(-1/4*r/E^(r^2/4) + (r*(-1/2*1/E^(r^2/4) + 
                        r^2/(4*E^(r^2/4))))/4 + (3*(-1/2*r/E^(r^2/4) + 
                        (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2))/2 - 
                     (r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - 
                        (r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/
                          (4*E^(r^2/4))))/2))/2))/2) + 8*r^2*
                    (-1/8*1/E^(r^2/4) + r^2/(16*E^(r^2/4)) + 
                     (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))/2 + 
                     (r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/
                          (4*E^(r^2/4))))/2))/4 + 2*(-3/(4*E^(r^2/4)) + 
                       (3*r^2)/(8*E^(r^2/4)) + (r*(r/(2*E^(r^2/4)) - 
                          (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2))/2) - 
                     (r*(-1/4*r/E^(r^2/4) + (r*(-1/2*1/E^(r^2/4) + r^2/
                          (4*E^(r^2/4))))/4 + (3*(-1/2*r/E^(r^2/4) + 
                          (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2))/2 - 
                        (r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - 
                          (r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + 
                          r^2/(4*E^(r^2/4))))/2))/2))/2))/2))/r) + 2*
                Csc[theta]^2 + 3.0000000000000004*^-8*r^2*
                (720/(E^(r^2/4)*r^5) - (90*((16*r)/E^(r^2/4) - (4*r^3)/
                     E^(r^2/4)))/r^6 + (39*(16/E^(r^2/4) - (16*r^2)/
                     E^(r^2/4) + 8*r^2*(-1/2*1/E^(r^2/4) + r^2/
                       (4*E^(r^2/4)))))/r^5 - (9*((-40*r)/E^(r^2/4) + 
                    (8*r^3)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + 
                      r^2/(4*E^(r^2/4))) + 8*r^2*(r/(2*E^(r^2/4)) - 
                      (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2)))/r^4 + 
                 (-32/E^(r^2/4) + (32*r^2)/E^(r^2/4) + 32*(-1/2*1/E^(r^2/4) + 
                     r^2/(4*E^(r^2/4))) - 16*r^2*(-1/2*1/E^(r^2/4) + 
                     r^2/(4*E^(r^2/4))) + 32*r*(r/(2*E^(r^2/4)) - 
                     (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 
                   8*r^2*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - 
                     (r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/
                          (4*E^(r^2/4))))/2))/2))/r^3)*(-3 + Csc[theta]^2)) - 
             3.0000000000000004*^-8*(24/(E^(r^2/4)*r^3) - 
               (3*((16*r)/E^(r^2/4) - (4*r^3)/E^(r^2/4)))/r^4 + 
               (16/E^(r^2/4) - (16*r^2)/E^(r^2/4) + 8*r^2*(-1/2*1/E^(r^2/4) + 
                   r^2/(4*E^(r^2/4))))/r^3)*(-1 + 3*Cos[2*theta])*
              Csc[theta]^4*(8 + 3.0000000000000004*^-8*r^2*
                (720/(E^(r^2/4)*r^5) - (90*((16*r)/E^(r^2/4) - (4*r^3)/
                     E^(r^2/4)))/r^6 + (39*(16/E^(r^2/4) - (16*r^2)/
                     E^(r^2/4) + 8*r^2*(-1/2*1/E^(r^2/4) + r^2/
                       (4*E^(r^2/4)))))/r^5 - (9*((-40*r)/E^(r^2/4) + 
                    (8*r^3)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + 
                      r^2/(4*E^(r^2/4))) + 8*r^2*(r/(2*E^(r^2/4)) - 
                      (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2)))/r^4 + 
                 (-32/E^(r^2/4) + (32*r^2)/E^(r^2/4) + 32*(-1/2*1/E^(r^2/4) + 
                     r^2/(4*E^(r^2/4))) - 16*r^2*(-1/2*1/E^(r^2/4) + 
                     r^2/(4*E^(r^2/4))) + 32*r*(r/(2*E^(r^2/4)) - 
                     (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 
                   8*r^2*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - 
                     (r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/
                          (4*E^(r^2/4))))/2))/2))/r^3)*(-1 + 
                 3*Cos[2*theta]) + 1.5000000000000002*^-8*r^2*
                (5040/(E^(r^2/4)*r^5) - (630*((16*r)/E^(r^2/4) - (4*r^3)/
                     E^(r^2/4)))/r^6 + (297*(16/E^(r^2/4) - (16*r^2)/
                     E^(r^2/4) + 8*r^2*(-1/2*1/E^(r^2/4) + r^2/
                       (4*E^(r^2/4)))))/r^5 - (87*((-40*r)/E^(r^2/4) + 
                    (8*r^3)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + 
                      r^2/(4*E^(r^2/4))) + 8*r^2*(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*(-32/E^(r^2/4) + (32*r^2)/E^(r^2/4) + 
                    32*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) - 16*r^2*
                     (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*r*
                     (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/
                          (4*E^(r^2/4))))/2) + 8*r^2*(3/(4*E^(r^2/4)) - 
                      (3*r^2)/(8*E^(r^2/4)) - (r*(r/(2*E^(r^2/4)) - 
                         (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2))/2)))/
                  r^3 - (4*((80*r)/E^(r^2/4) - (16*r^3)/E^(r^2/4) - 
                    32*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 
                    64*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/
                          (4*E^(r^2/4))))/2) - 16*r^2*(r/(2*E^(r^2/4)) - 
                      (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 
                    32*r*(1/(2*E^(r^2/4)) - r^2/(4*E^(r^2/4)) + 
                      (1/(2*E^(r^2/4)) - r^2/(4*E^(r^2/4)))/2 - 
                      (r*((3*r)/(4*E^(r^2/4)) - r^3/(8*E^(r^2/4))))/2) + 
                    16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - 
                      (r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/
                          (4*E^(r^2/4))))/2))/2) + 8*r^2*(-1/4*r/E^(r^2/4) + 
                      (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/4 + 
                      (3*(-1/2*r/E^(r^2/4) + (r*(-1/2*1/E^(r^2/4) + r^2/
                          (4*E^(r^2/4))))/2))/2 - (r*(3/(4*E^(r^2/4)) - 
                         (3*r^2)/(8*E^(r^2/4)) - (r*(r/(2*E^(r^2/4)) - 
                          (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2))/2))/
                       2)))/r^2 + (64/E^(r^2/4) - (64*r^2)/E^(r^2/4) - 
                   64*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*r^2*
                    (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) - 64*r*
                    (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/
                         (4*E^(r^2/4))))/2) + 64*(1/(2*E^(r^2/4)) - 
                     r^2/(4*E^(r^2/4)) + (1/(2*E^(r^2/4)) - r^2/
                        (4*E^(r^2/4)))/2 - (r*((3*r)/(4*E^(r^2/4)) - 
                        r^3/(8*E^(r^2/4))))/2) + 48*(3/(4*E^(r^2/4)) - 
                     (3*r^2)/(8*E^(r^2/4)) - (r*(r/(2*E^(r^2/4)) - 
                        (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2))/2) - 
                   16*r^2*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - 
                     (r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/
                          (4*E^(r^2/4))))/2))/2) + 32*r*((-5*r)/
                      (4*E^(r^2/4)) + r^3/(8*E^(r^2/4)) + 
                     (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2 - 
                     (r*(3/(4*E^(r^2/4)) - (5*r^2)/(8*E^(r^2/4)) + 
                        (r^2*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/4))/2) + 
                   32*r*(-1/4*r/E^(r^2/4) + (r*(-1/2*1/E^(r^2/4) + 
                        r^2/(4*E^(r^2/4))))/4 + (3*(-1/2*r/E^(r^2/4) + 
                        (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2))/2 - 
                     (r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - 
                        (r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/
                          (4*E^(r^2/4))))/2))/2))/2) + 8*r^2*
                    (-1/8*1/E^(r^2/4) + r^2/(16*E^(r^2/4)) + 
                     (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))/2 + 
                     (r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/
                          (4*E^(r^2/4))))/2))/4 + 2*(-3/(4*E^(r^2/4)) + 
                       (3*r^2)/(8*E^(r^2/4)) + (r*(r/(2*E^(r^2/4)) - 
                          (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2))/2) - 
                     (r*(-1/4*r/E^(r^2/4) + (r*(-1/2*1/E^(r^2/4) + r^2/
                          (4*E^(r^2/4))))/4 + (3*(-1/2*r/E^(r^2/4) + 
                          (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2))/2 - 
                        (r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - 
                          (r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + 
                          r^2/(4*E^(r^2/4))))/2))/2))/2))/2))/r)*
                Sin[theta]^2))/4)/(2*r^2*(7.500000000000001*^-9*
              (168/(E^(r^2/4)*r^3) - (21*((16*r)/E^(r^2/4) - (4*r^3)/
                   E^(r^2/4)))/r^4 + (9*(16/E^(r^2/4) - (16*r^2)/E^(r^2/4) + 
                  8*r^2*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 - 
               (2*((-40*r)/E^(r^2/4) + (8*r^3)/E^(r^2/4) + 16*r*
                   (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 8*r^2*
                   (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/
                        (4*E^(r^2/4))))/2)))/r^2 + (-32/E^(r^2/4) + 
                 (32*r^2)/E^(r^2/4) + 32*(-1/2*1/E^(r^2/4) + 
                   r^2/(4*E^(r^2/4))) - 16*r^2*(-1/2*1/E^(r^2/4) + 
                   r^2/(4*E^(r^2/4))) + 32*r*(r/(2*E^(r^2/4)) - 
                   (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 
                 8*r^2*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - 
                   (r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/
                          (4*E^(r^2/4))))/2))/2))/r) - Csc[theta]^2 + 
             3.0000000000000004*^-8*(24/(E^(r^2/4)*r^3) - 
               (3*((16*r)/E^(r^2/4) - (4*r^3)/E^(r^2/4)))/r^4 + 
               (16/E^(r^2/4) - (16*r^2)/E^(r^2/4) + 8*r^2*(-1/2*1/E^(r^2/4) + 
                   r^2/(4*E^(r^2/4))))/r^3)*(-3 + Csc[theta]^2))^2) + 
         (7.500000000000001*^-9*(4*r*(240/(E^(r^2/4)*r^4) - 
              (30*((16*r)/E^(r^2/4) - (4*r^3)/E^(r^2/4)))/r^5 + 
              (15*(16/E^(r^2/4) - (16*r^2)/E^(r^2/4) + 8*r^2*
                  (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^4 - 
              (5*((-40*r)/E^(r^2/4) + (8*r^3)/E^(r^2/4) + 16*r*
                  (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 8*r^2*
                  (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/
                       (4*E^(r^2/4))))/2)))/r^3 + (-32/E^(r^2/4) + 
                (32*r^2)/E^(r^2/4) + 32*(-1/2*1/E^(r^2/4) + 
                  r^2/(4*E^(r^2/4))) - 16*r^2*(-1/2*1/E^(r^2/4) + 
                  r^2/(4*E^(r^2/4))) + 32*r*(r/(2*E^(r^2/4)) - 
                  (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 
                8*r^2*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - 
                  (r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/
                         (4*E^(r^2/4))))/2))/2))/r^2) - 
            1.8*^-7*(24/(E^(r^2/4)*r^3) - (3*((16*r)/E^(r^2/4) - (4*r^3)/
                   E^(r^2/4)))/r^4 + (16/E^(r^2/4) - (16*r^2)/E^(r^2/4) + 
                 8*r^2*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/r^3)^2*
             (1 + 3*Cos[2*theta]) - (-48/(E^(r^2/4)*r^3) + 
              (6*((16*r)/E^(r^2/4) - (4*r^3)/E^(r^2/4)))/r^4 - 
              (3*(16/E^(r^2/4) - (16*r^2)/E^(r^2/4) + 8*r^2*
                  (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + 
              ((-40*r)/E^(r^2/4) + (8*r^3)/E^(r^2/4) + 16*r*
                 (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 8*r^2*
                 (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/
                      (4*E^(r^2/4))))/2))/r^2)*(-4 + 3.0000000000000004*^-8*r*
               (-120/(E^(r^2/4)*r^4) + (15*((16*r)/E^(r^2/4) - (4*r^3)/
                    E^(r^2/4)))/r^5 - (6*(16/E^(r^2/4) - (16*r^2)/E^(r^2/4) + 
                   8*r^2*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^4 + 
                ((-40*r)/E^(r^2/4) + (8*r^3)/E^(r^2/4) + 16*r*
                   (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 8*r^2*
                   (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/
                        (4*E^(r^2/4))))/2))/r^3)*(1 + 3*Cos[2*theta])) + 
            6*(24/(E^(r^2/4)*r^3) - (3*((16*r)/E^(r^2/4) - (4*r^3)/
                  E^(r^2/4)))/r^4 + (16/E^(r^2/4) - (16*r^2)/E^(r^2/4) + 
                8*r^2*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/r^3)*
             (-2 + 1.*^-8*(-48/(E^(r^2/4)*r^3) + (6*((16*r)/E^(r^2/4) - 
                   (4*r^3)/E^(r^2/4)))/r^4 - (3*(16/E^(r^2/4) - (16*r^2)/
                    E^(r^2/4) + 8*r^2*(-1/2*1/E^(r^2/4) + r^2/
                      (4*E^(r^2/4)))))/r^3 + ((-40*r)/E^(r^2/4) + 
                  (8*r^3)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + 
                    r^2/(4*E^(r^2/4))) + 8*r^2*(r/(2*E^(r^2/4)) - 
                    (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2))/r^2)*(1 + 
                3*Cos[2*theta]) + 1.*^-8*r*(240/(E^(r^2/4)*r^4) - 
                (30*((16*r)/E^(r^2/4) - (4*r^3)/E^(r^2/4)))/r^5 + 
                (15*(16/E^(r^2/4) - (16*r^2)/E^(r^2/4) + 8*r^2*
                    (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^4 - 
                (5*((-40*r)/E^(r^2/4) + (8*r^3)/E^(r^2/4) + 16*r*
                    (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 8*r^2*
                    (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/
                         (4*E^(r^2/4))))/2)))/r^3 + (-32/E^(r^2/4) + 
                  (32*r^2)/E^(r^2/4) + 32*(-1/2*1/E^(r^2/4) + r^2/
                     (4*E^(r^2/4))) - 16*r^2*(-1/2*1/E^(r^2/4) + 
                    r^2/(4*E^(r^2/4))) + 32*r*(r/(2*E^(r^2/4)) - 
                    (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 
                  8*r^2*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - 
                    (r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/
                          (4*E^(r^2/4))))/2))/2))/r^2)*(1 + 3*Cos[2*theta])))*
           Csc[theta]*(1.5000000000000002*^-8*(168/(E^(r^2/4)*r^3) - 
              (21*((16*r)/E^(r^2/4) - (4*r^3)/E^(r^2/4)))/r^4 + 
              (9*(16/E^(r^2/4) - (16*r^2)/E^(r^2/4) + 8*r^2*
                  (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 - 
              (2*((-40*r)/E^(r^2/4) + (8*r^3)/E^(r^2/4) + 16*r*
                  (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 8*r^2*
                  (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/
                       (4*E^(r^2/4))))/2)))/r^2 + (-32/E^(r^2/4) + 
                (32*r^2)/E^(r^2/4) + 32*(-1/2*1/E^(r^2/4) + 
                  r^2/(4*E^(r^2/4))) - 16*r^2*(-1/2*1/E^(r^2/4) + 
                  r^2/(4*E^(r^2/4))) + 32*r*(r/(2*E^(r^2/4)) - 
                  (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 
                8*r^2*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - 
                  (r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/
                         (4*E^(r^2/4))))/2))/2))/r)*Cos[theta] - 
            Cot[theta]*Csc[theta] + 3*(24/(E^(r^2/4)*r^3) - 
              (3*((16*r)/E^(r^2/4) - (4*r^3)/E^(r^2/4)))/r^4 + 
              (16/E^(r^2/4) - (16*r^2)/E^(r^2/4) + 8*r^2*(-1/2*1/E^(r^2/4) + 
                  r^2/(4*E^(r^2/4))))/r^3)*(-6.000000000000001*^-8*Cos[
                theta] + 1.*^-8*Cot[theta]*Csc[theta]))*Sin[2*theta])/
          (r^2*(7.500000000000001*^-9*(168/(E^(r^2/4)*r^3) - 
              (21*((16*r)/E^(r^2/4) - (4*r^3)/E^(r^2/4)))/r^4 + 
              (9*(16/E^(r^2/4) - (16*r^2)/E^(r^2/4) + 8*r^2*
                  (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 - 
              (2*((-40*r)/E^(r^2/4) + (8*r^3)/E^(r^2/4) + 16*r*
                  (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 8*r^2*
                  (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/
                       (4*E^(r^2/4))))/2)))/r^2 + (-32/E^(r^2/4) + 
                (32*r^2)/E^(r^2/4) + 32*(-1/2*1/E^(r^2/4) + 
                  r^2/(4*E^(r^2/4))) - 16*r^2*(-1/2*1/E^(r^2/4) + 
                  r^2/(4*E^(r^2/4))) + 32*r*(r/(2*E^(r^2/4)) - 
                  (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 
                8*r^2*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - 
                  (r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/
                         (4*E^(r^2/4))))/2))/2))/r) - Csc[theta]^2 + 
            3.0000000000000004*^-8*(24/(E^(r^2/4)*r^3) - 
              (3*((16*r)/E^(r^2/4) - (4*r^3)/E^(r^2/4)))/r^4 + 
              (16/E^(r^2/4) - (16*r^2)/E^(r^2/4) + 8*r^2*(-1/2*1/E^(r^2/4) + 
                  r^2/(4*E^(r^2/4))))/r^3)*(-3 + Csc[theta]^2))*
           (-2 + 9.*^-16*(24/(E^(r^2/4)*r^3) - (3*((16*r)/E^(r^2/4) - 
                  (4*r^3)/E^(r^2/4)))/r^4 + (16/E^(r^2/4) - (16*r^2)/
                  E^(r^2/4) + 8*r^2*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/
                r^3)^2*(1 + 3*Cos[2*theta]) - 1.5000000000000002*^-8*
             (168/(E^(r^2/4)*r^3) - (21*((16*r)/E^(r^2/4) - (4*r^3)/
                  E^(r^2/4)))/r^4 + (9*(16/E^(r^2/4) - (16*r^2)/E^(r^2/4) + 
                 8*r^2*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 - 
              (2*((-40*r)/E^(r^2/4) + (8*r^3)/E^(r^2/4) + 16*r*
                  (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 8*r^2*
                  (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/
                       (4*E^(r^2/4))))/2)))/r^2 + (-32/E^(r^2/4) + 
                (32*r^2)/E^(r^2/4) + 32*(-1/2*1/E^(r^2/4) + 
                  r^2/(4*E^(r^2/4))) - 16*r^2*(-1/2*1/E^(r^2/4) + 
                  r^2/(4*E^(r^2/4))) + 32*r*(r/(2*E^(r^2/4)) - 
                  (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 
                8*r^2*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - 
                  (r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/
                         (4*E^(r^2/4))))/2))/2))/r)*Sin[theta]^2 - 
            3.0000000000000004*^-8*(24/(E^(r^2/4)*r^3) - 
              (3*((16*r)/E^(r^2/4) - (4*r^3)/E^(r^2/4)))/r^4 + 
              (16/E^(r^2/4) - (16*r^2)/E^(r^2/4) + 8*r^2*(-1/2*1/E^(r^2/4) + 
                  r^2/(4*E^(r^2/4))))/r^3)*(-1 + 3*Cos[2*theta] + 
              7.500000000000001*^-9*(168/(E^(r^2/4)*r^3) - 
                (21*((16*r)/E^(r^2/4) - (4*r^3)/E^(r^2/4)))/r^4 + 
                (9*(16/E^(r^2/4) - (16*r^2)/E^(r^2/4) + 8*r^2*
                    (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 - 
                (2*((-40*r)/E^(r^2/4) + (8*r^3)/E^(r^2/4) + 16*r*
                    (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 8*r^2*
                    (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/
                         (4*E^(r^2/4))))/2)))/r^2 + (-32/E^(r^2/4) + 
                  (32*r^2)/E^(r^2/4) + 32*(-1/2*1/E^(r^2/4) + r^2/
                     (4*E^(r^2/4))) - 16*r^2*(-1/2*1/E^(r^2/4) + 
                    r^2/(4*E^(r^2/4))) + 32*r*(r/(2*E^(r^2/4)) - 
                    (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 
                  8*r^2*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - 
                    (r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/
                          (4*E^(r^2/4))))/2))/2))/r)*(1 + 3*Cos[2*theta])*
               Sin[theta]^2) + 4.5*^-16*(-48/(E^(r^2/4)*r^3) + 
               (6*((16*r)/E^(r^2/4) - (4*r^3)/E^(r^2/4)))/r^4 - 
               (3*(16/E^(r^2/4) - (16*r^2)/E^(r^2/4) + 8*r^2*
                   (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + 
               ((-40*r)/E^(r^2/4) + (8*r^3)/E^(r^2/4) + 16*r*
                  (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 8*r^2*
                  (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/
                       (4*E^(r^2/4))))/2))/r^2)^2*Sin[2*theta]^2)) + 
         (2.5*^-9*(-9.000000000000001*^-8*r*(-120/(E^(r^2/4)*r^4) + 
              (15*((16*r)/E^(r^2/4) - (4*r^3)/E^(r^2/4)))/r^5 - 
              (6*(16/E^(r^2/4) - (16*r^2)/E^(r^2/4) + 8*r^2*
                  (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^4 + 
              ((-40*r)/E^(r^2/4) + (8*r^3)/E^(r^2/4) + 16*r*
                 (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 8*r^2*
                 (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/
                      (4*E^(r^2/4))))/2))/r^3) + 1.5000000000000002*^-8*
             (168/(E^(r^2/4)*r^3) - (21*((16*r)/E^(r^2/4) - (4*r^3)/
                  E^(r^2/4)))/r^4 + (9*(16/E^(r^2/4) - (16*r^2)/E^(r^2/4) + 
                 8*r^2*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 - 
              (2*((-40*r)/E^(r^2/4) + (8*r^3)/E^(r^2/4) + 16*r*
                  (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 8*r^2*
                  (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/
                       (4*E^(r^2/4))))/2)))/r^2 + (-32/E^(r^2/4) + 
                (32*r^2)/E^(r^2/4) + 32*(-1/2*1/E^(r^2/4) + 
                  r^2/(4*E^(r^2/4))) - 16*r^2*(-1/2*1/E^(r^2/4) + 
                  r^2/(4*E^(r^2/4))) + 32*r*(r/(2*E^(r^2/4)) - 
                  (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 
                8*r^2*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - 
                  (r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/
                         (4*E^(r^2/4))))/2))/2))/r) + 7.500000000000001*^-9*r*
             (-840/(E^(r^2/4)*r^4) + (105*((16*r)/E^(r^2/4) - (4*r^3)/
                  E^(r^2/4)))/r^5 - (48*(16/E^(r^2/4) - (16*r^2)/E^(r^2/4) + 
                 8*r^2*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^4 + 
              (13*((-40*r)/E^(r^2/4) + (8*r^3)/E^(r^2/4) + 16*r*
                  (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 8*r^2*
                  (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/
                       (4*E^(r^2/4))))/2)))/r^3 - (3*(-32/E^(r^2/4) + 
                 (32*r^2)/E^(r^2/4) + 32*(-1/2*1/E^(r^2/4) + 
                   r^2/(4*E^(r^2/4))) - 16*r^2*(-1/2*1/E^(r^2/4) + 
                   r^2/(4*E^(r^2/4))) + 32*r*(r/(2*E^(r^2/4)) - 
                   (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 
                 8*r^2*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - 
                   (r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/
                          (4*E^(r^2/4))))/2))/2)))/r^2 + ((80*r)/E^(r^2/4) - 
                (16*r^3)/E^(r^2/4) - 32*r*(-1/2*1/E^(r^2/4) + 
                  r^2/(4*E^(r^2/4))) + 64*(r/(2*E^(r^2/4)) - 
                  (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) - 
                16*r^2*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + 
                     r^2/(4*E^(r^2/4))))/2) + 32*r*(1/(2*E^(r^2/4)) - 
                  r^2/(4*E^(r^2/4)) + (1/(2*E^(r^2/4)) - r^2/(4*E^(r^2/4)))/
                   2 - (r*((3*r)/(4*E^(r^2/4)) - r^3/(8*E^(r^2/4))))/2) + 
                16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - 
                  (r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/
                         (4*E^(r^2/4))))/2))/2) + 8*r^2*(-1/4*r/E^(r^2/4) + 
                  (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/4 + 
                  (3*(-1/2*r/E^(r^2/4) + (r*(-1/2*1/E^(r^2/4) + r^2/
                         (4*E^(r^2/4))))/2))/2 - (r*(3/(4*E^(r^2/4)) - 
                     (3*r^2)/(8*E^(r^2/4)) - (r*(r/(2*E^(r^2/4)) - 
                        (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2))/2))/
                   2))/r) - 2*Csc[theta]^2 + 3.0000000000000004*^-8*r*
             (-120/(E^(r^2/4)*r^4) + (15*((16*r)/E^(r^2/4) - (4*r^3)/
                  E^(r^2/4)))/r^5 - (6*(16/E^(r^2/4) - (16*r^2)/E^(r^2/4) + 
                 8*r^2*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^4 + 
              ((-40*r)/E^(r^2/4) + (8*r^3)/E^(r^2/4) + 16*r*
                 (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 8*r^2*
                 (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/
                      (4*E^(r^2/4))))/2))/r^3)*Csc[theta]^2 + 
            6.000000000000001*^-8*(24/(E^(r^2/4)*r^3) - 
              (3*((16*r)/E^(r^2/4) - (4*r^3)/E^(r^2/4)))/r^4 + 
              (16/E^(r^2/4) - (16*r^2)/E^(r^2/4) + 8*r^2*(-1/2*1/E^(r^2/4) + 
                  r^2/(4*E^(r^2/4))))/r^3)*(-3 + Csc[theta]^2))*
           (-3*r*(-120/(E^(r^2/4)*r^4) + (15*((16*r)/E^(r^2/4) - 
                 (4*r^3)/E^(r^2/4)))/r^5 - (6*(16/E^(r^2/4) - (16*r^2)/
                  E^(r^2/4) + 8*r^2*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/
               r^4 + ((-40*r)/E^(r^2/4) + (8*r^3)/E^(r^2/4) + 
                16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 
                8*r^2*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + 
                     r^2/(4*E^(r^2/4))))/2))/r^3)*(1 + 3*Cos[2*theta])*
             (1 + 7.500000000000001*^-9*(168/(E^(r^2/4)*r^3) - 
                (21*((16*r)/E^(r^2/4) - (4*r^3)/E^(r^2/4)))/r^4 + 
                (9*(16/E^(r^2/4) - (16*r^2)/E^(r^2/4) + 8*r^2*
                    (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 - 
                (2*((-40*r)/E^(r^2/4) + (8*r^3)/E^(r^2/4) + 16*r*
                    (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 8*r^2*
                    (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/
                         (4*E^(r^2/4))))/2)))/r^2 + (-32/E^(r^2/4) + 
                  (32*r^2)/E^(r^2/4) + 32*(-1/2*1/E^(r^2/4) + r^2/
                     (4*E^(r^2/4))) - 16*r^2*(-1/2*1/E^(r^2/4) + 
                    r^2/(4*E^(r^2/4))) + 32*r*(r/(2*E^(r^2/4)) - 
                    (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 
                  8*r^2*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - 
                    (r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/
                          (4*E^(r^2/4))))/2))/2))/r)*Sin[theta]^2) + 
            9.*^-8*(-48/(E^(r^2/4)*r^3) + (6*((16*r)/E^(r^2/4) - (4*r^3)/
                   E^(r^2/4)))/r^4 - (3*(16/E^(r^2/4) - (16*r^2)/E^(r^2/4) + 
                  8*r^2*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + 
               ((-40*r)/E^(r^2/4) + (8*r^3)/E^(r^2/4) + 16*r*
                  (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 8*r^2*
                  (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/
                       (4*E^(r^2/4))))/2))/r^2)^2*Sin[2*theta]^2 + 
            9.*^-8*r*(-48/(E^(r^2/4)*r^3) + (6*((16*r)/E^(r^2/4) - 
                 (4*r^3)/E^(r^2/4)))/r^4 - (3*(16/E^(r^2/4) - (16*r^2)/
                  E^(r^2/4) + 8*r^2*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/
               r^3 + ((-40*r)/E^(r^2/4) + (8*r^3)/E^(r^2/4) + 
                16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 
                8*r^2*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + 
                     r^2/(4*E^(r^2/4))))/2))/r^2)*(240/(E^(r^2/4)*r^4) - 
              (30*((16*r)/E^(r^2/4) - (4*r^3)/E^(r^2/4)))/r^5 + 
              (15*(16/E^(r^2/4) - (16*r^2)/E^(r^2/4) + 8*r^2*
                  (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^4 - 
              (5*((-40*r)/E^(r^2/4) + (8*r^3)/E^(r^2/4) + 16*r*
                  (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 8*r^2*
                  (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/
                       (4*E^(r^2/4))))/2)))/r^3 + (-32/E^(r^2/4) + 
                (32*r^2)/E^(r^2/4) + 32*(-1/2*1/E^(r^2/4) + 
                  r^2/(4*E^(r^2/4))) - 16*r^2*(-1/2*1/E^(r^2/4) + 
                  r^2/(4*E^(r^2/4))) + 32*r*(r/(2*E^(r^2/4)) - 
                  (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 
                8*r^2*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - 
                  (r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/
                         (4*E^(r^2/4))))/2))/2))/r^2)*Sin[2*theta]^2 + 
            3.0000000000000004*^-8*(24/(E^(r^2/4)*r^3) - 
              (3*((16*r)/E^(r^2/4) - (4*r^3)/E^(r^2/4)))/r^4 + 
              (16/E^(r^2/4) - (16*r^2)/E^(r^2/4) + 8*r^2*(-1/2*1/E^(r^2/4) + 
                  r^2/(4*E^(r^2/4))))/r^3)*(3*r*(-120/(E^(r^2/4)*r^4) + 
                (15*((16*r)/E^(r^2/4) - (4*r^3)/E^(r^2/4)))/r^5 - 
                (6*(16/E^(r^2/4) - (16*r^2)/E^(r^2/4) + 8*r^2*
                    (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^4 + 
                ((-40*r)/E^(r^2/4) + (8*r^3)/E^(r^2/4) + 16*r*
                   (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 8*r^2*
                   (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/
                        (4*E^(r^2/4))))/2))/r^3)*(1 + 3*Cos[2*theta]) - 
              9*(-48/(E^(r^2/4)*r^3) + (6*((16*r)/E^(r^2/4) - (4*r^3)/
                    E^(r^2/4)))/r^4 - (3*(16/E^(r^2/4) - (16*r^2)/E^(r^2/4) + 
                   8*r^2*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + 
                ((-40*r)/E^(r^2/4) + (8*r^3)/E^(r^2/4) + 16*r*
                   (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 8*r^2*
                   (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/
                        (4*E^(r^2/4))))/2))/r^2)*Sin[2*theta]^2)))/
          (r^2*(7.500000000000001*^-9*(168/(E^(r^2/4)*r^3) - 
              (21*((16*r)/E^(r^2/4) - (4*r^3)/E^(r^2/4)))/r^4 + 
              (9*(16/E^(r^2/4) - (16*r^2)/E^(r^2/4) + 8*r^2*
                  (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 - 
              (2*((-40*r)/E^(r^2/4) + (8*r^3)/E^(r^2/4) + 16*r*
                  (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 8*r^2*
                  (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/
                       (4*E^(r^2/4))))/2)))/r^2 + (-32/E^(r^2/4) + 
                (32*r^2)/E^(r^2/4) + 32*(-1/2*1/E^(r^2/4) + 
                  r^2/(4*E^(r^2/4))) - 16*r^2*(-1/2*1/E^(r^2/4) + 
                  r^2/(4*E^(r^2/4))) + 32*r*(r/(2*E^(r^2/4)) - 
                  (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 
                8*r^2*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - 
                  (r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/
                         (4*E^(r^2/4))))/2))/2))/r) - Csc[theta]^2 + 
            3.0000000000000004*^-8*(24/(E^(r^2/4)*r^3) - 
              (3*((16*r)/E^(r^2/4) - (4*r^3)/E^(r^2/4)))/r^4 + 
              (16/E^(r^2/4) - (16*r^2)/E^(r^2/4) + 8*r^2*(-1/2*1/E^(r^2/4) + 
                  r^2/(4*E^(r^2/4))))/r^3)*(-3 + Csc[theta]^2))*
           (-2 + 9.*^-16*(24/(E^(r^2/4)*r^3) - (3*((16*r)/E^(r^2/4) - 
                  (4*r^3)/E^(r^2/4)))/r^4 + (16/E^(r^2/4) - (16*r^2)/
                  E^(r^2/4) + 8*r^2*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/
                r^3)^2*(1 + 3*Cos[2*theta]) - 1.5000000000000002*^-8*
             (168/(E^(r^2/4)*r^3) - (21*((16*r)/E^(r^2/4) - (4*r^3)/
                  E^(r^2/4)))/r^4 + (9*(16/E^(r^2/4) - (16*r^2)/E^(r^2/4) + 
                 8*r^2*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 - 
              (2*((-40*r)/E^(r^2/4) + (8*r^3)/E^(r^2/4) + 16*r*
                  (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 8*r^2*
                  (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/
                       (4*E^(r^2/4))))/2)))/r^2 + (-32/E^(r^2/4) + 
                (32*r^2)/E^(r^2/4) + 32*(-1/2*1/E^(r^2/4) + 
                  r^2/(4*E^(r^2/4))) - 16*r^2*(-1/2*1/E^(r^2/4) + 
                  r^2/(4*E^(r^2/4))) + 32*r*(r/(2*E^(r^2/4)) - 
                  (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 
                8*r^2*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - 
                  (r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/
                         (4*E^(r^2/4))))/2))/2))/r)*Sin[theta]^2 - 
            3.0000000000000004*^-8*(24/(E^(r^2/4)*r^3) - 
              (3*((16*r)/E^(r^2/4) - (4*r^3)/E^(r^2/4)))/r^4 + 
              (16/E^(r^2/4) - (16*r^2)/E^(r^2/4) + 8*r^2*(-1/2*1/E^(r^2/4) + 
                  r^2/(4*E^(r^2/4))))/r^3)*(-1 + 3*Cos[2*theta] + 
              7.500000000000001*^-9*(168/(E^(r^2/4)*r^3) - 
                (21*((16*r)/E^(r^2/4) - (4*r^3)/E^(r^2/4)))/r^4 + 
                (9*(16/E^(r^2/4) - (16*r^2)/E^(r^2/4) + 8*r^2*
                    (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 - 
                (2*((-40*r)/E^(r^2/4) + (8*r^3)/E^(r^2/4) + 16*r*
                    (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 8*r^2*
                    (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/
                         (4*E^(r^2/4))))/2)))/r^2 + (-32/E^(r^2/4) + 
                  (32*r^2)/E^(r^2/4) + 32*(-1/2*1/E^(r^2/4) + r^2/
                     (4*E^(r^2/4))) - 16*r^2*(-1/2*1/E^(r^2/4) + 
                    r^2/(4*E^(r^2/4))) + 32*r*(r/(2*E^(r^2/4)) - 
                    (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 
                  8*r^2*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - 
                    (r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/
                          (4*E^(r^2/4))))/2))/2))/r)*(1 + 3*Cos[2*theta])*
               Sin[theta]^2) + 4.5*^-16*(-48/(E^(r^2/4)*r^3) + 
               (6*((16*r)/E^(r^2/4) - (4*r^3)/E^(r^2/4)))/r^4 - 
               (3*(16/E^(r^2/4) - (16*r^2)/E^(r^2/4) + 8*r^2*
                   (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + 
               ((-40*r)/E^(r^2/4) + (8*r^3)/E^(r^2/4) + 16*r*
                  (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 8*r^2*
                  (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/
                       (4*E^(r^2/4))))/2))/r^2)^2*Sin[2*theta]^2))))/
       Sqrt[2]))/(Sqrt[2]*r) - 
   ((-3.0000000000000004*^-8*r*(-48/(E^(r^2/4)*r^3) + 
         (6*((16*r)/E^(r^2/4) - (4*r^3)/E^(r^2/4)))/r^4 - 
         (3*(16/E^(r^2/4) - (16*r^2)/E^(r^2/4) + 8*r^2*(-1/2*1/E^(r^2/4) + 
              r^2/(4*E^(r^2/4)))))/r^3 + ((-40*r)/E^(r^2/4) + 
           (8*r^3)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 
           8*r^2*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + 
                r^2/(4*E^(r^2/4))))/2))/r^2)*Cos[theta]*Sin[theta]*
        ((-3.0000000000000004*^-16*Cos[theta]*Sin[theta]*
           (-9.*^-8*(-48/(E^(r^2/4)*r^3) + (6*((16*r)/E^(r^2/4) - 
                 (4*r^3)/E^(r^2/4)))/r^4 - (3*(16/E^(r^2/4) - (16*r^2)/
                  E^(r^2/4) + 8*r^2*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/
               r^3 + ((-40*r)/E^(r^2/4) + (8*r^3)/E^(r^2/4) + 
                16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 
                8*r^2*(r/(2*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) - 
                 (4*r^3)/E^(r^2/4)))/r^5 + (6*(16/E^(r^2/4) - (16*r^2)/
                  E^(r^2/4) + 8*r^2*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/
               r^4 - (3*((-40*r)/E^(r^2/4) + (8*r^3)/E^(r^2/4) + 
                 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 
                 8*r^2*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + 
                      r^2/(4*E^(r^2/4))))/2)))/r^3 + (-32/E^(r^2/4) + 
                (32*r^2)/E^(r^2/4) + 32*(-1/2*1/E^(r^2/4) + 
                  r^2/(4*E^(r^2/4))) - 16*r^2*(-1/2*1/E^(r^2/4) + 
                  r^2/(4*E^(r^2/4))) + 32*r*(r/(2*E^(r^2/4)) - 
                  (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 
                8*r^2*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - 
                  (r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/
                         (4*E^(r^2/4))))/2))/2))/r^2)*Cos[theta]^2*
             Sin[theta]^2 - (3*((3*((16*r)/E^(r^2/4) - (4*r^3)/E^(r^2/4)))/
                r^5 - (3*(16/E^(r^2/4) - (16*r^2)/E^(r^2/4) + 8*r^2*
                   (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^4 + 
               ((-40*r)/E^(r^2/4) + (8*r^3)/E^(r^2/4) + 16*r*
                  (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 8*r^2*
                  (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/
                       (4*E^(r^2/4))))/2))/r^3)*(1 + 3*Cos[2*theta])*
              (-1 + 3.0000000000000004*^-8*(24/(E^(r^2/4)*r^3) - 
                 (3*((16*r)/E^(r^2/4) - (4*r^3)/E^(r^2/4)))/r^4 + 
                 (16/E^(r^2/4) - (16*r^2)/E^(r^2/4) + 8*r^2*
                    (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/r^3) - 
               7.500000000000001*^-9*(168/(E^(r^2/4)*r^3) - 
                 (21*((16*r)/E^(r^2/4) - (4*r^3)/E^(r^2/4)))/r^4 + 
                 (9*(16/E^(r^2/4) - (16*r^2)/E^(r^2/4) + 8*r^2*
                     (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 - 
                 (2*((-40*r)/E^(r^2/4) + (8*r^3)/E^(r^2/4) + 16*r*
                     (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 8*r^2*
                     (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/
                          (4*E^(r^2/4))))/2)))/r^2 + (-32/E^(r^2/4) + 
                   (32*r^2)/E^(r^2/4) + 32*(-1/2*1/E^(r^2/4) + r^2/
                      (4*E^(r^2/4))) - 16*r^2*(-1/2*1/E^(r^2/4) + 
                     r^2/(4*E^(r^2/4))) + 32*r*(r/(2*E^(r^2/4)) - 
                     (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 
                   8*r^2*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - 
                     (r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/
                          (4*E^(r^2/4))))/2))/2))/r)*Sin[theta]^2))/2)*
           (-1.8*^-7*(24/(E^(r^2/4)*r^3) - (3*((16*r)/E^(r^2/4) - 
                  (4*r^3)/E^(r^2/4)))/r^4 + (16/E^(r^2/4) - (16*r^2)/
                  E^(r^2/4) + 8*r^2*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/
                r^3)^2 + 6*(24/(E^(r^2/4)*r^3) - (3*((16*r)/E^(r^2/4) - 
                 (4*r^3)/E^(r^2/4)))/r^4 + (16/E^(r^2/4) - (16*r^2)/
                 E^(r^2/4) + 8*r^2*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/r^
                3)*(1 + 1.*^-8*(-48/(E^(r^2/4)*r^3) + (6*((16*r)/E^(r^2/4) - 
                   (4*r^3)/E^(r^2/4)))/r^4 - (3*(16/E^(r^2/4) - (16*r^2)/
                    E^(r^2/4) + 8*r^2*(-1/2*1/E^(r^2/4) + r^2/
                      (4*E^(r^2/4)))))/r^3 + ((-40*r)/E^(r^2/4) + 
                  (8*r^3)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + 
                    r^2/(4*E^(r^2/4))) + 8*r^2*(r/(2*E^(r^2/4)) - 
                    (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2))/r^2) + 
              7.500000000000001*^-9*(168/(E^(r^2/4)*r^3) - 
                (21*((16*r)/E^(r^2/4) - (4*r^3)/E^(r^2/4)))/r^4 + 
                (9*(16/E^(r^2/4) - (16*r^2)/E^(r^2/4) + 8*r^2*
                    (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 - 
                (2*((-40*r)/E^(r^2/4) + (8*r^3)/E^(r^2/4) + 16*r*
                    (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 8*r^2*
                    (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/
                         (4*E^(r^2/4))))/2)))/r^2 + (-32/E^(r^2/4) + 
                  (32*r^2)/E^(r^2/4) + 32*(-1/2*1/E^(r^2/4) + r^2/
                     (4*E^(r^2/4))) - 16*r^2*(-1/2*1/E^(r^2/4) + 
                    r^2/(4*E^(r^2/4))) + 32*r*(r/(2*E^(r^2/4)) - 
                    (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 
                  8*r^2*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - 
                    (r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/
                          (4*E^(r^2/4))))/2))/2))/r)*Sin[theta]^2) + 
            (-48/(E^(r^2/4)*r^3) + (6*((16*r)/E^(r^2/4) - (4*r^3)/E^(r^2/4)))/
               r^4 - (3*(16/E^(r^2/4) - (16*r^2)/E^(r^2/4) + 8*r^2*
                  (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + 
              ((-40*r)/E^(r^2/4) + (8*r^3)/E^(r^2/4) + 16*r*
                 (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 8*r^2*
                 (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/
                      (4*E^(r^2/4))))/2))/r^2)*(-2 + 3.0000000000000004*^-8*r*
               (-120/(E^(r^2/4)*r^4) + (15*((16*r)/E^(r^2/4) - (4*r^3)/
                    E^(r^2/4)))/r^5 - (6*(16/E^(r^2/4) - (16*r^2)/E^(r^2/4) + 
                   8*r^2*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^4 + 
                ((-40*r)/E^(r^2/4) + (8*r^3)/E^(r^2/4) + 16*r*
                   (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 8*r^2*
                   (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/
                        (4*E^(r^2/4))))/2))/r^3) - 1.5000000000000002*^-8*(
                168/(E^(r^2/4)*r^3) - (21*((16*r)/E^(r^2/4) - (4*r^3)/
                    E^(r^2/4)))/r^4 + (9*(16/E^(r^2/4) - (16*r^2)/E^(r^2/4) + 
                   8*r^2*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 - 
                (2*((-40*r)/E^(r^2/4) + (8*r^3)/E^(r^2/4) + 16*r*
                    (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 8*r^2*
                    (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/
                         (4*E^(r^2/4))))/2)))/r^2 + (-32/E^(r^2/4) + 
                  (32*r^2)/E^(r^2/4) + 32*(-1/2*1/E^(r^2/4) + r^2/
                     (4*E^(r^2/4))) - 16*r^2*(-1/2*1/E^(r^2/4) + 
                    r^2/(4*E^(r^2/4))) + 32*r*(r/(2*E^(r^2/4)) - 
                    (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 
                  8*r^2*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - 
                    (r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/
                          (4*E^(r^2/4))))/2))/2))/r)*Sin[theta]^2 - 
              7.500000000000001*^-9*r*(-840/(E^(r^2/4)*r^4) + 
                (105*((16*r)/E^(r^2/4) - (4*r^3)/E^(r^2/4)))/r^5 - 
                (48*(16/E^(r^2/4) - (16*r^2)/E^(r^2/4) + 8*r^2*
                    (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^4 + 
                (13*((-40*r)/E^(r^2/4) + (8*r^3)/E^(r^2/4) + 16*r*
                    (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 8*r^2*
                    (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/
                         (4*E^(r^2/4))))/2)))/r^3 - (3*(-32/E^(r^2/4) + 
                   (32*r^2)/E^(r^2/4) + 32*(-1/2*1/E^(r^2/4) + r^2/
                      (4*E^(r^2/4))) - 16*r^2*(-1/2*1/E^(r^2/4) + 
                     r^2/(4*E^(r^2/4))) + 32*r*(r/(2*E^(r^2/4)) - 
                     (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 
                   8*r^2*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - 
                     (r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/
                          (4*E^(r^2/4))))/2))/2)))/r^2 + ((80*r)/E^(r^2/4) - 
                  (16*r^3)/E^(r^2/4) - 32*r*(-1/2*1/E^(r^2/4) + 
                    r^2/(4*E^(r^2/4))) + 64*(r/(2*E^(r^2/4)) - 
                    (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) - 
                  16*r^2*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + 
                       r^2/(4*E^(r^2/4))))/2) + 32*r*(1/(2*E^(r^2/4)) - 
                    r^2/(4*E^(r^2/4)) + (1/(2*E^(r^2/4)) - r^2/(4*E^(r^2/4)))/
                     2 - (r*((3*r)/(4*E^(r^2/4)) - r^3/(8*E^(r^2/4))))/2) + 
                  16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - 
                    (r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/
                          (4*E^(r^2/4))))/2))/2) + 8*r^2*(-1/4*r/E^(r^2/4) + 
                    (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/4 + 
                    (3*(-1/2*r/E^(r^2/4) + (r*(-1/2*1/E^(r^2/4) + r^2/
                          (4*E^(r^2/4))))/2))/2 - (r*(3/(4*E^(r^2/4)) - 
                       (3*r^2)/(8*E^(r^2/4)) - (r*(r/(2*E^(r^2/4)) - 
                          (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2))/2))/
                     2))/r)*Sin[theta]^2)))/
          (2 - 9.*^-16*(24/(E^(r^2/4)*r^3) - (3*((16*r)/E^(r^2/4) - 
                  (4*r^3)/E^(r^2/4)))/r^4 + (16/E^(r^2/4) - (16*r^2)/
                  E^(r^2/4) + 8*r^2*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/
                r^3)^2*(1 + 3*Cos[2*theta]) + 1.5000000000000002*^-8*
             (168/(E^(r^2/4)*r^3) - (21*((16*r)/E^(r^2/4) - (4*r^3)/
                  E^(r^2/4)))/r^4 + (9*(16/E^(r^2/4) - (16*r^2)/E^(r^2/4) + 
                 8*r^2*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 - 
              (2*((-40*r)/E^(r^2/4) + (8*r^3)/E^(r^2/4) + 16*r*
                  (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 8*r^2*
                  (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/
                       (4*E^(r^2/4))))/2)))/r^2 + (-32/E^(r^2/4) + 
                (32*r^2)/E^(r^2/4) + 32*(-1/2*1/E^(r^2/4) + 
                  r^2/(4*E^(r^2/4))) - 16*r^2*(-1/2*1/E^(r^2/4) + 
                  r^2/(4*E^(r^2/4))) + 32*r*(r/(2*E^(r^2/4)) - 
                  (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 
                8*r^2*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - 
                  (r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/
                         (4*E^(r^2/4))))/2))/2))/r)*Sin[theta]^2 + 
            3.0000000000000004*^-8*(24/(E^(r^2/4)*r^3) - 
              (3*((16*r)/E^(r^2/4) - (4*r^3)/E^(r^2/4)))/r^4 + 
              (16/E^(r^2/4) - (16*r^2)/E^(r^2/4) + 8*r^2*(-1/2*1/E^(r^2/4) + 
                  r^2/(4*E^(r^2/4))))/r^3)*(-1 + 3*Cos[2*theta] + 
              7.500000000000001*^-9*(168/(E^(r^2/4)*r^3) - 
                (21*((16*r)/E^(r^2/4) - (4*r^3)/E^(r^2/4)))/r^4 + 
                (9*(16/E^(r^2/4) - (16*r^2)/E^(r^2/4) + 8*r^2*
                    (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 - 
                (2*((-40*r)/E^(r^2/4) + (8*r^3)/E^(r^2/4) + 16*r*
                    (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 8*r^2*
                    (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/
                         (4*E^(r^2/4))))/2)))/r^2 + (-32/E^(r^2/4) + 
                  (32*r^2)/E^(r^2/4) + 32*(-1/2*1/E^(r^2/4) + r^2/
                     (4*E^(r^2/4))) - 16*r^2*(-1/2*1/E^(r^2/4) + 
                    r^2/(4*E^(r^2/4))) + 32*r*(r/(2*E^(r^2/4)) - 
                    (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 
                  8*r^2*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - 
                    (r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/
                          (4*E^(r^2/4))))/2))/2))/r)*(1 + 3*Cos[2*theta])*
               Sin[theta]^2) - 4.5*^-16*(-48/(E^(r^2/4)*r^3) + 
               (6*((16*r)/E^(r^2/4) - (4*r^3)/E^(r^2/4)))/r^4 - 
               (3*(16/E^(r^2/4) - (16*r^2)/E^(r^2/4) + 8*r^2*
                   (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + 
               ((-40*r)/E^(r^2/4) + (8*r^3)/E^(r^2/4) + 16*r*
                  (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 8*r^2*
                  (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/
                       (4*E^(r^2/4))))/2))/r^2)^2*Sin[2*theta]^2)^2 + 
         (3.0000000000000004*^-16*Cos[theta]*Sin[theta]*
           (-1.8*^-7*(24/(E^(r^2/4)*r^3) - (3*((16*r)/E^(r^2/4) - 
                  (4*r^3)/E^(r^2/4)))/r^4 + (16/E^(r^2/4) - (16*r^2)/
                  E^(r^2/4) + 8*r^2*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/
                r^3)^2 + 6*(24/(E^(r^2/4)*r^3) - (3*((16*r)/E^(r^2/4) - 
                 (4*r^3)/E^(r^2/4)))/r^4 + (16/E^(r^2/4) - (16*r^2)/
                 E^(r^2/4) + 8*r^2*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/r^
                3)*(1 + 1.*^-8*(-48/(E^(r^2/4)*r^3) + (6*((16*r)/E^(r^2/4) - 
                   (4*r^3)/E^(r^2/4)))/r^4 - (3*(16/E^(r^2/4) - (16*r^2)/
                    E^(r^2/4) + 8*r^2*(-1/2*1/E^(r^2/4) + r^2/
                      (4*E^(r^2/4)))))/r^3 + ((-40*r)/E^(r^2/4) + 
                  (8*r^3)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + 
                    r^2/(4*E^(r^2/4))) + 8*r^2*(r/(2*E^(r^2/4)) - 
                    (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2))/r^2) + 
              7.500000000000001*^-9*(168/(E^(r^2/4)*r^3) - 
                (21*((16*r)/E^(r^2/4) - (4*r^3)/E^(r^2/4)))/r^4 + 
                (9*(16/E^(r^2/4) - (16*r^2)/E^(r^2/4) + 8*r^2*
                    (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 - 
                (2*((-40*r)/E^(r^2/4) + (8*r^3)/E^(r^2/4) + 16*r*
                    (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 8*r^2*
                    (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/
                         (4*E^(r^2/4))))/2)))/r^2 + (-32/E^(r^2/4) + 
                  (32*r^2)/E^(r^2/4) + 32*(-1/2*1/E^(r^2/4) + r^2/
                     (4*E^(r^2/4))) - 16*r^2*(-1/2*1/E^(r^2/4) + 
                    r^2/(4*E^(r^2/4))) + 32*r*(r/(2*E^(r^2/4)) - 
                    (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 
                  8*r^2*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - 
                    (r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/
                          (4*E^(r^2/4))))/2))/2))/r)*Sin[theta]^2) + 
            (-48/(E^(r^2/4)*r^3) + (6*((16*r)/E^(r^2/4) - (4*r^3)/E^(r^2/4)))/
               r^4 - (3*(16/E^(r^2/4) - (16*r^2)/E^(r^2/4) + 8*r^2*
                  (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + 
              ((-40*r)/E^(r^2/4) + (8*r^3)/E^(r^2/4) + 16*r*
                 (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 8*r^2*
                 (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/
                      (4*E^(r^2/4))))/2))/r^2)*(-2 + 3.0000000000000004*^-8*r*
               (-120/(E^(r^2/4)*r^4) + (15*((16*r)/E^(r^2/4) - (4*r^3)/
                    E^(r^2/4)))/r^5 - (6*(16/E^(r^2/4) - (16*r^2)/E^(r^2/4) + 
                   8*r^2*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^4 + 
                ((-40*r)/E^(r^2/4) + (8*r^3)/E^(r^2/4) + 16*r*
                   (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 8*r^2*
                   (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/
                        (4*E^(r^2/4))))/2))/r^3) - 1.5000000000000002*^-8*(
                168/(E^(r^2/4)*r^3) - (21*((16*r)/E^(r^2/4) - (4*r^3)/
                    E^(r^2/4)))/r^4 + (9*(16/E^(r^2/4) - (16*r^2)/E^(r^2/4) + 
                   8*r^2*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 - 
                (2*((-40*r)/E^(r^2/4) + (8*r^3)/E^(r^2/4) + 16*r*
                    (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 8*r^2*
                    (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/
                         (4*E^(r^2/4))))/2)))/r^2 + (-32/E^(r^2/4) + 
                  (32*r^2)/E^(r^2/4) + 32*(-1/2*1/E^(r^2/4) + r^2/
                     (4*E^(r^2/4))) - 16*r^2*(-1/2*1/E^(r^2/4) + 
                    r^2/(4*E^(r^2/4))) + 32*r*(r/(2*E^(r^2/4)) - 
                    (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 
                  8*r^2*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - 
                    (r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/
                          (4*E^(r^2/4))))/2))/2))/r)*Sin[theta]^2 - 
              7.500000000000001*^-9*r*(-840/(E^(r^2/4)*r^4) + 
                (105*((16*r)/E^(r^2/4) - (4*r^3)/E^(r^2/4)))/r^5 - 
                (48*(16/E^(r^2/4) - (16*r^2)/E^(r^2/4) + 8*r^2*
                    (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^4 + 
                (13*((-40*r)/E^(r^2/4) + (8*r^3)/E^(r^2/4) + 16*r*
                    (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 8*r^2*
                    (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/
                         (4*E^(r^2/4))))/2)))/r^3 - (3*(-32/E^(r^2/4) + 
                   (32*r^2)/E^(r^2/4) + 32*(-1/2*1/E^(r^2/4) + r^2/
                      (4*E^(r^2/4))) - 16*r^2*(-1/2*1/E^(r^2/4) + 
                     r^2/(4*E^(r^2/4))) + 32*r*(r/(2*E^(r^2/4)) - 
                     (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 
                   8*r^2*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - 
                     (r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/
                          (4*E^(r^2/4))))/2))/2)))/r^2 + ((80*r)/E^(r^2/4) - 
                  (16*r^3)/E^(r^2/4) - 32*r*(-1/2*1/E^(r^2/4) + 
                    r^2/(4*E^(r^2/4))) + 64*(r/(2*E^(r^2/4)) - 
                    (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) - 
                  16*r^2*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + 
                       r^2/(4*E^(r^2/4))))/2) + 32*r*(1/(2*E^(r^2/4)) - 
                    r^2/(4*E^(r^2/4)) + (1/(2*E^(r^2/4)) - r^2/(4*E^(r^2/4)))/
                     2 - (r*((3*r)/(4*E^(r^2/4)) - r^3/(8*E^(r^2/4))))/2) + 
                  16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - 
                    (r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/
                          (4*E^(r^2/4))))/2))/2) + 8*r^2*(-1/4*r/E^(r^2/4) + 
                    (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/4 + 
                    (3*(-1/2*r/E^(r^2/4) + (r*(-1/2*1/E^(r^2/4) + r^2/
                          (4*E^(r^2/4))))/2))/2 - (r*(3/(4*E^(r^2/4)) - 
                       (3*r^2)/(8*E^(r^2/4)) - (r*(r/(2*E^(r^2/4)) - 
                          (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2))/2))/
                     2))/r)*Sin[theta]^2))*
           ((3*((3*((16*r)/E^(r^2/4) - (4*r^3)/E^(r^2/4)))/r^5 - 
               (3*(16/E^(r^2/4) - (16*r^2)/E^(r^2/4) + 8*r^2*
                   (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^4 + 
               ((-40*r)/E^(r^2/4) + (8*r^3)/E^(r^2/4) + 16*r*
                  (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 8*r^2*
                  (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/
                       (4*E^(r^2/4))))/2))/r^3)*(2 + 3.0000000000000004*^-8*
                (24/(E^(r^2/4)*r^3) - (3*((16*r)/E^(r^2/4) - (4*r^3)/
                     E^(r^2/4)))/r^4 + (16/E^(r^2/4) - (16*r^2)/E^(r^2/4) + 
                   8*r^2*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/r^3)*
                (1 + 3*Cos[2*theta])))/2 + 3*Sin[theta]^2*
             (3.0000000000000004*^-8*(-48/(E^(r^2/4)*r^3) + 
                (6*((16*r)/E^(r^2/4) - (4*r^3)/E^(r^2/4)))/r^4 - 
                (3*(16/E^(r^2/4) - (16*r^2)/E^(r^2/4) + 8*r^2*
                    (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + 
                ((-40*r)/E^(r^2/4) + (8*r^3)/E^(r^2/4) + 16*r*
                   (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 8*r^2*
                   (r/(2*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) - 
                   (4*r^3)/E^(r^2/4)))/r^5 + (6*(16/E^(r^2/4) - (16*r^2)/
                    E^(r^2/4) + 8*r^2*(-1/2*1/E^(r^2/4) + r^2/
                      (4*E^(r^2/4)))))/r^4 - (3*((-40*r)/E^(r^2/4) + 
                   (8*r^3)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + 
                     r^2/(4*E^(r^2/4))) + 8*r^2*(r/(2*E^(r^2/4)) - 
                     (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2)))/r^3 + 
                (-32/E^(r^2/4) + (32*r^2)/E^(r^2/4) + 32*(-1/2*1/E^(r^2/4) + 
                    r^2/(4*E^(r^2/4))) - 16*r^2*(-1/2*1/E^(r^2/4) + 
                    r^2/(4*E^(r^2/4))) + 32*r*(r/(2*E^(r^2/4)) - 
                    (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 
                  8*r^2*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - 
                    (r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/
                          (4*E^(r^2/4))))/2))/2))/r^2)*Cos[theta]^2 + 
              (((21*((16*r)/E^(r^2/4) - (4*r^3)/E^(r^2/4)))/r^5 - 
                 (21*(16/E^(r^2/4) - (16*r^2)/E^(r^2/4) + 8*r^2*
                     (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^4 + 
                 (9*((-40*r)/E^(r^2/4) + (8*r^3)/E^(r^2/4) + 16*r*
                     (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 8*r^2*
                     (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/
                          (4*E^(r^2/4))))/2)))/r^3 - (2*(-32/E^(r^2/4) + 
                    (32*r^2)/E^(r^2/4) + 32*(-1/2*1/E^(r^2/4) + r^2/
                       (4*E^(r^2/4))) - 16*r^2*(-1/2*1/E^(r^2/4) + 
                      r^2/(4*E^(r^2/4))) + 32*r*(r/(2*E^(r^2/4)) - 
                      (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 
                    8*r^2*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - 
                      (r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/
                          (4*E^(r^2/4))))/2))/2)))/r^2 + ((80*r)/E^(r^2/4) - 
                   (16*r^3)/E^(r^2/4) - 32*r*(-1/2*1/E^(r^2/4) + 
                     r^2/(4*E^(r^2/4))) + 64*(r/(2*E^(r^2/4)) - 
                     (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) - 
                   16*r^2*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + 
                        r^2/(4*E^(r^2/4))))/2) + 32*r*(1/(2*E^(r^2/4)) - 
                     r^2/(4*E^(r^2/4)) + (1/(2*E^(r^2/4)) - r^2/
                        (4*E^(r^2/4)))/2 - (r*((3*r)/(4*E^(r^2/4)) - 
                        r^3/(8*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - 
                     (3*r^2)/(8*E^(r^2/4)) - (r*(r/(2*E^(r^2/4)) - 
                        (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2))/2) + 
                   8*r^2*(-1/4*r/E^(r^2/4) + (r*(-1/2*1/E^(r^2/4) + 
                        r^2/(4*E^(r^2/4))))/4 + (3*(-1/2*r/E^(r^2/4) + 
                        (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2))/2 - 
                     (r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - 
                        (r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/
                          (4*E^(r^2/4))))/2))/2))/2))/r)*(-1 + 
                 3.0000000000000004*^-8*(24/(E^(r^2/4)*r^3) - 
                   (3*((16*r)/E^(r^2/4) - (4*r^3)/E^(r^2/4)))/r^4 + 
                   (16/E^(r^2/4) - (16*r^2)/E^(r^2/4) + 8*r^2*
                      (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/r^3)*
                  (-2 + 3*Sin[theta]^2)))/4)))/
          ((2 - 9.*^-16*(24/(E^(r^2/4)*r^3) - (3*((16*r)/E^(r^2/4) - 
                  (4*r^3)/E^(r^2/4)))/r^4 + (16/E^(r^2/4) - (16*r^2)/
                  E^(r^2/4) + 8*r^2*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/
                r^3)^2*(1 + 3*Cos[2*theta]) + 1.5000000000000002*^-8*
             (168/(E^(r^2/4)*r^3) - (21*((16*r)/E^(r^2/4) - (4*r^3)/
                  E^(r^2/4)))/r^4 + (9*(16/E^(r^2/4) - (16*r^2)/E^(r^2/4) + 
                 8*r^2*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 - 
              (2*((-40*r)/E^(r^2/4) + (8*r^3)/E^(r^2/4) + 16*r*
                  (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 8*r^2*
                  (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/
                       (4*E^(r^2/4))))/2)))/r^2 + (-32/E^(r^2/4) + 
                (32*r^2)/E^(r^2/4) + 32*(-1/2*1/E^(r^2/4) + 
                  r^2/(4*E^(r^2/4))) - 16*r^2*(-1/2*1/E^(r^2/4) + 
                  r^2/(4*E^(r^2/4))) + 32*r*(r/(2*E^(r^2/4)) - 
                  (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 
                8*r^2*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - 
                  (r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/
                         (4*E^(r^2/4))))/2))/2))/r)*Sin[theta]^2 + 
            3.0000000000000004*^-8*(24/(E^(r^2/4)*r^3) - 
              (3*((16*r)/E^(r^2/4) - (4*r^3)/E^(r^2/4)))/r^4 + 
              (16/E^(r^2/4) - (16*r^2)/E^(r^2/4) + 8*r^2*(-1/2*1/E^(r^2/4) + 
                  r^2/(4*E^(r^2/4))))/r^3)*(-1 + 3*Cos[2*theta] + 
              7.500000000000001*^-9*(168/(E^(r^2/4)*r^3) - 
                (21*((16*r)/E^(r^2/4) - (4*r^3)/E^(r^2/4)))/r^4 + 
                (9*(16/E^(r^2/4) - (16*r^2)/E^(r^2/4) + 8*r^2*
                    (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 - 
                (2*((-40*r)/E^(r^2/4) + (8*r^3)/E^(r^2/4) + 16*r*
                    (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 8*r^2*
                    (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/
                         (4*E^(r^2/4))))/2)))/r^2 + (-32/E^(r^2/4) + 
                  (32*r^2)/E^(r^2/4) + 32*(-1/2*1/E^(r^2/4) + r^2/
                     (4*E^(r^2/4))) - 16*r^2*(-1/2*1/E^(r^2/4) + 
                    r^2/(4*E^(r^2/4))) + 32*r*(r/(2*E^(r^2/4)) - 
                    (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 
                  8*r^2*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - 
                    (r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/
                          (4*E^(r^2/4))))/2))/2))/r)*(1 + 3*Cos[2*theta])*
               Sin[theta]^2) - 4.5*^-16*(-48/(E^(r^2/4)*r^3) + 
               (6*((16*r)/E^(r^2/4) - (4*r^3)/E^(r^2/4)))/r^4 - 
               (3*(16/E^(r^2/4) - (16*r^2)/E^(r^2/4) + 8*r^2*
                   (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + 
               ((-40*r)/E^(r^2/4) + (8*r^3)/E^(r^2/4) + 16*r*
                  (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 8*r^2*
                  (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/
                       (4*E^(r^2/4))))/2))/r^2)^2*Sin[2*theta]^2)*
           (-2 + 9.*^-16*(24/(E^(r^2/4)*r^3) - (3*((16*r)/E^(r^2/4) - 
                  (4*r^3)/E^(r^2/4)))/r^4 + (16/E^(r^2/4) - (16*r^2)/
                  E^(r^2/4) + 8*r^2*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/
                r^3)^2*(1 + 3*Cos[2*theta]) - 1.5000000000000002*^-8*
             (168/(E^(r^2/4)*r^3) - (21*((16*r)/E^(r^2/4) - (4*r^3)/
                  E^(r^2/4)))/r^4 + (9*(16/E^(r^2/4) - (16*r^2)/E^(r^2/4) + 
                 8*r^2*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 - 
              (2*((-40*r)/E^(r^2/4) + (8*r^3)/E^(r^2/4) + 16*r*
                  (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 8*r^2*
                  (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/
                       (4*E^(r^2/4))))/2)))/r^2 + (-32/E^(r^2/4) + 
                (32*r^2)/E^(r^2/4) + 32*(-1/2*1/E^(r^2/4) + 
                  r^2/(4*E^(r^2/4))) - 16*r^2*(-1/2*1/E^(r^2/4) + 
                  r^2/(4*E^(r^2/4))) + 32*r*(r/(2*E^(r^2/4)) - 
                  (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 
                8*r^2*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - 
                  (r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/
                         (4*E^(r^2/4))))/2))/2))/r)*Sin[theta]^2 - 
            6.000000000000001*^-8*(24/(E^(r^2/4)*r^3) - 
              (3*((16*r)/E^(r^2/4) - (4*r^3)/E^(r^2/4)))/r^4 + 
              (16/E^(r^2/4) - (16*r^2)/E^(r^2/4) + 8*r^2*(-1/2*1/E^(r^2/4) + 
                  r^2/(4*E^(r^2/4))))/r^3)*(1 - 3*Sin[theta]^2 + 
              3.7500000000000005*^-9*(168/(E^(r^2/4)*r^3) - 
                (21*((16*r)/E^(r^2/4) - (4*r^3)/E^(r^2/4)))/r^4 + 
                (9*(16/E^(r^2/4) - (16*r^2)/E^(r^2/4) + 8*r^2*
                    (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 - 
                (2*((-40*r)/E^(r^2/4) + (8*r^3)/E^(r^2/4) + 16*r*
                    (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 8*r^2*
                    (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/
                         (4*E^(r^2/4))))/2)))/r^2 + (-32/E^(r^2/4) + 
                  (32*r^2)/E^(r^2/4) + 32*(-1/2*1/E^(r^2/4) + r^2/
                     (4*E^(r^2/4))) - 16*r^2*(-1/2*1/E^(r^2/4) + 
                    r^2/(4*E^(r^2/4))) + 32*r*(r/(2*E^(r^2/4)) - 
                    (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 
                  8*r^2*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - 
                    (r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/
                          (4*E^(r^2/4))))/2))/2))/r)*(1 + 3*Cos[2*theta])*
               Sin[theta]^2) + 4.5*^-16*(-48/(E^(r^2/4)*r^3) + 
               (6*((16*r)/E^(r^2/4) - (4*r^3)/E^(r^2/4)))/r^4 - 
               (3*(16/E^(r^2/4) - (16*r^2)/E^(r^2/4) + 8*r^2*
                   (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + 
               ((-40*r)/E^(r^2/4) + (8*r^3)/E^(r^2/4) + 16*r*
                  (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 8*r^2*
                  (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/
                       (4*E^(r^2/4))))/2))/r^2)^2*Sin[2*theta]^2)) + 
         (1.5000000000000002*^-8*Cos[theta]*(-3.0000000000000004*^-8*
             ((3*((16*r)/E^(r^2/4) - (4*r^3)/E^(r^2/4)))/r^5 - 
              (3*(16/E^(r^2/4) - (16*r^2)/E^(r^2/4) + 8*r^2*
                  (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^4 + 
              ((-40*r)/E^(r^2/4) + (8*r^3)/E^(r^2/4) + 16*r*
                 (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 8*r^2*
                 (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/
                      (4*E^(r^2/4))))/2))/r^3)*(-48/(E^(r^2/4)*r^3) + 
              (6*((16*r)/E^(r^2/4) - (4*r^3)/E^(r^2/4)))/r^4 - 
              (3*(16/E^(r^2/4) - (16*r^2)/E^(r^2/4) + 8*r^2*
                  (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + 
              ((-40*r)/E^(r^2/4) + (8*r^3)/E^(r^2/4) + 16*r*
                 (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 8*r^2*
                 (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/
                      (4*E^(r^2/4))))/2))/r^2)*(1 + 3*Cos[2*theta]) + 
            ((-6*((16*r)/E^(r^2/4) - (4*r^3)/E^(r^2/4)))/r^5 + 
              (6*(16/E^(r^2/4) - (16*r^2)/E^(r^2/4) + 8*r^2*
                  (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^4 - 
              (3*((-40*r)/E^(r^2/4) + (8*r^3)/E^(r^2/4) + 16*r*
                  (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 8*r^2*
                  (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/
                       (4*E^(r^2/4))))/2)))/r^3 + (-32/E^(r^2/4) + 
                (32*r^2)/E^(r^2/4) + 32*(-1/2*1/E^(r^2/4) + 
                  r^2/(4*E^(r^2/4))) - 16*r^2*(-1/2*1/E^(r^2/4) + 
                  r^2/(4*E^(r^2/4))) + 32*r*(r/(2*E^(r^2/4)) - 
                  (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 
                8*r^2*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - 
                  (r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/
                         (4*E^(r^2/4))))/2))/2))/r^2)*
             (2 + 3.0000000000000004*^-8*(24/(E^(r^2/4)*r^3) - 
                (3*((16*r)/E^(r^2/4) - (4*r^3)/E^(r^2/4)))/r^4 + 
                (16/E^(r^2/4) - (16*r^2)/E^(r^2/4) + 8*r^2*
                   (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/r^3)*(1 + 
                3*Cos[2*theta])))*Sin[theta]*
           (1.8*^-15*(24/(E^(r^2/4)*r^3) - (3*((16*r)/E^(r^2/4) - 
                  (4*r^3)/E^(r^2/4)))/r^4 + (16/E^(r^2/4) - (16*r^2)/
                  E^(r^2/4) + 8*r^2*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/
                r^3)^2 + (1 + 7.500000000000001*^-9*(168/(E^(r^2/4)*r^3) - 
                (21*((16*r)/E^(r^2/4) - (4*r^3)/E^(r^2/4)))/r^4 + 
                (9*(16/E^(r^2/4) - (16*r^2)/E^(r^2/4) + 8*r^2*
                    (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 - 
                (2*((-40*r)/E^(r^2/4) + (8*r^3)/E^(r^2/4) + 16*r*
                    (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 8*r^2*
                    (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/
                         (4*E^(r^2/4))))/2)))/r^2 + (-32/E^(r^2/4) + 
                  (32*r^2)/E^(r^2/4) + 32*(-1/2*1/E^(r^2/4) + r^2/
                     (4*E^(r^2/4))) - 16*r^2*(-1/2*1/E^(r^2/4) + 
                    r^2/(4*E^(r^2/4))) + 32*r*(r/(2*E^(r^2/4)) - 
                    (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 
                  8*r^2*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - 
                    (r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/
                          (4*E^(r^2/4))))/2))/2))/r)*Sin[theta]^2)*
             (2 - 3.0000000000000004*^-8*r*(-120/(E^(r^2/4)*r^4) + 
                (15*((16*r)/E^(r^2/4) - (4*r^3)/E^(r^2/4)))/r^5 - 
                (6*(16/E^(r^2/4) - (16*r^2)/E^(r^2/4) + 8*r^2*
                    (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^4 + 
                ((-40*r)/E^(r^2/4) + (8*r^3)/E^(r^2/4) + 16*r*
                   (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 8*r^2*
                   (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/
                        (4*E^(r^2/4))))/2))/r^3) + 1.5000000000000002*^-8*(
                168/(E^(r^2/4)*r^3) - (21*((16*r)/E^(r^2/4) - (4*r^3)/
                    E^(r^2/4)))/r^4 + (9*(16/E^(r^2/4) - (16*r^2)/E^(r^2/4) + 
                   8*r^2*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 - 
                (2*((-40*r)/E^(r^2/4) + (8*r^3)/E^(r^2/4) + 16*r*
                    (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 8*r^2*
                    (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/
                         (4*E^(r^2/4))))/2)))/r^2 + (-32/E^(r^2/4) + 
                  (32*r^2)/E^(r^2/4) + 32*(-1/2*1/E^(r^2/4) + r^2/
                     (4*E^(r^2/4))) - 16*r^2*(-1/2*1/E^(r^2/4) + 
                    r^2/(4*E^(r^2/4))) + 32*r*(r/(2*E^(r^2/4)) - 
                    (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 
                  8*r^2*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - 
                    (r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/
                          (4*E^(r^2/4))))/2))/2))/r)*Sin[theta]^2 + 
              7.500000000000001*^-9*r*(-840/(E^(r^2/4)*r^4) + 
                (105*((16*r)/E^(r^2/4) - (4*r^3)/E^(r^2/4)))/r^5 - 
                (48*(16/E^(r^2/4) - (16*r^2)/E^(r^2/4) + 8*r^2*
                    (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^4 + 
                (13*((-40*r)/E^(r^2/4) + (8*r^3)/E^(r^2/4) + 16*r*
                    (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 8*r^2*
                    (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/
                         (4*E^(r^2/4))))/2)))/r^3 - (3*(-32/E^(r^2/4) + 
                   (32*r^2)/E^(r^2/4) + 32*(-1/2*1/E^(r^2/4) + r^2/
                      (4*E^(r^2/4))) - 16*r^2*(-1/2*1/E^(r^2/4) + 
                     r^2/(4*E^(r^2/4))) + 32*r*(r/(2*E^(r^2/4)) - 
                     (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 
                   8*r^2*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - 
                     (r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/
                          (4*E^(r^2/4))))/2))/2)))/r^2 + ((80*r)/E^(r^2/4) - 
                  (16*r^3)/E^(r^2/4) - 32*r*(-1/2*1/E^(r^2/4) + 
                    r^2/(4*E^(r^2/4))) + 64*(r/(2*E^(r^2/4)) - 
                    (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) - 
                  16*r^2*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + 
                       r^2/(4*E^(r^2/4))))/2) + 32*r*(1/(2*E^(r^2/4)) - 
                    r^2/(4*E^(r^2/4)) + (1/(2*E^(r^2/4)) - r^2/(4*E^(r^2/4)))/
                     2 - (r*((3*r)/(4*E^(r^2/4)) - r^3/(8*E^(r^2/4))))/2) + 
                  16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - 
                    (r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/
                          (4*E^(r^2/4))))/2))/2) + 8*r^2*(-1/4*r/E^(r^2/4) + 
                    (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/4 + 
                    (3*(-1/2*r/E^(r^2/4) + (r*(-1/2*1/E^(r^2/4) + r^2/
                          (4*E^(r^2/4))))/2))/2 - (r*(3/(4*E^(r^2/4)) - 
                       (3*r^2)/(8*E^(r^2/4)) - (r*(r/(2*E^(r^2/4)) - 
                          (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2))/2))/
                     2))/r)*Sin[theta]^2) - 3.0000000000000004*^-8*
             (24/(E^(r^2/4)*r^3) - (3*((16*r)/E^(r^2/4) - (4*r^3)/E^(r^2/4)))/
               r^4 + (16/E^(r^2/4) - (16*r^2)/E^(r^2/4) + 8*r^2*
                 (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/r^3)*
             (4 - 3.0000000000000004*^-8*r*(-120/(E^(r^2/4)*r^4) + 
                (15*((16*r)/E^(r^2/4) - (4*r^3)/E^(r^2/4)))/r^5 - 
                (6*(16/E^(r^2/4) - (16*r^2)/E^(r^2/4) + 8*r^2*
                    (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^4 + 
                ((-40*r)/E^(r^2/4) + (8*r^3)/E^(r^2/4) + 16*r*
                   (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 8*r^2*
                   (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/
                        (4*E^(r^2/4))))/2))/r^3) + 6.000000000000001*^-8*(
                -48/(E^(r^2/4)*r^3) + (6*((16*r)/E^(r^2/4) - (4*r^3)/
                    E^(r^2/4)))/r^4 - (3*(16/E^(r^2/4) - (16*r^2)/E^(r^2/4) + 
                   8*r^2*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + 
                ((-40*r)/E^(r^2/4) + (8*r^3)/E^(r^2/4) + 16*r*
                   (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 8*r^2*
                   (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/
                        (4*E^(r^2/4))))/2))/r^2)*Cos[2*theta] + 
              3.0000000000000004*^-8*(168/(E^(r^2/4)*r^3) - 
                (21*((16*r)/E^(r^2/4) - (4*r^3)/E^(r^2/4)))/r^4 + 
                (9*(16/E^(r^2/4) - (16*r^2)/E^(r^2/4) + 8*r^2*
                    (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 - 
                (2*((-40*r)/E^(r^2/4) + (8*r^3)/E^(r^2/4) + 16*r*
                    (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 8*r^2*
                    (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/
                         (4*E^(r^2/4))))/2)))/r^2 + (-32/E^(r^2/4) + 
                  (32*r^2)/E^(r^2/4) + 32*(-1/2*1/E^(r^2/4) + r^2/
                     (4*E^(r^2/4))) - 16*r^2*(-1/2*1/E^(r^2/4) + 
                    r^2/(4*E^(r^2/4))) + 32*r*(r/(2*E^(r^2/4)) - 
                    (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 
                  8*r^2*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - 
                    (r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/
                          (4*E^(r^2/4))))/2))/2))/r)*Sin[theta]^2 + 
              7.500000000000001*^-9*r*(-840/(E^(r^2/4)*r^4) + 
                (105*((16*r)/E^(r^2/4) - (4*r^3)/E^(r^2/4)))/r^5 - 
                (48*(16/E^(r^2/4) - (16*r^2)/E^(r^2/4) + 8*r^2*
                    (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^4 + 
                (13*((-40*r)/E^(r^2/4) + (8*r^3)/E^(r^2/4) + 16*r*
                    (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 8*r^2*
                    (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/
                         (4*E^(r^2/4))))/2)))/r^3 - (3*(-32/E^(r^2/4) + 
                   (32*r^2)/E^(r^2/4) + 32*(-1/2*1/E^(r^2/4) + r^2/
                      (4*E^(r^2/4))) - 16*r^2*(-1/2*1/E^(r^2/4) + 
                     r^2/(4*E^(r^2/4))) + 32*r*(r/(2*E^(r^2/4)) - 
                     (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 
                   8*r^2*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - 
                     (r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/
                          (4*E^(r^2/4))))/2))/2)))/r^2 + ((80*r)/E^(r^2/4) - 
                  (16*r^3)/E^(r^2/4) - 32*r*(-1/2*1/E^(r^2/4) + 
                    r^2/(4*E^(r^2/4))) + 64*(r/(2*E^(r^2/4)) - 
                    (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) - 
                  16*r^2*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + 
                       r^2/(4*E^(r^2/4))))/2) + 32*r*(1/(2*E^(r^2/4)) - 
                    r^2/(4*E^(r^2/4)) + (1/(2*E^(r^2/4)) - r^2/(4*E^(r^2/4)))/
                     2 - (r*((3*r)/(4*E^(r^2/4)) - r^3/(8*E^(r^2/4))))/2) + 
                  16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - 
                    (r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/
                          (4*E^(r^2/4))))/2))/2) + 8*r^2*(-1/4*r/E^(r^2/4) + 
                    (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/4 + 
                    (3*(-1/2*r/E^(r^2/4) + (r*(-1/2*1/E^(r^2/4) + r^2/
                          (4*E^(r^2/4))))/2))/2 - (r*(3/(4*E^(r^2/4)) - 
                       (3*r^2)/(8*E^(r^2/4)) - (r*(r/(2*E^(r^2/4)) - 
                          (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2))/2))/
                     2))/r)*Sin[theta]^2) + 6.000000000000001*^-8*
             (-48/(E^(r^2/4)*r^3) + (6*((16*r)/E^(r^2/4) - (4*r^3)/
                  E^(r^2/4)))/r^4 - (3*(16/E^(r^2/4) - (16*r^2)/E^(r^2/4) + 
                 8*r^2*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + 
              ((-40*r)/E^(r^2/4) + (8*r^3)/E^(r^2/4) + 16*r*
                 (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 8*r^2*
                 (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/
                      (4*E^(r^2/4))))/2))/r^2)*(Cos[2*theta] - 
              7.500000000000001*^-9*(168/(E^(r^2/4)*r^3) - 
                (21*((16*r)/E^(r^2/4) - (4*r^3)/E^(r^2/4)))/r^4 + 
                (9*(16/E^(r^2/4) - (16*r^2)/E^(r^2/4) + 8*r^2*
                    (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 - 
                (2*((-40*r)/E^(r^2/4) + (8*r^3)/E^(r^2/4) + 16*r*
                    (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 8*r^2*
                    (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/
                         (4*E^(r^2/4))))/2)))/r^2 + (-32/E^(r^2/4) + 
                  (32*r^2)/E^(r^2/4) + 32*(-1/2*1/E^(r^2/4) + r^2/
                     (4*E^(r^2/4))) - 16*r^2*(-1/2*1/E^(r^2/4) + 
                    r^2/(4*E^(r^2/4))) + 32*r*(r/(2*E^(r^2/4)) - 
                    (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 
                  8*r^2*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - 
                    (r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/
                          (4*E^(r^2/4))))/2))/2))/r)*Sin[theta]^4)))/
          ((-2 + 9.*^-16*(24/(E^(r^2/4)*r^3) - (3*((16*r)/E^(r^2/4) - 
                  (4*r^3)/E^(r^2/4)))/r^4 + (16/E^(r^2/4) - (16*r^2)/
                  E^(r^2/4) + 8*r^2*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/
                r^3)^2*(1 + 3*Cos[2*theta]) - 1.5000000000000002*^-8*
             (168/(E^(r^2/4)*r^3) - (21*((16*r)/E^(r^2/4) - (4*r^3)/
                  E^(r^2/4)))/r^4 + (9*(16/E^(r^2/4) - (16*r^2)/E^(r^2/4) + 
                 8*r^2*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 - 
              (2*((-40*r)/E^(r^2/4) + (8*r^3)/E^(r^2/4) + 16*r*
                  (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 8*r^2*
                  (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/
                       (4*E^(r^2/4))))/2)))/r^2 + (-32/E^(r^2/4) + 
                (32*r^2)/E^(r^2/4) + 32*(-1/2*1/E^(r^2/4) + 
                  r^2/(4*E^(r^2/4))) - 16*r^2*(-1/2*1/E^(r^2/4) + 
                  r^2/(4*E^(r^2/4))) + 32*r*(r/(2*E^(r^2/4)) - 
                  (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 
                8*r^2*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - 
                  (r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/
                         (4*E^(r^2/4))))/2))/2))/r)*Sin[theta]^2 - 
            6.000000000000001*^-8*(24/(E^(r^2/4)*r^3) - 
              (3*((16*r)/E^(r^2/4) - (4*r^3)/E^(r^2/4)))/r^4 + 
              (16/E^(r^2/4) - (16*r^2)/E^(r^2/4) + 8*r^2*(-1/2*1/E^(r^2/4) + 
                  r^2/(4*E^(r^2/4))))/r^3)*(1 - 3*Sin[theta]^2 + 
              3.7500000000000005*^-9*(168/(E^(r^2/4)*r^3) - 
                (21*((16*r)/E^(r^2/4) - (4*r^3)/E^(r^2/4)))/r^4 + 
                (9*(16/E^(r^2/4) - (16*r^2)/E^(r^2/4) + 8*r^2*
                    (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 - 
                (2*((-40*r)/E^(r^2/4) + (8*r^3)/E^(r^2/4) + 16*r*
                    (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 8*r^2*
                    (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/
                         (4*E^(r^2/4))))/2)))/r^2 + (-32/E^(r^2/4) + 
                  (32*r^2)/E^(r^2/4) + 32*(-1/2*1/E^(r^2/4) + r^2/
                     (4*E^(r^2/4))) - 16*r^2*(-1/2*1/E^(r^2/4) + 
                    r^2/(4*E^(r^2/4))) + 32*r*(r/(2*E^(r^2/4)) - 
                    (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 
                  8*r^2*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - 
                    (r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/
                          (4*E^(r^2/4))))/2))/2))/r)*(1 + 3*Cos[2*theta])*
               Sin[theta]^2) + 4.5*^-16*(-48/(E^(r^2/4)*r^3) + 
               (6*((16*r)/E^(r^2/4) - (4*r^3)/E^(r^2/4)))/r^4 - 
               (3*(16/E^(r^2/4) - (16*r^2)/E^(r^2/4) + 8*r^2*
                   (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + 
               ((-40*r)/E^(r^2/4) + (8*r^3)/E^(r^2/4) + 16*r*
                  (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 8*r^2*
                  (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/
                       (4*E^(r^2/4))))/2))/r^2)^2*Sin[2*theta]^2)*
           (-2 + 9.*^-16*(24/(E^(r^2/4)*r^3) - (3*((16*r)/E^(r^2/4) - 
                  (4*r^3)/E^(r^2/4)))/r^4 + (16/E^(r^2/4) - (16*r^2)/
                  E^(r^2/4) + 8*r^2*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/
                r^3)^2*(1 + 3*Cos[2*theta]) - 1.5000000000000002*^-8*
             (168/(E^(r^2/4)*r^3) - (21*((16*r)/E^(r^2/4) - (4*r^3)/
                  E^(r^2/4)))/r^4 + (9*(16/E^(r^2/4) - (16*r^2)/E^(r^2/4) + 
                 8*r^2*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 - 
              (2*((-40*r)/E^(r^2/4) + (8*r^3)/E^(r^2/4) + 16*r*
                  (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 8*r^2*
                  (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/
                       (4*E^(r^2/4))))/2)))/r^2 + (-32/E^(r^2/4) + 
                (32*r^2)/E^(r^2/4) + 32*(-1/2*1/E^(r^2/4) + 
                  r^2/(4*E^(r^2/4))) - 16*r^2*(-1/2*1/E^(r^2/4) + 
                  r^2/(4*E^(r^2/4))) + 32*r*(r/(2*E^(r^2/4)) - 
                  (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 
                8*r^2*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - 
                  (r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/
                         (4*E^(r^2/4))))/2))/2))/r)*Sin[theta]^2 - 
            3.0000000000000004*^-8*(24/(E^(r^2/4)*r^3) - 
              (3*((16*r)/E^(r^2/4) - (4*r^3)/E^(r^2/4)))/r^4 + 
              (16/E^(r^2/4) - (16*r^2)/E^(r^2/4) + 8*r^2*(-1/2*1/E^(r^2/4) + 
                  r^2/(4*E^(r^2/4))))/r^3)*(-1 + 3*Cos[2*theta] + 
              7.500000000000001*^-9*(168/(E^(r^2/4)*r^3) - 
                (21*((16*r)/E^(r^2/4) - (4*r^3)/E^(r^2/4)))/r^4 + 
                (9*(16/E^(r^2/4) - (16*r^2)/E^(r^2/4) + 8*r^2*
                    (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 - 
                (2*((-40*r)/E^(r^2/4) + (8*r^3)/E^(r^2/4) + 16*r*
                    (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 8*r^2*
                    (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/
                         (4*E^(r^2/4))))/2)))/r^2 + (-32/E^(r^2/4) + 
                  (32*r^2)/E^(r^2/4) + 32*(-1/2*1/E^(r^2/4) + r^2/
                     (4*E^(r^2/4))) - 16*r^2*(-1/2*1/E^(r^2/4) + 
                    r^2/(4*E^(r^2/4))) + 32*r*(r/(2*E^(r^2/4)) - 
                    (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 
                  8*r^2*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - 
                    (r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/
                          (4*E^(r^2/4))))/2))/2))/r)*(1 + 3*Cos[2*theta])*
               Sin[theta]^2) + 4.5*^-16*(-48/(E^(r^2/4)*r^3) + 
               (6*((16*r)/E^(r^2/4) - (4*r^3)/E^(r^2/4)))/r^4 - 
               (3*(16/E^(r^2/4) - (16*r^2)/E^(r^2/4) + 8*r^2*
                   (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + 
               ((-40*r)/E^(r^2/4) + (8*r^3)/E^(r^2/4) + 16*r*
                  (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 8*r^2*
                  (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/
                       (4*E^(r^2/4))))/2))/r^2)^2*Sin[2*theta]^2)) + 
         (1.5000000000000002*^-16*Cos[theta]*Sin[theta]*
           (((-6*((16*r)/E^(r^2/4) - (4*r^3)/E^(r^2/4)))/r^5 + 
              (6*(16/E^(r^2/4) - (16*r^2)/E^(r^2/4) + 8*r^2*
                  (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^4 - 
              (3*((-40*r)/E^(r^2/4) + (8*r^3)/E^(r^2/4) + 16*r*
                  (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 8*r^2*
                  (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/
                       (4*E^(r^2/4))))/2)))/r^3 + (-32/E^(r^2/4) + 
                (32*r^2)/E^(r^2/4) + 32*(-1/2*1/E^(r^2/4) + 
                  r^2/(4*E^(r^2/4))) - 16*r^2*(-1/2*1/E^(r^2/4) + 
                  r^2/(4*E^(r^2/4))) + 32*r*(r/(2*E^(r^2/4)) - 
                  (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 
                8*r^2*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - 
                  (r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/
                         (4*E^(r^2/4))))/2))/2))/r^2)*
             (1 - 3.0000000000000004*^-8*(24/(E^(r^2/4)*r^3) - 
                (3*((16*r)/E^(r^2/4) - (4*r^3)/E^(r^2/4)))/r^4 + 
                (16/E^(r^2/4) - (16*r^2)/E^(r^2/4) + 8*r^2*
                   (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/r^3) + 
              7.500000000000001*^-9*(168/(E^(r^2/4)*r^3) - 
                (21*((16*r)/E^(r^2/4) - (4*r^3)/E^(r^2/4)))/r^4 + 
                (9*(16/E^(r^2/4) - (16*r^2)/E^(r^2/4) + 8*r^2*
                    (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 - 
                (2*((-40*r)/E^(r^2/4) + (8*r^3)/E^(r^2/4) + 16*r*
                    (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 8*r^2*
                    (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/
                         (4*E^(r^2/4))))/2)))/r^2 + (-32/E^(r^2/4) + 
                  (32*r^2)/E^(r^2/4) + 32*(-1/2*1/E^(r^2/4) + r^2/
                     (4*E^(r^2/4))) - 16*r^2*(-1/2*1/E^(r^2/4) + 
                    r^2/(4*E^(r^2/4))) + 32*r*(r/(2*E^(r^2/4)) - 
                    (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 
                  8*r^2*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - 
                    (r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/
                          (4*E^(r^2/4))))/2))/2))/r)*Sin[theta]^2) + 
            1.*^-8*(-48/(E^(r^2/4)*r^3) + (6*((16*r)/E^(r^2/4) - 
                 (4*r^3)/E^(r^2/4)))/r^4 - (3*(16/E^(r^2/4) - (16*r^2)/
                  E^(r^2/4) + 8*r^2*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/
               r^3 + ((-40*r)/E^(r^2/4) + (8*r^3)/E^(r^2/4) + 
                16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 
                8*r^2*(r/(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) - (4*r^3)/E^(r^2/4)))/r^5 - 
                (3*(16/E^(r^2/4) - (16*r^2)/E^(r^2/4) + 8*r^2*
                    (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^4 + 
                ((-40*r)/E^(r^2/4) + (8*r^3)/E^(r^2/4) + 16*r*
                   (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 8*r^2*
                   (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/
                        (4*E^(r^2/4))))/2))/r^3) - 
              (3*((21*((16*r)/E^(r^2/4) - (4*r^3)/E^(r^2/4)))/r^5 - 
                 (21*(16/E^(r^2/4) - (16*r^2)/E^(r^2/4) + 8*r^2*
                     (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^4 + 
                 (9*((-40*r)/E^(r^2/4) + (8*r^3)/E^(r^2/4) + 16*r*
                     (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 8*r^2*
                     (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/
                          (4*E^(r^2/4))))/2)))/r^3 - (2*(-32/E^(r^2/4) + 
                    (32*r^2)/E^(r^2/4) + 32*(-1/2*1/E^(r^2/4) + r^2/
                       (4*E^(r^2/4))) - 16*r^2*(-1/2*1/E^(r^2/4) + 
                      r^2/(4*E^(r^2/4))) + 32*r*(r/(2*E^(r^2/4)) - 
                      (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 
                    8*r^2*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - 
                      (r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/
                          (4*E^(r^2/4))))/2))/2)))/r^2 + ((80*r)/E^(r^2/4) - 
                   (16*r^3)/E^(r^2/4) - 32*r*(-1/2*1/E^(r^2/4) + 
                     r^2/(4*E^(r^2/4))) + 64*(r/(2*E^(r^2/4)) - 
                     (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) - 
                   16*r^2*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + 
                        r^2/(4*E^(r^2/4))))/2) + 32*r*(1/(2*E^(r^2/4)) - 
                     r^2/(4*E^(r^2/4)) + (1/(2*E^(r^2/4)) - r^2/
                        (4*E^(r^2/4)))/2 - (r*((3*r)/(4*E^(r^2/4)) - 
                        r^3/(8*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - 
                     (3*r^2)/(8*E^(r^2/4)) - (r*(r/(2*E^(r^2/4)) - 
                        (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2))/2) + 
                   8*r^2*(-1/4*r/E^(r^2/4) + (r*(-1/2*1/E^(r^2/4) + 
                        r^2/(4*E^(r^2/4))))/4 + (3*(-1/2*r/E^(r^2/4) + 
                        (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2))/2 - 
                     (r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - 
                        (r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/
                          (4*E^(r^2/4))))/2))/2))/2))/r)*Sin[theta]^2)/4))*
           (-3*r*(-120/(E^(r^2/4)*r^4) + (15*((16*r)/E^(r^2/4) - 
                 (4*r^3)/E^(r^2/4)))/r^5 - (6*(16/E^(r^2/4) - (16*r^2)/
                  E^(r^2/4) + 8*r^2*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/
               r^4 + ((-40*r)/E^(r^2/4) + (8*r^3)/E^(r^2/4) + 
                16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 
                8*r^2*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + 
                     r^2/(4*E^(r^2/4))))/2))/r^3)*(1 + 3*Cos[2*theta])*
             (1 + 7.500000000000001*^-9*(168/(E^(r^2/4)*r^3) - 
                (21*((16*r)/E^(r^2/4) - (4*r^3)/E^(r^2/4)))/r^4 + 
                (9*(16/E^(r^2/4) - (16*r^2)/E^(r^2/4) + 8*r^2*
                    (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 - 
                (2*((-40*r)/E^(r^2/4) + (8*r^3)/E^(r^2/4) + 16*r*
                    (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 8*r^2*
                    (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/
                         (4*E^(r^2/4))))/2)))/r^2 + (-32/E^(r^2/4) + 
                  (32*r^2)/E^(r^2/4) + 32*(-1/2*1/E^(r^2/4) + r^2/
                     (4*E^(r^2/4))) - 16*r^2*(-1/2*1/E^(r^2/4) + 
                    r^2/(4*E^(r^2/4))) + 32*r*(r/(2*E^(r^2/4)) - 
                    (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 
                  8*r^2*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - 
                    (r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/
                          (4*E^(r^2/4))))/2))/2))/r)*Sin[theta]^2) + 
            9.*^-8*(-48/(E^(r^2/4)*r^3) + (6*((16*r)/E^(r^2/4) - (4*r^3)/
                   E^(r^2/4)))/r^4 - (3*(16/E^(r^2/4) - (16*r^2)/E^(r^2/4) + 
                  8*r^2*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + 
               ((-40*r)/E^(r^2/4) + (8*r^3)/E^(r^2/4) + 16*r*
                  (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 8*r^2*
                  (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/
                       (4*E^(r^2/4))))/2))/r^2)^2*Sin[2*theta]^2 + 
            9.*^-8*r*(-48/(E^(r^2/4)*r^3) + (6*((16*r)/E^(r^2/4) - 
                 (4*r^3)/E^(r^2/4)))/r^4 - (3*(16/E^(r^2/4) - (16*r^2)/
                  E^(r^2/4) + 8*r^2*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/
               r^3 + ((-40*r)/E^(r^2/4) + (8*r^3)/E^(r^2/4) + 
                16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 
                8*r^2*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + 
                     r^2/(4*E^(r^2/4))))/2))/r^2)*(240/(E^(r^2/4)*r^4) - 
              (30*((16*r)/E^(r^2/4) - (4*r^3)/E^(r^2/4)))/r^5 + 
              (15*(16/E^(r^2/4) - (16*r^2)/E^(r^2/4) + 8*r^2*
                  (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^4 - 
              (5*((-40*r)/E^(r^2/4) + (8*r^3)/E^(r^2/4) + 16*r*
                  (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 8*r^2*
                  (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/
                       (4*E^(r^2/4))))/2)))/r^3 + (-32/E^(r^2/4) + 
                (32*r^2)/E^(r^2/4) + 32*(-1/2*1/E^(r^2/4) + 
                  r^2/(4*E^(r^2/4))) - 16*r^2*(-1/2*1/E^(r^2/4) + 
                  r^2/(4*E^(r^2/4))) + 32*r*(r/(2*E^(r^2/4)) - 
                  (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 
                8*r^2*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - 
                  (r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/
                         (4*E^(r^2/4))))/2))/2))/r^2)*Sin[2*theta]^2 + 
            3.0000000000000004*^-8*(24/(E^(r^2/4)*r^3) - 
              (3*((16*r)/E^(r^2/4) - (4*r^3)/E^(r^2/4)))/r^4 + 
              (16/E^(r^2/4) - (16*r^2)/E^(r^2/4) + 8*r^2*(-1/2*1/E^(r^2/4) + 
                  r^2/(4*E^(r^2/4))))/r^3)*(3*r*(-120/(E^(r^2/4)*r^4) + 
                (15*((16*r)/E^(r^2/4) - (4*r^3)/E^(r^2/4)))/r^5 - 
                (6*(16/E^(r^2/4) - (16*r^2)/E^(r^2/4) + 8*r^2*
                    (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^4 + 
                ((-40*r)/E^(r^2/4) + (8*r^3)/E^(r^2/4) + 16*r*
                   (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 8*r^2*
                   (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/
                        (4*E^(r^2/4))))/2))/r^3)*(1 + 3*Cos[2*theta]) - 
              9*(-48/(E^(r^2/4)*r^3) + (6*((16*r)/E^(r^2/4) - (4*r^3)/
                    E^(r^2/4)))/r^4 - (3*(16/E^(r^2/4) - (16*r^2)/E^(r^2/4) + 
                   8*r^2*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + 
                ((-40*r)/E^(r^2/4) + (8*r^3)/E^(r^2/4) + 16*r*
                   (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 8*r^2*
                   (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/
                        (4*E^(r^2/4))))/2))/r^2)*Sin[2*theta]^2)))/
          ((2 - 9.*^-16*(24/(E^(r^2/4)*r^3) - (3*((16*r)/E^(r^2/4) - 
                  (4*r^3)/E^(r^2/4)))/r^4 + (16/E^(r^2/4) - (16*r^2)/
                  E^(r^2/4) + 8*r^2*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/
                r^3)^2*(1 + 3*Cos[2*theta]) + 1.5000000000000002*^-8*
             (168/(E^(r^2/4)*r^3) - (21*((16*r)/E^(r^2/4) - (4*r^3)/
                  E^(r^2/4)))/r^4 + (9*(16/E^(r^2/4) - (16*r^2)/E^(r^2/4) + 
                 8*r^2*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 - 
              (2*((-40*r)/E^(r^2/4) + (8*r^3)/E^(r^2/4) + 16*r*
                  (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 8*r^2*
                  (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/
                       (4*E^(r^2/4))))/2)))/r^2 + (-32/E^(r^2/4) + 
                (32*r^2)/E^(r^2/4) + 32*(-1/2*1/E^(r^2/4) + 
                  r^2/(4*E^(r^2/4))) - 16*r^2*(-1/2*1/E^(r^2/4) + 
                  r^2/(4*E^(r^2/4))) + 32*r*(r/(2*E^(r^2/4)) - 
                  (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 
                8*r^2*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - 
                  (r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/
                         (4*E^(r^2/4))))/2))/2))/r)*Sin[theta]^2 + 
            3.0000000000000004*^-8*(24/(E^(r^2/4)*r^3) - 
              (3*((16*r)/E^(r^2/4) - (4*r^3)/E^(r^2/4)))/r^4 + 
              (16/E^(r^2/4) - (16*r^2)/E^(r^2/4) + 8*r^2*(-1/2*1/E^(r^2/4) + 
                  r^2/(4*E^(r^2/4))))/r^3)*(-1 + 3*Cos[2*theta] + 
              7.500000000000001*^-9*(168/(E^(r^2/4)*r^3) - 
                (21*((16*r)/E^(r^2/4) - (4*r^3)/E^(r^2/4)))/r^4 + 
                (9*(16/E^(r^2/4) - (16*r^2)/E^(r^2/4) + 8*r^2*
                    (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 - 
                (2*((-40*r)/E^(r^2/4) + (8*r^3)/E^(r^2/4) + 16*r*
                    (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 8*r^2*
                    (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/
                         (4*E^(r^2/4))))/2)))/r^2 + (-32/E^(r^2/4) + 
                  (32*r^2)/E^(r^2/4) + 32*(-1/2*1/E^(r^2/4) + r^2/
                     (4*E^(r^2/4))) - 16*r^2*(-1/2*1/E^(r^2/4) + 
                    r^2/(4*E^(r^2/4))) + 32*r*(r/(2*E^(r^2/4)) - 
                    (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 
                  8*r^2*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - 
                    (r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/
                          (4*E^(r^2/4))))/2))/2))/r)*(1 + 3*Cos[2*theta])*
               Sin[theta]^2) - 4.5*^-16*(-48/(E^(r^2/4)*r^3) + 
               (6*((16*r)/E^(r^2/4) - (4*r^3)/E^(r^2/4)))/r^4 - 
               (3*(16/E^(r^2/4) - (16*r^2)/E^(r^2/4) + 8*r^2*
                   (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + 
               ((-40*r)/E^(r^2/4) + (8*r^3)/E^(r^2/4) + 16*r*
                  (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 8*r^2*
                  (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/
                       (4*E^(r^2/4))))/2))/r^2)^2*Sin[2*theta]^2)*
           (-2 + 9.*^-16*(24/(E^(r^2/4)*r^3) - (3*((16*r)/E^(r^2/4) - 
                  (4*r^3)/E^(r^2/4)))/r^4 + (16/E^(r^2/4) - (16*r^2)/
                  E^(r^2/4) + 8*r^2*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/
                r^3)^2*(1 + 3*Cos[2*theta]) - 1.5000000000000002*^-8*
             (168/(E^(r^2/4)*r^3) - (21*((16*r)/E^(r^2/4) - (4*r^3)/
                  E^(r^2/4)))/r^4 + (9*(16/E^(r^2/4) - (16*r^2)/E^(r^2/4) + 
                 8*r^2*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 - 
              (2*((-40*r)/E^(r^2/4) + (8*r^3)/E^(r^2/4) + 16*r*
                  (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 8*r^2*
                  (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/
                       (4*E^(r^2/4))))/2)))/r^2 + (-32/E^(r^2/4) + 
                (32*r^2)/E^(r^2/4) + 32*(-1/2*1/E^(r^2/4) + 
                  r^2/(4*E^(r^2/4))) - 16*r^2*(-1/2*1/E^(r^2/4) + 
                  r^2/(4*E^(r^2/4))) + 32*r*(r/(2*E^(r^2/4)) - 
                  (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 
                8*r^2*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - 
                  (r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/
                         (4*E^(r^2/4))))/2))/2))/r)*Sin[theta]^2 - 
            3.0000000000000004*^-8*(24/(E^(r^2/4)*r^3) - 
              (3*((16*r)/E^(r^2/4) - (4*r^3)/E^(r^2/4)))/r^4 + 
              (16/E^(r^2/4) - (16*r^2)/E^(r^2/4) + 8*r^2*(-1/2*1/E^(r^2/4) + 
                  r^2/(4*E^(r^2/4))))/r^3)*(-1 + 3*Cos[2*theta] + 
              7.500000000000001*^-9*(168/(E^(r^2/4)*r^3) - 
                (21*((16*r)/E^(r^2/4) - (4*r^3)/E^(r^2/4)))/r^4 + 
                (9*(16/E^(r^2/4) - (16*r^2)/E^(r^2/4) + 8*r^2*
                    (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 - 
                (2*((-40*r)/E^(r^2/4) + (8*r^3)/E^(r^2/4) + 16*r*
                    (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 8*r^2*
                    (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/
                         (4*E^(r^2/4))))/2)))/r^2 + (-32/E^(r^2/4) + 
                  (32*r^2)/E^(r^2/4) + 32*(-1/2*1/E^(r^2/4) + r^2/
                     (4*E^(r^2/4))) - 16*r^2*(-1/2*1/E^(r^2/4) + 
                    r^2/(4*E^(r^2/4))) + 32*r*(r/(2*E^(r^2/4)) - 
                    (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 
                  8*r^2*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - 
                    (r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/
                          (4*E^(r^2/4))))/2))/2))/r)*(1 + 3*Cos[2*theta])*
               Sin[theta]^2) + 4.5*^-16*(-48/(E^(r^2/4)*r^3) + 
               (6*((16*r)/E^(r^2/4) - (4*r^3)/E^(r^2/4)))/r^4 - 
               (3*(16/E^(r^2/4) - (16*r^2)/E^(r^2/4) + 8*r^2*
                   (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + 
               ((-40*r)/E^(r^2/4) + (8*r^3)/E^(r^2/4) + 16*r*
                  (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 8*r^2*
                  (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/
                       (4*E^(r^2/4))))/2))/r^2)^2*Sin[2*theta]^2)) + 
         (7.500000000000001*^-9*Sin[2*theta]*
           (-8.*^-8*(9.*^-8*(24/(E^(r^2/4)*r^3) - (3*((16*r)/E^(r^2/4) - 
                    (4*r^3)/E^(r^2/4)))/r^4 + (16/E^(r^2/4) - (16*r^2)/
                    E^(r^2/4) + 8*r^2*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/
                  r^3)^2 + (168/(E^(r^2/4)*r^3) - (21*((16*r)/E^(r^2/4) - 
                   (4*r^3)/E^(r^2/4)))/r^4 + (9*(16/E^(r^2/4) - (16*r^2)/
                    E^(r^2/4) + 8*r^2*(-1/2*1/E^(r^2/4) + r^2/
                      (4*E^(r^2/4)))))/r^3 - (2*((-40*r)/E^(r^2/4) + 
                   (8*r^3)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + 
                     r^2/(4*E^(r^2/4))) + 8*r^2*(r/(2*E^(r^2/4)) - 
                     (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2)))/r^2 + 
                (-32/E^(r^2/4) + (32*r^2)/E^(r^2/4) + 32*(-1/2*1/E^(r^2/4) + 
                    r^2/(4*E^(r^2/4))) - 16*r^2*(-1/2*1/E^(r^2/4) + 
                    r^2/(4*E^(r^2/4))) + 32*r*(r/(2*E^(r^2/4)) - 
                    (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 
                  8*r^2*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - 
                    (r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/
                          (4*E^(r^2/4))))/2))/2))/r)/4 - 
              3.0000000000000004*^-8*(-48/(E^(r^2/4)*r^3) + 
                 (6*((16*r)/E^(r^2/4) - (4*r^3)/E^(r^2/4)))/r^4 - 
                 (3*(16/E^(r^2/4) - (16*r^2)/E^(r^2/4) + 8*r^2*
                     (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + 
                 ((-40*r)/E^(r^2/4) + (8*r^3)/E^(r^2/4) + 16*r*
                    (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 8*r^2*
                    (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/
                         (4*E^(r^2/4))))/2))/r^2)^2*Cos[2*theta] + 
              3*(24/(E^(r^2/4)*r^3) - (3*((16*r)/E^(r^2/4) - (4*r^3)/
                    E^(r^2/4)))/r^4 + (16/E^(r^2/4) - (16*r^2)/E^(r^2/4) + 
                  8*r^2*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/r^3)*(-1 + 
                2.5*^-9*(168/(E^(r^2/4)*r^3) - (21*((16*r)/E^(r^2/4) - 
                     (4*r^3)/E^(r^2/4)))/r^4 + (9*(16/E^(r^2/4) - (16*r^2)/
                      E^(r^2/4) + 8*r^2*(-1/2*1/E^(r^2/4) + r^2/
                        (4*E^(r^2/4)))))/r^3 - (2*((-40*r)/E^(r^2/4) + 
                     (8*r^3)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + 
                       r^2/(4*E^(r^2/4))) + 8*r^2*(r/(2*E^(r^2/4)) - 
                       (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2)))/r^2 + 
                  (-32/E^(r^2/4) + (32*r^2)/E^(r^2/4) + 32*
                     (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) - 16*r^2*
                     (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*r*
                     (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/
                          (4*E^(r^2/4))))/2) + 8*r^2*(3/(4*E^(r^2/4)) - 
                      (3*r^2)/(8*E^(r^2/4)) - (r*(r/(2*E^(r^2/4)) - 
                         (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2))/2))/
                   r)*(-1 + 3*Cos[2*theta])))*(-9.*^-8*(-48/(E^(r^2/4)*r^3) + 
                (6*((16*r)/E^(r^2/4) - (4*r^3)/E^(r^2/4)))/r^4 - 
                (3*(16/E^(r^2/4) - (16*r^2)/E^(r^2/4) + 8*r^2*
                    (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + 
                ((-40*r)/E^(r^2/4) + (8*r^3)/E^(r^2/4) + 16*r*
                   (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 8*r^2*
                   (r/(2*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) - 
                   (4*r^3)/E^(r^2/4)))/r^5 + (6*(16/E^(r^2/4) - (16*r^2)/
                    E^(r^2/4) + 8*r^2*(-1/2*1/E^(r^2/4) + r^2/
                      (4*E^(r^2/4)))))/r^4 - (3*((-40*r)/E^(r^2/4) + 
                   (8*r^3)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + 
                     r^2/(4*E^(r^2/4))) + 8*r^2*(r/(2*E^(r^2/4)) - 
                     (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2)))/r^3 + 
                (-32/E^(r^2/4) + (32*r^2)/E^(r^2/4) + 32*(-1/2*1/E^(r^2/4) + 
                    r^2/(4*E^(r^2/4))) - 16*r^2*(-1/2*1/E^(r^2/4) + 
                    r^2/(4*E^(r^2/4))) + 32*r*(r/(2*E^(r^2/4)) - 
                    (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 
                  8*r^2*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - 
                    (r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/
                          (4*E^(r^2/4))))/2))/2))/r^2)*Cos[theta]^2*
               Sin[theta]^2 - (3*((3*((16*r)/E^(r^2/4) - (4*r^3)/E^(r^2/4)))/
                  r^5 - (3*(16/E^(r^2/4) - (16*r^2)/E^(r^2/4) + 8*r^2*
                     (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^4 + 
                 ((-40*r)/E^(r^2/4) + (8*r^3)/E^(r^2/4) + 16*r*
                    (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 8*r^2*
                    (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/
                         (4*E^(r^2/4))))/2))/r^3)*(1 + 3*Cos[2*theta])*
                (-1 + 3.0000000000000004*^-8*(24/(E^(r^2/4)*r^3) - 
                   (3*((16*r)/E^(r^2/4) - (4*r^3)/E^(r^2/4)))/r^4 + 
                   (16/E^(r^2/4) - (16*r^2)/E^(r^2/4) + 8*r^2*
                      (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/r^3) - 
                 7.500000000000001*^-9*(168/(E^(r^2/4)*r^3) - 
                   (21*((16*r)/E^(r^2/4) - (4*r^3)/E^(r^2/4)))/r^4 + 
                   (9*(16/E^(r^2/4) - (16*r^2)/E^(r^2/4) + 8*r^2*
                       (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 - 
                   (2*((-40*r)/E^(r^2/4) + (8*r^3)/E^(r^2/4) + 16*r*
                       (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 8*r^2*
                       (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/
                          (4*E^(r^2/4))))/2)))/r^2 + (-32/E^(r^2/4) + 
                     (32*r^2)/E^(r^2/4) + 32*(-1/2*1/E^(r^2/4) + r^2/
                        (4*E^(r^2/4))) - 16*r^2*(-1/2*1/E^(r^2/4) + 
                       r^2/(4*E^(r^2/4))) + 32*r*(r/(2*E^(r^2/4)) - 
                       (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 
                     8*r^2*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - 
                       (r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/
                          (4*E^(r^2/4))))/2))/2))/r)*Sin[theta]^2))/2) + 
            (3*((3*((16*r)/E^(r^2/4) - (4*r^3)/E^(r^2/4)))/r^5 - 
                (3*(16/E^(r^2/4) - (16*r^2)/E^(r^2/4) + 8*r^2*
                    (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^4 + 
                ((-40*r)/E^(r^2/4) + (8*r^3)/E^(r^2/4) + 16*r*
                   (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 8*r^2*
                   (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/
                        (4*E^(r^2/4))))/2))/r^3)*(1 - 3.0000000000000004*^-8*
                 (24/(E^(r^2/4)*r^3) - (3*((16*r)/E^(r^2/4) - (4*r^3)/
                      E^(r^2/4)))/r^4 + (16/E^(r^2/4) - (16*r^2)/E^(r^2/4) + 
                    8*r^2*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/r^3) + 
                ((168/(E^(r^2/4)*r^3) - (21*((16*r)/E^(r^2/4) - (4*r^3)/
                       E^(r^2/4)))/r^4 + (9*(16/E^(r^2/4) - (16*r^2)/
                       E^(r^2/4) + 8*r^2*(-1/2*1/E^(r^2/4) + r^2/
                         (4*E^(r^2/4)))))/r^3 - (2*((-40*r)/E^(r^2/4) + 
                      (8*r^3)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + 
                        r^2/(4*E^(r^2/4))) + 8*r^2*(r/(2*E^(r^2/4)) - 
                        (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2)))/r^2 + 
                   (-32/E^(r^2/4) + (32*r^2)/E^(r^2/4) + 32*(-1/2*
                        1/E^(r^2/4) + r^2/(4*E^(r^2/4))) - 16*r^2*
                      (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*r*
                      (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/
                          (4*E^(r^2/4))))/2) + 8*r^2*(3/(4*E^(r^2/4)) - 
                       (3*r^2)/(8*E^(r^2/4)) - (r*(r/(2*E^(r^2/4)) - 
                          (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2))/2))/
                    r)*(1.*^-8 - 3.0000000000000004*^-8*Cos[2*theta]))/4) + 
              3.0000000000000004*^-8*(-48/(E^(r^2/4)*r^3) + 
                (6*((16*r)/E^(r^2/4) - (4*r^3)/E^(r^2/4)))/r^4 - 
                (3*(16/E^(r^2/4) - (16*r^2)/E^(r^2/4) + 8*r^2*
                    (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + 
                ((-40*r)/E^(r^2/4) + (8*r^3)/E^(r^2/4) + 16*r*
                   (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 8*r^2*
                   (r/(2*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) - 
                   (4*r^3)/E^(r^2/4)))/r^5 + (6*(16/E^(r^2/4) - (16*r^2)/
                    E^(r^2/4) + 8*r^2*(-1/2*1/E^(r^2/4) + r^2/
                      (4*E^(r^2/4)))))/r^4 - (3*((-40*r)/E^(r^2/4) + 
                   (8*r^3)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + 
                     r^2/(4*E^(r^2/4))) + 8*r^2*(r/(2*E^(r^2/4)) - 
                     (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2)))/r^3 + 
                (-32/E^(r^2/4) + (32*r^2)/E^(r^2/4) + 32*(-1/2*1/E^(r^2/4) + 
                    r^2/(4*E^(r^2/4))) - 16*r^2*(-1/2*1/E^(r^2/4) + 
                    r^2/(4*E^(r^2/4))) + 32*r*(r/(2*E^(r^2/4)) - 
                    (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 
                  8*r^2*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - 
                    (r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/
                          (4*E^(r^2/4))))/2))/2))/r^2)*Cos[2*theta])*
             (-8 + 3.6*^-15*(24/(E^(r^2/4)*r^3) - (3*((16*r)/E^(r^2/4) - 
                    (4*r^3)/E^(r^2/4)))/r^4 + (16/E^(r^2/4) - (16*r^2)/
                    E^(r^2/4) + 8*r^2*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/
                  r^3)^2*(1 + 3*Cos[2*theta]) - 6.000000000000001*^-8*(
                168/(E^(r^2/4)*r^3) - (21*((16*r)/E^(r^2/4) - (4*r^3)/
                    E^(r^2/4)))/r^4 + (9*(16/E^(r^2/4) - (16*r^2)/E^(r^2/4) + 
                   8*r^2*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 - 
                (2*((-40*r)/E^(r^2/4) + (8*r^3)/E^(r^2/4) + 16*r*
                    (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 8*r^2*
                    (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/
                         (4*E^(r^2/4))))/2)))/r^2 + (-32/E^(r^2/4) + 
                  (32*r^2)/E^(r^2/4) + 32*(-1/2*1/E^(r^2/4) + r^2/
                     (4*E^(r^2/4))) - 16*r^2*(-1/2*1/E^(r^2/4) + 
                    r^2/(4*E^(r^2/4))) + 32*r*(r/(2*E^(r^2/4)) - 
                    (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 
                  8*r^2*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - 
                    (r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/
                          (4*E^(r^2/4))))/2))/2))/r)*Sin[theta]^2 + 
              3.0000000000000004*^-8*(24/(E^(r^2/4)*r^3) - 
                (3*((16*r)/E^(r^2/4) - (4*r^3)/E^(r^2/4)))/r^4 + 
                (16/E^(r^2/4) - (16*r^2)/E^(r^2/4) + 8*r^2*
                   (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/r^3)*(4 - 
                12*Cos[2*theta] - 3.0000000000000004*^-8*(168/(E^(r^2/4)*
                    r^3) - (21*((16*r)/E^(r^2/4) - (4*r^3)/E^(r^2/4)))/r^4 + 
                  (9*(16/E^(r^2/4) - (16*r^2)/E^(r^2/4) + 8*r^2*
                      (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 - 
                  (2*((-40*r)/E^(r^2/4) + (8*r^3)/E^(r^2/4) + 16*r*
                      (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 8*r^2*
                      (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/
                          (4*E^(r^2/4))))/2)))/r^2 + (-32/E^(r^2/4) + 
                    (32*r^2)/E^(r^2/4) + 32*(-1/2*1/E^(r^2/4) + r^2/
                       (4*E^(r^2/4))) - 16*r^2*(-1/2*1/E^(r^2/4) + 
                      r^2/(4*E^(r^2/4))) + 32*r*(r/(2*E^(r^2/4)) - 
                      (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 
                    8*r^2*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - 
                      (r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/
                          (4*E^(r^2/4))))/2))/2))/r)*(1 + 3*Cos[2*theta])*
                 Sin[theta]^2) + 1.8*^-15*(-48/(E^(r^2/4)*r^3) + 
                 (6*((16*r)/E^(r^2/4) - (4*r^3)/E^(r^2/4)))/r^4 - 
                 (3*(16/E^(r^2/4) - (16*r^2)/E^(r^2/4) + 8*r^2*
                     (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + 
                 ((-40*r)/E^(r^2/4) + (8*r^3)/E^(r^2/4) + 16*r*
                    (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 8*r^2*
                    (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/
                         (4*E^(r^2/4))))/2))/r^2)^2*Sin[2*theta]^2)))/
          (2 - 9.*^-16*(24/(E^(r^2/4)*r^3) - (3*((16*r)/E^(r^2/4) - 
                  (4*r^3)/E^(r^2/4)))/r^4 + (16/E^(r^2/4) - (16*r^2)/
                  E^(r^2/4) + 8*r^2*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/
                r^3)^2*(1 + 3*Cos[2*theta]) + 1.5000000000000002*^-8*
             (168/(E^(r^2/4)*r^3) - (21*((16*r)/E^(r^2/4) - (4*r^3)/
                  E^(r^2/4)))/r^4 + (9*(16/E^(r^2/4) - (16*r^2)/E^(r^2/4) + 
                 8*r^2*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 - 
              (2*((-40*r)/E^(r^2/4) + (8*r^3)/E^(r^2/4) + 16*r*
                  (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 8*r^2*
                  (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/
                       (4*E^(r^2/4))))/2)))/r^2 + (-32/E^(r^2/4) + 
                (32*r^2)/E^(r^2/4) + 32*(-1/2*1/E^(r^2/4) + 
                  r^2/(4*E^(r^2/4))) - 16*r^2*(-1/2*1/E^(r^2/4) + 
                  r^2/(4*E^(r^2/4))) + 32*r*(r/(2*E^(r^2/4)) - 
                  (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 
                8*r^2*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - 
                  (r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/
                         (4*E^(r^2/4))))/2))/2))/r)*Sin[theta]^2 + 
            3.0000000000000004*^-8*(24/(E^(r^2/4)*r^3) - 
              (3*((16*r)/E^(r^2/4) - (4*r^3)/E^(r^2/4)))/r^4 + 
              (16/E^(r^2/4) - (16*r^2)/E^(r^2/4) + 8*r^2*(-1/2*1/E^(r^2/4) + 
                  r^2/(4*E^(r^2/4))))/r^3)*(-1 + 3*Cos[2*theta] + 
              7.500000000000001*^-9*(168/(E^(r^2/4)*r^3) - 
                (21*((16*r)/E^(r^2/4) - (4*r^3)/E^(r^2/4)))/r^4 + 
                (9*(16/E^(r^2/4) - (16*r^2)/E^(r^2/4) + 8*r^2*
                    (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 - 
                (2*((-40*r)/E^(r^2/4) + (8*r^3)/E^(r^2/4) + 16*r*
                    (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 8*r^2*
                    (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/
                         (4*E^(r^2/4))))/2)))/r^2 + (-32/E^(r^2/4) + 
                  (32*r^2)/E^(r^2/4) + 32*(-1/2*1/E^(r^2/4) + r^2/
                     (4*E^(r^2/4))) - 16*r^2*(-1/2*1/E^(r^2/4) + 
                    r^2/(4*E^(r^2/4))) + 32*r*(r/(2*E^(r^2/4)) - 
                    (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 
                  8*r^2*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - 
                    (r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/
                          (4*E^(r^2/4))))/2))/2))/r)*(1 + 3*Cos[2*theta])*
               Sin[theta]^2) - 4.5*^-16*(-48/(E^(r^2/4)*r^3) + 
               (6*((16*r)/E^(r^2/4) - (4*r^3)/E^(r^2/4)))/r^4 - 
               (3*(16/E^(r^2/4) - (16*r^2)/E^(r^2/4) + 8*r^2*
                   (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + 
               ((-40*r)/E^(r^2/4) + (8*r^3)/E^(r^2/4) + 16*r*
                  (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 8*r^2*
                  (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/
                       (4*E^(r^2/4))))/2))/r^2)^2*Sin[2*theta]^2)^2 - 
         (3.0000000000000004*^-8*Cos[theta]*Sin[theta]*
           (-((((-6*((16*r)/E^(r^2/4) - (4*r^3)/E^(r^2/4)))/r^5 + 
                 (6*(16/E^(r^2/4) - (16*r^2)/E^(r^2/4) + 8*r^2*
                     (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^4 - 
                 (3*((-40*r)/E^(r^2/4) + (8*r^3)/E^(r^2/4) + 16*r*
                     (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 8*r^2*
                     (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/
                          (4*E^(r^2/4))))/2)))/r^3 + (-32/E^(r^2/4) + 
                   (32*r^2)/E^(r^2/4) + 32*(-1/2*1/E^(r^2/4) + r^2/
                      (4*E^(r^2/4))) - 16*r^2*(-1/2*1/E^(r^2/4) + 
                     r^2/(4*E^(r^2/4))) + 32*r*(r/(2*E^(r^2/4)) - 
                     (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 
                   8*r^2*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - 
                     (r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/
                          (4*E^(r^2/4))))/2))/2))/r^2)*(1 - 
                 3.0000000000000004*^-8*(24/(E^(r^2/4)*r^3) - 
                   (3*((16*r)/E^(r^2/4) - (4*r^3)/E^(r^2/4)))/r^4 + 
                   (16/E^(r^2/4) - (16*r^2)/E^(r^2/4) + 8*r^2*
                      (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/r^3) + 
                 7.500000000000001*^-9*(168/(E^(r^2/4)*r^3) - 
                   (21*((16*r)/E^(r^2/4) - (4*r^3)/E^(r^2/4)))/r^4 + 
                   (9*(16/E^(r^2/4) - (16*r^2)/E^(r^2/4) + 8*r^2*
                       (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 - 
                   (2*((-40*r)/E^(r^2/4) + (8*r^3)/E^(r^2/4) + 16*r*
                       (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 8*r^2*
                       (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/
                          (4*E^(r^2/4))))/2)))/r^2 + (-32/E^(r^2/4) + 
                     (32*r^2)/E^(r^2/4) + 32*(-1/2*1/E^(r^2/4) + r^2/
                        (4*E^(r^2/4))) - 16*r^2*(-1/2*1/E^(r^2/4) + 
                       r^2/(4*E^(r^2/4))) + 32*r*(r/(2*E^(r^2/4)) - 
                       (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 
                     8*r^2*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - 
                       (r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/
                          (4*E^(r^2/4))))/2))/2))/r)*Sin[theta]^2) + 1.*^-8*
                (-48/(E^(r^2/4)*r^3) + (6*((16*r)/E^(r^2/4) - (4*r^3)/
                     E^(r^2/4)))/r^4 - (3*(16/E^(r^2/4) - (16*r^2)/
                     E^(r^2/4) + 8*r^2*(-1/2*1/E^(r^2/4) + r^2/
                       (4*E^(r^2/4)))))/r^3 + ((-40*r)/E^(r^2/4) + 
                   (8*r^3)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + 
                     r^2/(4*E^(r^2/4))) + 8*r^2*(r/(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) - (4*r^3)/E^(r^2/4)))/r^5 - 
                   (3*(16/E^(r^2/4) - (16*r^2)/E^(r^2/4) + 8*r^2*
                       (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^4 + 
                   ((-40*r)/E^(r^2/4) + (8*r^3)/E^(r^2/4) + 16*r*
                      (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 8*r^2*
                      (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/
                          (4*E^(r^2/4))))/2))/r^3) - 
                 (3*((21*((16*r)/E^(r^2/4) - (4*r^3)/E^(r^2/4)))/r^5 - 
                    (21*(16/E^(r^2/4) - (16*r^2)/E^(r^2/4) + 8*r^2*
                        (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^4 + 
                    (9*((-40*r)/E^(r^2/4) + (8*r^3)/E^(r^2/4) + 16*r*
                        (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 8*r^2*
                        (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/
                          (4*E^(r^2/4))))/2)))/r^3 - (2*(-32/E^(r^2/4) + 
                       (32*r^2)/E^(r^2/4) + 32*(-1/2*1/E^(r^2/4) + 
                         r^2/(4*E^(r^2/4))) - 16*r^2*(-1/2*1/E^(r^2/4) + 
                         r^2/(4*E^(r^2/4))) + 32*r*(r/(2*E^(r^2/4)) - 
                         (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 
                       8*r^2*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - 
                         (r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/
                          (4*E^(r^2/4))))/2))/2)))/r^2 + ((80*r)/E^(r^2/4) - 
                      (16*r^3)/E^(r^2/4) - 32*r*(-1/2*1/E^(r^2/4) + 
                        r^2/(4*E^(r^2/4))) + 64*(r/(2*E^(r^2/4)) - 
                        (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) - 
                      16*r^2*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + 
                          r^2/(4*E^(r^2/4))))/2) + 32*r*(1/(2*E^(r^2/4)) - 
                        r^2/(4*E^(r^2/4)) + (1/(2*E^(r^2/4)) - r^2/
                          (4*E^(r^2/4)))/2 - (r*((3*r)/(4*E^(r^2/4)) - 
                          r^3/(8*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - 
                        (3*r^2)/(8*E^(r^2/4)) - (r*(r/(2*E^(r^2/4)) - 
                          (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2))/2) + 
                      8*r^2*(-1/4*r/E^(r^2/4) + (r*(-1/2*1/E^(r^2/4) + 
                          r^2/(4*E^(r^2/4))))/4 + (3*(-1/2*r/E^(r^2/4) + 
                          (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2))/2 - 
                        (r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - 
                          (r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + 
                          r^2/(4*E^(r^2/4))))/2))/2))/2))/r)*Sin[theta]^2)/
                  4))*(2 - 9.*^-16*(24/(E^(r^2/4)*r^3) - 
                  (3*((16*r)/E^(r^2/4) - (4*r^3)/E^(r^2/4)))/r^4 + 
                  (16/E^(r^2/4) - (16*r^2)/E^(r^2/4) + 8*r^2*
                     (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/r^3)^2*
                (1 + 3*Cos[2*theta]) + 1.5000000000000002*^-8*
                (168/(E^(r^2/4)*r^3) - (21*((16*r)/E^(r^2/4) - (4*r^3)/
                     E^(r^2/4)))/r^4 + (9*(16/E^(r^2/4) - (16*r^2)/
                     E^(r^2/4) + 8*r^2*(-1/2*1/E^(r^2/4) + r^2/
                       (4*E^(r^2/4)))))/r^3 - (2*((-40*r)/E^(r^2/4) + 
                    (8*r^3)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + 
                      r^2/(4*E^(r^2/4))) + 8*r^2*(r/(2*E^(r^2/4)) - 
                      (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2)))/r^2 + 
                 (-32/E^(r^2/4) + (32*r^2)/E^(r^2/4) + 32*(-1/2*1/E^(r^2/4) + 
                     r^2/(4*E^(r^2/4))) - 16*r^2*(-1/2*1/E^(r^2/4) + 
                     r^2/(4*E^(r^2/4))) + 32*r*(r/(2*E^(r^2/4)) - 
                     (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 
                   8*r^2*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - 
                     (r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/
                          (4*E^(r^2/4))))/2))/2))/r)*Sin[theta]^2 + 
               3.0000000000000004*^-8*(24/(E^(r^2/4)*r^3) - 
                 (3*((16*r)/E^(r^2/4) - (4*r^3)/E^(r^2/4)))/r^4 + 
                 (16/E^(r^2/4) - (16*r^2)/E^(r^2/4) + 8*r^2*
                    (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/r^3)*
                (-1 + 3*Cos[2*theta] + 7.500000000000001*^-9*
                  (168/(E^(r^2/4)*r^3) - (21*((16*r)/E^(r^2/4) - (4*r^3)/
                       E^(r^2/4)))/r^4 + (9*(16/E^(r^2/4) - (16*r^2)/
                       E^(r^2/4) + 8*r^2*(-1/2*1/E^(r^2/4) + r^2/
                         (4*E^(r^2/4)))))/r^3 - (2*((-40*r)/E^(r^2/4) + 
                      (8*r^3)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + 
                        r^2/(4*E^(r^2/4))) + 8*r^2*(r/(2*E^(r^2/4)) - 
                        (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2)))/r^2 + 
                   (-32/E^(r^2/4) + (32*r^2)/E^(r^2/4) + 32*(-1/2*
                        1/E^(r^2/4) + r^2/(4*E^(r^2/4))) - 16*r^2*
                      (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*r*
                      (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/
                          (4*E^(r^2/4))))/2) + 8*r^2*(3/(4*E^(r^2/4)) - 
                       (3*r^2)/(8*E^(r^2/4)) - (r*(r/(2*E^(r^2/4)) - 
                          (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2))/2))/
                    r)*(1 + 3*Cos[2*theta])*Sin[theta]^2) - 4.5*^-16*
                (-48/(E^(r^2/4)*r^3) + (6*((16*r)/E^(r^2/4) - (4*r^3)/
                      E^(r^2/4)))/r^4 - (3*(16/E^(r^2/4) - (16*r^2)/
                      E^(r^2/4) + 8*r^2*(-1/2*1/E^(r^2/4) + r^2/
                        (4*E^(r^2/4)))))/r^3 + ((-40*r)/E^(r^2/4) + 
                    (8*r^3)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + 
                      r^2/(4*E^(r^2/4))) + 8*r^2*(r/(2*E^(r^2/4)) - 
                      (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2))/r^2)^2*
                Sin[2*theta]^2)) - r*(((30*((16*r)/E^(r^2/4) - (4*r^3)/
                    E^(r^2/4)))/r^6 - (30*(16/E^(r^2/4) - (16*r^2)/
                    E^(r^2/4) + 8*r^2*(-1/2*1/E^(r^2/4) + r^2/
                      (4*E^(r^2/4)))))/r^5 + (15*((-40*r)/E^(r^2/4) + 
                   (8*r^3)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + 
                     r^2/(4*E^(r^2/4))) + 8*r^2*(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*(-32/E^(r^2/4) + (32*r^2)/E^(r^2/4) + 
                   32*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) - 16*r^2*
                    (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*r*
                    (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/
                         (4*E^(r^2/4))))/2) + 8*r^2*(3/(4*E^(r^2/4)) - 
                     (3*r^2)/(8*E^(r^2/4)) - (r*(r/(2*E^(r^2/4)) - 
                        (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2))/2)))/
                 r^3 + ((80*r)/E^(r^2/4) - (16*r^3)/E^(r^2/4) - 
                  32*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 
                  64*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/
                        (4*E^(r^2/4))))/2) - 16*r^2*(r/(2*E^(r^2/4)) - 
                    (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 
                  32*r*(1/(2*E^(r^2/4)) - r^2/(4*E^(r^2/4)) + 
                    (1/(2*E^(r^2/4)) - r^2/(4*E^(r^2/4)))/2 - 
                    (r*((3*r)/(4*E^(r^2/4)) - r^3/(8*E^(r^2/4))))/2) + 
                  16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - 
                    (r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/
                          (4*E^(r^2/4))))/2))/2) + 8*r^2*(-1/4*r/E^(r^2/4) + 
                    (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/4 + 
                    (3*(-1/2*r/E^(r^2/4) + (r*(-1/2*1/E^(r^2/4) + r^2/
                          (4*E^(r^2/4))))/2))/2 - (r*(3/(4*E^(r^2/4)) - 
                       (3*r^2)/(8*E^(r^2/4)) - (r*(r/(2*E^(r^2/4)) - 
                          (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2))/2))/
                     2))/r^2)*(1 - 3.0000000000000004*^-8*
                 (24/(E^(r^2/4)*r^3) - (3*((16*r)/E^(r^2/4) - (4*r^3)/
                      E^(r^2/4)))/r^4 + (16/E^(r^2/4) - (16*r^2)/E^(r^2/4) + 
                    8*r^2*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/r^3) + 
                7.500000000000001*^-9*(168/(E^(r^2/4)*r^3) - 
                  (21*((16*r)/E^(r^2/4) - (4*r^3)/E^(r^2/4)))/r^4 + 
                  (9*(16/E^(r^2/4) - (16*r^2)/E^(r^2/4) + 8*r^2*
                      (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 - 
                  (2*((-40*r)/E^(r^2/4) + (8*r^3)/E^(r^2/4) + 16*r*
                      (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 8*r^2*
                      (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/
                          (4*E^(r^2/4))))/2)))/r^2 + (-32/E^(r^2/4) + 
                    (32*r^2)/E^(r^2/4) + 32*(-1/2*1/E^(r^2/4) + r^2/
                       (4*E^(r^2/4))) - 16*r^2*(-1/2*1/E^(r^2/4) + 
                      r^2/(4*E^(r^2/4))) + 32*r*(r/(2*E^(r^2/4)) - 
                      (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 
                    8*r^2*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - 
                      (r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/
                          (4*E^(r^2/4))))/2))/2))/r)*Sin[theta]^2) - 
              1.*^-8*((-6*((16*r)/E^(r^2/4) - (4*r^3)/E^(r^2/4)))/r^5 + 
                (6*(16/E^(r^2/4) - (16*r^2)/E^(r^2/4) + 8*r^2*
                    (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^4 - 
                (3*((-40*r)/E^(r^2/4) + (8*r^3)/E^(r^2/4) + 16*r*
                    (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 8*r^2*
                    (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/
                         (4*E^(r^2/4))))/2)))/r^3 + (-32/E^(r^2/4) + 
                  (32*r^2)/E^(r^2/4) + 32*(-1/2*1/E^(r^2/4) + r^2/
                     (4*E^(r^2/4))) - 16*r^2*(-1/2*1/E^(r^2/4) + 
                    r^2/(4*E^(r^2/4))) + 32*r*(r/(2*E^(r^2/4)) - 
                    (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 
                  8*r^2*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - 
                    (r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/
                          (4*E^(r^2/4))))/2))/2))/r^2)*(
                3*(-120/(E^(r^2/4)*r^4) + (15*((16*r)/E^(r^2/4) - (4*r^3)/
                      E^(r^2/4)))/r^5 - (6*(16/E^(r^2/4) - (16*r^2)/
                      E^(r^2/4) + 8*r^2*(-1/2*1/E^(r^2/4) + r^2/
                        (4*E^(r^2/4)))))/r^4 + ((-40*r)/E^(r^2/4) + 
                    (8*r^3)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + 
                      r^2/(4*E^(r^2/4))) + 8*r^2*(r/(2*E^(r^2/4)) - 
                      (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2))/r^3) - 
                (3*(-840/(E^(r^2/4)*r^4) + (105*((16*r)/E^(r^2/4) - (4*r^3)/
                       E^(r^2/4)))/r^5 - (48*(16/E^(r^2/4) - (16*r^2)/
                       E^(r^2/4) + 8*r^2*(-1/2*1/E^(r^2/4) + r^2/
                         (4*E^(r^2/4)))))/r^4 + (13*((-40*r)/E^(r^2/4) + 
                      (8*r^3)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + 
                        r^2/(4*E^(r^2/4))) + 8*r^2*(r/(2*E^(r^2/4)) - 
                        (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2)))/r^3 - 
                   (3*(-32/E^(r^2/4) + (32*r^2)/E^(r^2/4) + 32*
                       (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) - 16*r^2*
                       (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*r*
                       (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/
                          (4*E^(r^2/4))))/2) + 8*r^2*(3/(4*E^(r^2/4)) - 
                        (3*r^2)/(8*E^(r^2/4)) - (r*(r/(2*E^(r^2/4)) - 
                          (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2))/2)))/
                    r^2 + ((80*r)/E^(r^2/4) - (16*r^3)/E^(r^2/4) - 
                     32*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 
                     64*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/
                          (4*E^(r^2/4))))/2) - 16*r^2*(r/(2*E^(r^2/4)) - 
                       (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 
                     32*r*(1/(2*E^(r^2/4)) - r^2/(4*E^(r^2/4)) + 
                       (1/(2*E^(r^2/4)) - r^2/(4*E^(r^2/4)))/2 - 
                       (r*((3*r)/(4*E^(r^2/4)) - r^3/(8*E^(r^2/4))))/2) + 
                     16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - 
                       (r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/
                          (4*E^(r^2/4))))/2))/2) + 8*r^2*(-1/4*r/E^(r^2/4) + 
                       (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/4 + 
                       (3*(-1/2*r/E^(r^2/4) + (r*(-1/2*1/E^(r^2/4) + r^2/
                          (4*E^(r^2/4))))/2))/2 - (r*(3/(4*E^(r^2/4)) - 
                          (3*r^2)/(8*E^(r^2/4)) - (r*(r/(2*E^(r^2/4)) - 
                          (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2))/2))/
                        2))/r)*Sin[theta]^2)/4) + 1.*^-8*(240/(E^(r^2/4)*
                  r^4) - (30*((16*r)/E^(r^2/4) - (4*r^3)/E^(r^2/4)))/r^5 + 
                (15*(16/E^(r^2/4) - (16*r^2)/E^(r^2/4) + 8*r^2*
                    (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^4 - 
                (5*((-40*r)/E^(r^2/4) + (8*r^3)/E^(r^2/4) + 16*r*
                    (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 8*r^2*
                    (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/
                         (4*E^(r^2/4))))/2)))/r^3 + (-32/E^(r^2/4) + 
                  (32*r^2)/E^(r^2/4) + 32*(-1/2*1/E^(r^2/4) + r^2/
                     (4*E^(r^2/4))) - 16*r^2*(-1/2*1/E^(r^2/4) + 
                    r^2/(4*E^(r^2/4))) + 32*r*(r/(2*E^(r^2/4)) - 
                    (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 
                  8*r^2*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - 
                    (r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/
                          (4*E^(r^2/4))))/2))/2))/r^2)*(
                3*((3*((16*r)/E^(r^2/4) - (4*r^3)/E^(r^2/4)))/r^5 - 
                  (3*(16/E^(r^2/4) - (16*r^2)/E^(r^2/4) + 8*r^2*
                      (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^4 + 
                  ((-40*r)/E^(r^2/4) + (8*r^3)/E^(r^2/4) + 16*r*
                     (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 8*r^2*
                     (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/
                          (4*E^(r^2/4))))/2))/r^3) - 
                (3*((21*((16*r)/E^(r^2/4) - (4*r^3)/E^(r^2/4)))/r^5 - 
                   (21*(16/E^(r^2/4) - (16*r^2)/E^(r^2/4) + 8*r^2*
                       (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^4 + 
                   (9*((-40*r)/E^(r^2/4) + (8*r^3)/E^(r^2/4) + 16*r*
                       (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 8*r^2*
                       (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/
                          (4*E^(r^2/4))))/2)))/r^3 - (2*(-32/E^(r^2/4) + 
                      (32*r^2)/E^(r^2/4) + 32*(-1/2*1/E^(r^2/4) + r^2/
                         (4*E^(r^2/4))) - 16*r^2*(-1/2*1/E^(r^2/4) + 
                        r^2/(4*E^(r^2/4))) + 32*r*(r/(2*E^(r^2/4)) - 
                        (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 
                      8*r^2*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - 
                        (r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/
                          (4*E^(r^2/4))))/2))/2)))/r^2 + ((80*r)/E^(r^2/4) - 
                     (16*r^3)/E^(r^2/4) - 32*r*(-1/2*1/E^(r^2/4) + 
                       r^2/(4*E^(r^2/4))) + 64*(r/(2*E^(r^2/4)) - 
                       (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) - 
                     16*r^2*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + 
                          r^2/(4*E^(r^2/4))))/2) + 32*r*(1/(2*E^(r^2/4)) - 
                       r^2/(4*E^(r^2/4)) + (1/(2*E^(r^2/4)) - r^2/
                          (4*E^(r^2/4)))/2 - (r*((3*r)/(4*E^(r^2/4)) - 
                          r^3/(8*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - 
                       (3*r^2)/(8*E^(r^2/4)) - (r*(r/(2*E^(r^2/4)) - 
                          (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2))/2) + 
                     8*r^2*(-1/4*r/E^(r^2/4) + (r*(-1/2*1/E^(r^2/4) + 
                          r^2/(4*E^(r^2/4))))/4 + (3*(-1/2*r/E^(r^2/4) + 
                          (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2))/2 - 
                       (r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - 
                          (r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + 
                          r^2/(4*E^(r^2/4))))/2))/2))/2))/r)*Sin[theta]^2)/
                 4) + 1.*^-8*(-48/(E^(r^2/4)*r^3) + (6*((16*r)/E^(r^2/4) - 
                   (4*r^3)/E^(r^2/4)))/r^4 - (3*(16/E^(r^2/4) - (16*r^2)/
                    E^(r^2/4) + 8*r^2*(-1/2*1/E^(r^2/4) + r^2/
                      (4*E^(r^2/4)))))/r^3 + ((-40*r)/E^(r^2/4) + 
                  (8*r^3)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + 
                    r^2/(4*E^(r^2/4))) + 8*r^2*(r/(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*r)/E^(r^2/4) - (4*r^3)/E^(r^2/4)))/r^6 + 
                  (15*(16/E^(r^2/4) - (16*r^2)/E^(r^2/4) + 8*r^2*
                      (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^5 - 
                  (6*((-40*r)/E^(r^2/4) + (8*r^3)/E^(r^2/4) + 16*r*
                      (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 8*r^2*
                      (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/
                          (4*E^(r^2/4))))/2)))/r^4 + (-32/E^(r^2/4) + 
                    (32*r^2)/E^(r^2/4) + 32*(-1/2*1/E^(r^2/4) + r^2/
                       (4*E^(r^2/4))) - 16*r^2*(-1/2*1/E^(r^2/4) + 
                      r^2/(4*E^(r^2/4))) + 32*r*(r/(2*E^(r^2/4)) - 
                      (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 
                    8*r^2*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - 
                      (r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/
                          (4*E^(r^2/4))))/2))/2))/r^3) - 
                (3*((-105*((16*r)/E^(r^2/4) - (4*r^3)/E^(r^2/4)))/r^6 + 
                   (105*(16/E^(r^2/4) - (16*r^2)/E^(r^2/4) + 8*r^2*
                       (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^5 - 
                   (48*((-40*r)/E^(r^2/4) + (8*r^3)/E^(r^2/4) + 16*r*
                       (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 8*r^2*
                       (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*(-32/E^(r^2/4) + 
                      (32*r^2)/E^(r^2/4) + 32*(-1/2*1/E^(r^2/4) + r^2/
                         (4*E^(r^2/4))) - 16*r^2*(-1/2*1/E^(r^2/4) + 
                        r^2/(4*E^(r^2/4))) + 32*r*(r/(2*E^(r^2/4)) - 
                        (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 
                      8*r^2*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - 
                        (r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/
                          (4*E^(r^2/4))))/2))/2)))/r^3 - 
                   (3*((80*r)/E^(r^2/4) - (16*r^3)/E^(r^2/4) - 32*r*
                       (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 
                      64*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/
                          (4*E^(r^2/4))))/2) - 16*r^2*(r/(2*E^(r^2/4)) - 
                        (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 
                      32*r*(1/(2*E^(r^2/4)) - r^2/(4*E^(r^2/4)) + 
                        (1/(2*E^(r^2/4)) - r^2/(4*E^(r^2/4)))/2 - 
                        (r*((3*r)/(4*E^(r^2/4)) - r^3/(8*E^(r^2/4))))/2) + 
                      16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - 
                        (r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/
                          (4*E^(r^2/4))))/2))/2) + 8*r^2*(-1/4*r/E^(r^2/4) + 
                        (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/4 + 
                        (3*(-1/2*r/E^(r^2/4) + (r*(-1/2*1/E^(r^2/4) + 
                          r^2/(4*E^(r^2/4))))/2))/2 - (r*(3/(4*E^(r^2/4)) - 
                          (3*r^2)/(8*E^(r^2/4)) - (r*(r/(2*E^(r^2/4)) - 
                          (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2))/2))/
                         2)))/r^2 + (64/E^(r^2/4) - (64*r^2)/E^(r^2/4) - 
                     64*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*r^2*
                      (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) - 64*r*
                      (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/
                          (4*E^(r^2/4))))/2) + 64*(1/(2*E^(r^2/4)) - 
                       r^2/(4*E^(r^2/4)) + (1/(2*E^(r^2/4)) - r^2/
                          (4*E^(r^2/4)))/2 - (r*((3*r)/(4*E^(r^2/4)) - 
                          r^3/(8*E^(r^2/4))))/2) + 48*(3/(4*E^(r^2/4)) - 
                       (3*r^2)/(8*E^(r^2/4)) - (r*(r/(2*E^(r^2/4)) - 
                          (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2))/2) - 
                     16*r^2*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - 
                       (r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/
                          (4*E^(r^2/4))))/2))/2) + 32*r*((-5*r)/
                        (4*E^(r^2/4)) + r^3/(8*E^(r^2/4)) + 
                       (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2 - 
                       (r*(3/(4*E^(r^2/4)) - (5*r^2)/(8*E^(r^2/4)) + 
                          (r^2*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/4))/
                        2) + 32*r*(-1/4*r/E^(r^2/4) + (r*(-1/2*1/E^(r^2/4) + 
                          r^2/(4*E^(r^2/4))))/4 + (3*(-1/2*r/E^(r^2/4) + 
                          (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2))/2 - 
                       (r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - 
                          (r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + 
                          r^2/(4*E^(r^2/4))))/2))/2))/2) + 8*r^2*
                      (-1/8*1/E^(r^2/4) + r^2/(16*E^(r^2/4)) + 
                       (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))/2 + 
                       (r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/
                          (4*E^(r^2/4))))/2))/4 + 2*(-3/(4*E^(r^2/4)) + 
                         (3*r^2)/(8*E^(r^2/4)) + (r*(r/(2*E^(r^2/4)) - 
                          (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2))/2) - 
                       (r*(-1/4*r/E^(r^2/4) + (r*(-1/2*1/E^(r^2/4) + r^2/
                          (4*E^(r^2/4))))/4 + (3*(-1/2*r/E^(r^2/4) + 
                          (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2))/2 - 
                          (r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - 
                          (r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/
                          (4*E^(r^2/4))))/2))/2))/2))/2))/r)*Sin[theta]^2)/
                 4))*(2 - 9.*^-16*(24/(E^(r^2/4)*r^3) - 
                 (3*((16*r)/E^(r^2/4) - (4*r^3)/E^(r^2/4)))/r^4 + 
                 (16/E^(r^2/4) - (16*r^2)/E^(r^2/4) + 8*r^2*
                    (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/r^3)^2*(1 + 
                3*Cos[2*theta]) + 1.5000000000000002*^-8*(168/(E^(r^2/4)*
                  r^3) - (21*((16*r)/E^(r^2/4) - (4*r^3)/E^(r^2/4)))/r^4 + 
                (9*(16/E^(r^2/4) - (16*r^2)/E^(r^2/4) + 8*r^2*
                    (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 - 
                (2*((-40*r)/E^(r^2/4) + (8*r^3)/E^(r^2/4) + 16*r*
                    (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 8*r^2*
                    (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/
                         (4*E^(r^2/4))))/2)))/r^2 + (-32/E^(r^2/4) + 
                  (32*r^2)/E^(r^2/4) + 32*(-1/2*1/E^(r^2/4) + r^2/
                     (4*E^(r^2/4))) - 16*r^2*(-1/2*1/E^(r^2/4) + 
                    r^2/(4*E^(r^2/4))) + 32*r*(r/(2*E^(r^2/4)) - 
                    (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 
                  8*r^2*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - 
                    (r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/
                          (4*E^(r^2/4))))/2))/2))/r)*Sin[theta]^2 + 
              3.0000000000000004*^-8*(24/(E^(r^2/4)*r^3) - 
                (3*((16*r)/E^(r^2/4) - (4*r^3)/E^(r^2/4)))/r^4 + 
                (16/E^(r^2/4) - (16*r^2)/E^(r^2/4) + 8*r^2*
                   (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/r^3)*(-1 + 
                3*Cos[2*theta] + 7.500000000000001*^-9*(168/(E^(r^2/4)*r^3) - 
                  (21*((16*r)/E^(r^2/4) - (4*r^3)/E^(r^2/4)))/r^4 + 
                  (9*(16/E^(r^2/4) - (16*r^2)/E^(r^2/4) + 8*r^2*
                      (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 - 
                  (2*((-40*r)/E^(r^2/4) + (8*r^3)/E^(r^2/4) + 16*r*
                      (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 8*r^2*
                      (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/
                          (4*E^(r^2/4))))/2)))/r^2 + (-32/E^(r^2/4) + 
                    (32*r^2)/E^(r^2/4) + 32*(-1/2*1/E^(r^2/4) + r^2/
                       (4*E^(r^2/4))) - 16*r^2*(-1/2*1/E^(r^2/4) + 
                      r^2/(4*E^(r^2/4))) + 32*r*(r/(2*E^(r^2/4)) - 
                      (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 
                    8*r^2*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - 
                      (r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/
                          (4*E^(r^2/4))))/2))/2))/r)*(1 + 3*Cos[2*theta])*
                 Sin[theta]^2) - 4.5*^-16*(-48/(E^(r^2/4)*r^3) + 
                 (6*((16*r)/E^(r^2/4) - (4*r^3)/E^(r^2/4)))/r^4 - 
                 (3*(16/E^(r^2/4) - (16*r^2)/E^(r^2/4) + 8*r^2*
                     (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + 
                 ((-40*r)/E^(r^2/4) + (8*r^3)/E^(r^2/4) + 16*r*
                    (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 8*r^2*
                    (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/
                         (4*E^(r^2/4))))/2))/r^2)^2*Sin[2*theta]^2) + 
            1.*^-8*r*(((-6*((16*r)/E^(r^2/4) - (4*r^3)/E^(r^2/4)))/r^5 + 
                (6*(16/E^(r^2/4) - (16*r^2)/E^(r^2/4) + 8*r^2*
                    (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^4 - 
                (3*((-40*r)/E^(r^2/4) + (8*r^3)/E^(r^2/4) + 16*r*
                    (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 8*r^2*
                    (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/
                         (4*E^(r^2/4))))/2)))/r^3 + (-32/E^(r^2/4) + 
                  (32*r^2)/E^(r^2/4) + 32*(-1/2*1/E^(r^2/4) + r^2/
                     (4*E^(r^2/4))) - 16*r^2*(-1/2*1/E^(r^2/4) + 
                    r^2/(4*E^(r^2/4))) + 32*r*(r/(2*E^(r^2/4)) - 
                    (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 
                  8*r^2*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - 
                    (r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/
                          (4*E^(r^2/4))))/2))/2))/r^2)*(1 - 
                3.0000000000000004*^-8*(24/(E^(r^2/4)*r^3) - 
                  (3*((16*r)/E^(r^2/4) - (4*r^3)/E^(r^2/4)))/r^4 + 
                  (16/E^(r^2/4) - (16*r^2)/E^(r^2/4) + 8*r^2*
                     (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/r^3) + 
                7.500000000000001*^-9*(168/(E^(r^2/4)*r^3) - 
                  (21*((16*r)/E^(r^2/4) - (4*r^3)/E^(r^2/4)))/r^4 + 
                  (9*(16/E^(r^2/4) - (16*r^2)/E^(r^2/4) + 8*r^2*
                      (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 - 
                  (2*((-40*r)/E^(r^2/4) + (8*r^3)/E^(r^2/4) + 16*r*
                      (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 8*r^2*
                      (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/
                          (4*E^(r^2/4))))/2)))/r^2 + (-32/E^(r^2/4) + 
                    (32*r^2)/E^(r^2/4) + 32*(-1/2*1/E^(r^2/4) + r^2/
                       (4*E^(r^2/4))) - 16*r^2*(-1/2*1/E^(r^2/4) + 
                      r^2/(4*E^(r^2/4))) + 32*r*(r/(2*E^(r^2/4)) - 
                      (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 
                    8*r^2*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - 
                      (r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/
                          (4*E^(r^2/4))))/2))/2))/r)*Sin[theta]^2) + 
              1.*^-8*(-48/(E^(r^2/4)*r^3) + (6*((16*r)/E^(r^2/4) - 
                   (4*r^3)/E^(r^2/4)))/r^4 - (3*(16/E^(r^2/4) - (16*r^2)/
                    E^(r^2/4) + 8*r^2*(-1/2*1/E^(r^2/4) + r^2/
                      (4*E^(r^2/4)))))/r^3 + ((-40*r)/E^(r^2/4) + 
                  (8*r^3)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + 
                    r^2/(4*E^(r^2/4))) + 8*r^2*(r/(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) - (4*r^3)/E^(r^2/4)))/r^5 - 
                  (3*(16/E^(r^2/4) - (16*r^2)/E^(r^2/4) + 8*r^2*
                      (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^4 + 
                  ((-40*r)/E^(r^2/4) + (8*r^3)/E^(r^2/4) + 16*r*
                     (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 8*r^2*
                     (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/
                          (4*E^(r^2/4))))/2))/r^3) - 
                (3*((21*((16*r)/E^(r^2/4) - (4*r^3)/E^(r^2/4)))/r^5 - 
                   (21*(16/E^(r^2/4) - (16*r^2)/E^(r^2/4) + 8*r^2*
                       (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^4 + 
                   (9*((-40*r)/E^(r^2/4) + (8*r^3)/E^(r^2/4) + 16*r*
                       (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 8*r^2*
                       (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/
                          (4*E^(r^2/4))))/2)))/r^3 - (2*(-32/E^(r^2/4) + 
                      (32*r^2)/E^(r^2/4) + 32*(-1/2*1/E^(r^2/4) + r^2/
                         (4*E^(r^2/4))) - 16*r^2*(-1/2*1/E^(r^2/4) + 
                        r^2/(4*E^(r^2/4))) + 32*r*(r/(2*E^(r^2/4)) - 
                        (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 
                      8*r^2*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - 
                        (r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/
                          (4*E^(r^2/4))))/2))/2)))/r^2 + ((80*r)/E^(r^2/4) - 
                     (16*r^3)/E^(r^2/4) - 32*r*(-1/2*1/E^(r^2/4) + 
                       r^2/(4*E^(r^2/4))) + 64*(r/(2*E^(r^2/4)) - 
                       (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) - 
                     16*r^2*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + 
                          r^2/(4*E^(r^2/4))))/2) + 32*r*(1/(2*E^(r^2/4)) - 
                       r^2/(4*E^(r^2/4)) + (1/(2*E^(r^2/4)) - r^2/
                          (4*E^(r^2/4)))/2 - (r*((3*r)/(4*E^(r^2/4)) - 
                          r^3/(8*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - 
                       (3*r^2)/(8*E^(r^2/4)) - (r*(r/(2*E^(r^2/4)) - 
                          (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2))/2) + 
                     8*r^2*(-1/4*r/E^(r^2/4) + (r*(-1/2*1/E^(r^2/4) + 
                          r^2/(4*E^(r^2/4))))/4 + (3*(-1/2*r/E^(r^2/4) + 
                          (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2))/2 - 
                       (r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - 
                          (r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + 
                          r^2/(4*E^(r^2/4))))/2))/2))/2))/r)*Sin[theta]^2)/
                 4))*((3*(-840/(E^(r^2/4)*r^4) + (105*((16*r)/E^(r^2/4) - 
                    (4*r^3)/E^(r^2/4)))/r^5 - (48*(16/E^(r^2/4) - (16*r^2)/
                     E^(r^2/4) + 8*r^2*(-1/2*1/E^(r^2/4) + r^2/
                       (4*E^(r^2/4)))))/r^4 + (13*((-40*r)/E^(r^2/4) + 
                    (8*r^3)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + 
                      r^2/(4*E^(r^2/4))) + 8*r^2*(r/(2*E^(r^2/4)) - 
                      (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2)))/r^3 - 
                 (3*(-32/E^(r^2/4) + (32*r^2)/E^(r^2/4) + 
                    32*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) - 16*r^2*
                     (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*r*
                     (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/
                          (4*E^(r^2/4))))/2) + 8*r^2*(3/(4*E^(r^2/4)) - 
                      (3*r^2)/(8*E^(r^2/4)) - (r*(r/(2*E^(r^2/4)) - 
                         (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2))/2)))/
                  r^2 + ((80*r)/E^(r^2/4) - (16*r^3)/E^(r^2/4) - 
                   32*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 
                   64*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/
                         (4*E^(r^2/4))))/2) - 16*r^2*(r/(2*E^(r^2/4)) - 
                     (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 
                   32*r*(1/(2*E^(r^2/4)) - r^2/(4*E^(r^2/4)) + 
                     (1/(2*E^(r^2/4)) - r^2/(4*E^(r^2/4)))/2 - 
                     (r*((3*r)/(4*E^(r^2/4)) - r^3/(8*E^(r^2/4))))/2) + 
                   16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - 
                     (r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/
                          (4*E^(r^2/4))))/2))/2) + 8*r^2*(-1/4*r/E^(r^2/4) + 
                     (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/4 + 
                     (3*(-1/2*r/E^(r^2/4) + (r*(-1/2*1/E^(r^2/4) + r^2/
                          (4*E^(r^2/4))))/2))/2 - (r*(3/(4*E^(r^2/4)) - 
                        (3*r^2)/(8*E^(r^2/4)) - (r*(r/(2*E^(r^2/4)) - 
                          (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2))/2))/
                      2))/r)*(2 + 3.0000000000000004*^-8*(24/(E^(r^2/4)*
                     r^3) - (3*((16*r)/E^(r^2/4) - (4*r^3)/E^(r^2/4)))/r^4 + 
                   (16/E^(r^2/4) - (16*r^2)/E^(r^2/4) + 8*r^2*
                      (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/r^3)*
                  (1 + 3*Cos[2*theta]))*Sin[theta]^2)/4 + 
              3*(-120/(E^(r^2/4)*r^4) + (15*((16*r)/E^(r^2/4) - (4*r^3)/
                    E^(r^2/4)))/r^5 - (6*(16/E^(r^2/4) - (16*r^2)/E^(r^2/4) + 
                   8*r^2*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^4 + 
                ((-40*r)/E^(r^2/4) + (8*r^3)/E^(r^2/4) + 16*r*
                   (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 8*r^2*
                   (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/
                        (4*E^(r^2/4))))/2))/r^3)*(-1 + 3*Cos[2*theta] - 
                6.000000000000001*^-8*(24/(E^(r^2/4)*r^3) - 
                  (3*((16*r)/E^(r^2/4) - (4*r^3)/E^(r^2/4)))/r^4 + 
                  (16/E^(r^2/4) - (16*r^2)/E^(r^2/4) + 8*r^2*
                     (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/r^3)*
                 (1 + 3*Cos[2*theta]) + 7.500000000000001*^-9*
                 (168/(E^(r^2/4)*r^3) - (21*((16*r)/E^(r^2/4) - (4*r^3)/
                      E^(r^2/4)))/r^4 + (9*(16/E^(r^2/4) - (16*r^2)/
                      E^(r^2/4) + 8*r^2*(-1/2*1/E^(r^2/4) + r^2/
                        (4*E^(r^2/4)))))/r^3 - (2*((-40*r)/E^(r^2/4) + 
                     (8*r^3)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + 
                       r^2/(4*E^(r^2/4))) + 8*r^2*(r/(2*E^(r^2/4)) - 
                       (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2)))/r^2 + 
                  (-32/E^(r^2/4) + (32*r^2)/E^(r^2/4) + 32*
                     (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) - 16*r^2*
                     (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*r*
                     (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/
                          (4*E^(r^2/4))))/2) + 8*r^2*(3/(4*E^(r^2/4)) - 
                      (3*r^2)/(8*E^(r^2/4)) - (r*(r/(2*E^(r^2/4)) - 
                         (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2))/2))/
                   r)*(1 + 3*Cos[2*theta])*Sin[theta]^2) - 
              9.*^-8*(-48/(E^(r^2/4)*r^3) + (6*((16*r)/E^(r^2/4) - 
                   (4*r^3)/E^(r^2/4)))/r^4 - (3*(16/E^(r^2/4) - (16*r^2)/
                    E^(r^2/4) + 8*r^2*(-1/2*1/E^(r^2/4) + r^2/
                      (4*E^(r^2/4)))))/r^3 + ((-40*r)/E^(r^2/4) + 
                  (8*r^3)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + 
                    r^2/(4*E^(r^2/4))) + 8*r^2*(r/(2*E^(r^2/4)) - 
                    (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2))/r^2)*(
                240/(E^(r^2/4)*r^4) - (30*((16*r)/E^(r^2/4) - (4*r^3)/
                    E^(r^2/4)))/r^5 + (15*(16/E^(r^2/4) - (16*r^2)/
                    E^(r^2/4) + 8*r^2*(-1/2*1/E^(r^2/4) + r^2/
                      (4*E^(r^2/4)))))/r^4 - (5*((-40*r)/E^(r^2/4) + 
                   (8*r^3)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + 
                     r^2/(4*E^(r^2/4))) + 8*r^2*(r/(2*E^(r^2/4)) - 
                     (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2)))/r^3 + 
                (-32/E^(r^2/4) + (32*r^2)/E^(r^2/4) + 32*(-1/2*1/E^(r^2/4) + 
                    r^2/(4*E^(r^2/4))) - 16*r^2*(-1/2*1/E^(r^2/4) + 
                    r^2/(4*E^(r^2/4))) + 32*r*(r/(2*E^(r^2/4)) - 
                    (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 
                  8*r^2*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - 
                    (r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/
                          (4*E^(r^2/4))))/2))/2))/r^2)*Sin[2*theta]^2)))/
          (2 - 9.*^-16*(24/(E^(r^2/4)*r^3) - (3*((16*r)/E^(r^2/4) - 
                  (4*r^3)/E^(r^2/4)))/r^4 + (16/E^(r^2/4) - (16*r^2)/
                  E^(r^2/4) + 8*r^2*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/
                r^3)^2*(1 + 3*Cos[2*theta]) + 1.5000000000000002*^-8*
             (168/(E^(r^2/4)*r^3) - (21*((16*r)/E^(r^2/4) - (4*r^3)/
                  E^(r^2/4)))/r^4 + (9*(16/E^(r^2/4) - (16*r^2)/E^(r^2/4) + 
                 8*r^2*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 - 
              (2*((-40*r)/E^(r^2/4) + (8*r^3)/E^(r^2/4) + 16*r*
                  (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 8*r^2*
                  (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/
                       (4*E^(r^2/4))))/2)))/r^2 + (-32/E^(r^2/4) + 
                (32*r^2)/E^(r^2/4) + 32*(-1/2*1/E^(r^2/4) + 
                  r^2/(4*E^(r^2/4))) - 16*r^2*(-1/2*1/E^(r^2/4) + 
                  r^2/(4*E^(r^2/4))) + 32*r*(r/(2*E^(r^2/4)) - 
                  (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 
                8*r^2*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - 
                  (r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/
                         (4*E^(r^2/4))))/2))/2))/r)*Sin[theta]^2 + 
            3.0000000000000004*^-8*(24/(E^(r^2/4)*r^3) - 
              (3*((16*r)/E^(r^2/4) - (4*r^3)/E^(r^2/4)))/r^4 + 
              (16/E^(r^2/4) - (16*r^2)/E^(r^2/4) + 8*r^2*(-1/2*1/E^(r^2/4) + 
                  r^2/(4*E^(r^2/4))))/r^3)*(-1 + 3*Cos[2*theta] + 
              7.500000000000001*^-9*(168/(E^(r^2/4)*r^3) - 
                (21*((16*r)/E^(r^2/4) - (4*r^3)/E^(r^2/4)))/r^4 + 
                (9*(16/E^(r^2/4) - (16*r^2)/E^(r^2/4) + 8*r^2*
                    (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 - 
                (2*((-40*r)/E^(r^2/4) + (8*r^3)/E^(r^2/4) + 16*r*
                    (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 8*r^2*
                    (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/
                         (4*E^(r^2/4))))/2)))/r^2 + (-32/E^(r^2/4) + 
                  (32*r^2)/E^(r^2/4) + 32*(-1/2*1/E^(r^2/4) + r^2/
                     (4*E^(r^2/4))) - 16*r^2*(-1/2*1/E^(r^2/4) + 
                    r^2/(4*E^(r^2/4))) + 32*r*(r/(2*E^(r^2/4)) - 
                    (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 
                  8*r^2*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - 
                    (r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/
                          (4*E^(r^2/4))))/2))/2))/r)*(1 + 3*Cos[2*theta])*
               Sin[theta]^2) - 4.5*^-16*(-48/(E^(r^2/4)*r^3) + 
               (6*((16*r)/E^(r^2/4) - (4*r^3)/E^(r^2/4)))/r^4 - 
               (3*(16/E^(r^2/4) - (16*r^2)/E^(r^2/4) + 8*r^2*
                   (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + 
               ((-40*r)/E^(r^2/4) + (8*r^3)/E^(r^2/4) + 16*r*
                  (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 8*r^2*
                  (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/
                       (4*E^(r^2/4))))/2))/r^2)^2*Sin[2*theta]^2)^2) + 
       r^2*(1 - 3.0000000000000004*^-8*(24/(E^(r^2/4)*r^3) - 
           (3*((16*r)/E^(r^2/4) - (4*r^3)/E^(r^2/4)))/r^4 + 
           (16/E^(r^2/4) - (16*r^2)/E^(r^2/4) + 8*r^2*(-1/2*1/E^(r^2/4) + r^2/
                (4*E^(r^2/4))))/r^3) + 7.500000000000001*^-9*
          (168/(E^(r^2/4)*r^3) - (21*((16*r)/E^(r^2/4) - (4*r^3)/E^(r^2/4)))/
            r^4 + (9*(16/E^(r^2/4) - (16*r^2)/E^(r^2/4) + 
              8*r^2*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 - 
           (2*((-40*r)/E^(r^2/4) + (8*r^3)/E^(r^2/4) + 
              16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 
              8*r^2*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + 
                   r^2/(4*E^(r^2/4))))/2)))/r^2 + 
           (-32/E^(r^2/4) + (32*r^2)/E^(r^2/4) + 32*(-1/2*1/E^(r^2/4) + r^2/
                (4*E^(r^2/4))) - 16*r^2*(-1/2*1/E^(r^2/4) + r^2/
                (4*E^(r^2/4))) + 32*r*(r/(2*E^(r^2/4)) - 
               (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 
             8*r^2*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - 
               (r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/
                      (4*E^(r^2/4))))/2))/2))/r)*Sin[theta]^2)*
        ((5.*^-9*(-9.*^-8*(-48/(E^(r^2/4)*r^3) + (6*((16*r)/E^(r^2/4) - 
                 (4*r^3)/E^(r^2/4)))/r^4 - (3*(16/E^(r^2/4) - (16*r^2)/
                  E^(r^2/4) + 8*r^2*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/
               r^3 + ((-40*r)/E^(r^2/4) + (8*r^3)/E^(r^2/4) + 
                16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 
                8*r^2*(r/(2*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) - 
                 (4*r^3)/E^(r^2/4)))/r^5 + (6*(16/E^(r^2/4) - (16*r^2)/
                  E^(r^2/4) + 8*r^2*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/
               r^4 - (3*((-40*r)/E^(r^2/4) + (8*r^3)/E^(r^2/4) + 
                 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 
                 8*r^2*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + 
                      r^2/(4*E^(r^2/4))))/2)))/r^3 + (-32/E^(r^2/4) + 
                (32*r^2)/E^(r^2/4) + 32*(-1/2*1/E^(r^2/4) + 
                  r^2/(4*E^(r^2/4))) - 16*r^2*(-1/2*1/E^(r^2/4) + 
                  r^2/(4*E^(r^2/4))) + 32*r*(r/(2*E^(r^2/4)) - 
                  (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 
                8*r^2*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - 
                  (r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/
                         (4*E^(r^2/4))))/2))/2))/r^2)*Cos[theta]^2*
             Sin[theta]^2 - (3*((3*((16*r)/E^(r^2/4) - (4*r^3)/E^(r^2/4)))/
                r^5 - (3*(16/E^(r^2/4) - (16*r^2)/E^(r^2/4) + 8*r^2*
                   (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^4 + 
               ((-40*r)/E^(r^2/4) + (8*r^3)/E^(r^2/4) + 16*r*
                  (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 8*r^2*
                  (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/
                       (4*E^(r^2/4))))/2))/r^3)*(1 + 3*Cos[2*theta])*
              (-1 + 3.0000000000000004*^-8*(24/(E^(r^2/4)*r^3) - 
                 (3*((16*r)/E^(r^2/4) - (4*r^3)/E^(r^2/4)))/r^4 + 
                 (16/E^(r^2/4) - (16*r^2)/E^(r^2/4) + 8*r^2*
                    (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/r^3) - 
               7.500000000000001*^-9*(168/(E^(r^2/4)*r^3) - 
                 (21*((16*r)/E^(r^2/4) - (4*r^3)/E^(r^2/4)))/r^4 + 
                 (9*(16/E^(r^2/4) - (16*r^2)/E^(r^2/4) + 8*r^2*
                     (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 - 
                 (2*((-40*r)/E^(r^2/4) + (8*r^3)/E^(r^2/4) + 16*r*
                     (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 8*r^2*
                     (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/
                          (4*E^(r^2/4))))/2)))/r^2 + (-32/E^(r^2/4) + 
                   (32*r^2)/E^(r^2/4) + 32*(-1/2*1/E^(r^2/4) + r^2/
                      (4*E^(r^2/4))) - 16*r^2*(-1/2*1/E^(r^2/4) + 
                     r^2/(4*E^(r^2/4))) + 32*r*(r/(2*E^(r^2/4)) - 
                     (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 
                   8*r^2*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - 
                     (r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/
                          (4*E^(r^2/4))))/2))/2))/r)*Sin[theta]^2))/2)*
           (r*(2 - 6.000000000000001*^-8*(24/(E^(r^2/4)*r^3) - 
                (3*((16*r)/E^(r^2/4) - (4*r^3)/E^(r^2/4)))/r^4 + 
                (16/E^(r^2/4) - (16*r^2)/E^(r^2/4) + 8*r^2*
                   (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/r^3) - 
              3.0000000000000004*^-8*r*(-120/(E^(r^2/4)*r^4) + 
                (15*((16*r)/E^(r^2/4) - (4*r^3)/E^(r^2/4)))/r^5 - 
                (6*(16/E^(r^2/4) - (16*r^2)/E^(r^2/4) + 8*r^2*
                    (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^4 + 
                ((-40*r)/E^(r^2/4) + (8*r^3)/E^(r^2/4) + 16*r*
                   (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 8*r^2*
                   (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/
                        (4*E^(r^2/4))))/2))/r^3) + 1.5000000000000002*^-8*(
                168/(E^(r^2/4)*r^3) - (21*((16*r)/E^(r^2/4) - (4*r^3)/
                    E^(r^2/4)))/r^4 + (9*(16/E^(r^2/4) - (16*r^2)/E^(r^2/4) + 
                   8*r^2*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 - 
                (2*((-40*r)/E^(r^2/4) + (8*r^3)/E^(r^2/4) + 16*r*
                    (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 8*r^2*
                    (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/
                         (4*E^(r^2/4))))/2)))/r^2 + (-32/E^(r^2/4) + 
                  (32*r^2)/E^(r^2/4) + 32*(-1/2*1/E^(r^2/4) + r^2/
                     (4*E^(r^2/4))) - 16*r^2*(-1/2*1/E^(r^2/4) + 
                    r^2/(4*E^(r^2/4))) + 32*r*(r/(2*E^(r^2/4)) - 
                    (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 
                  8*r^2*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - 
                    (r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/
                          (4*E^(r^2/4))))/2))/2))/r)*Sin[theta]^2 + 
              7.500000000000001*^-9*r*(-840/(E^(r^2/4)*r^4) + 
                (105*((16*r)/E^(r^2/4) - (4*r^3)/E^(r^2/4)))/r^5 - 
                (48*(16/E^(r^2/4) - (16*r^2)/E^(r^2/4) + 8*r^2*
                    (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^4 + 
                (13*((-40*r)/E^(r^2/4) + (8*r^3)/E^(r^2/4) + 16*r*
                    (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 8*r^2*
                    (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/
                         (4*E^(r^2/4))))/2)))/r^3 - (3*(-32/E^(r^2/4) + 
                   (32*r^2)/E^(r^2/4) + 32*(-1/2*1/E^(r^2/4) + r^2/
                      (4*E^(r^2/4))) - 16*r^2*(-1/2*1/E^(r^2/4) + 
                     r^2/(4*E^(r^2/4))) + 32*r*(r/(2*E^(r^2/4)) - 
                     (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 
                   8*r^2*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - 
                     (r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/
                          (4*E^(r^2/4))))/2))/2)))/r^2 + ((80*r)/E^(r^2/4) - 
                  (16*r^3)/E^(r^2/4) - 32*r*(-1/2*1/E^(r^2/4) + 
                    r^2/(4*E^(r^2/4))) + 64*(r/(2*E^(r^2/4)) - 
                    (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) - 
                  16*r^2*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + 
                       r^2/(4*E^(r^2/4))))/2) + 32*r*(1/(2*E^(r^2/4)) - 
                    r^2/(4*E^(r^2/4)) + (1/(2*E^(r^2/4)) - r^2/(4*E^(r^2/4)))/
                     2 - (r*((3*r)/(4*E^(r^2/4)) - r^3/(8*E^(r^2/4))))/2) + 
                  16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - 
                    (r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/
                          (4*E^(r^2/4))))/2))/2) + 8*r^2*(-1/4*r/E^(r^2/4) + 
                    (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/4 + 
                    (3*(-1/2*r/E^(r^2/4) + (r*(-1/2*1/E^(r^2/4) + r^2/
                          (4*E^(r^2/4))))/2))/2 - (r*(3/(4*E^(r^2/4)) - 
                       (3*r^2)/(8*E^(r^2/4)) - (r*(r/(2*E^(r^2/4)) - 
                          (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2))/2))/
                     2))/r)*Sin[theta]^2)*(-1 + 3.0000000000000004*^-8*(
                24/(E^(r^2/4)*r^3) - (3*((16*r)/E^(r^2/4) - (4*r^3)/
                    E^(r^2/4)))/r^4 + (16/E^(r^2/4) - (16*r^2)/E^(r^2/4) + 
                  8*r^2*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/r^3)*(-2 + 
                3*Sin[theta]^2)) + 1.35*^-15*r*(24/(E^(r^2/4)*r^3) - 
              (3*((16*r)/E^(r^2/4) - (4*r^3)/E^(r^2/4)))/r^4 + 
              (16/E^(r^2/4) - (16*r^2)/E^(r^2/4) + 8*r^2*(-1/2*1/E^(r^2/4) + 
                  r^2/(4*E^(r^2/4))))/r^3)*(-48/(E^(r^2/4)*r^3) + 
              (6*((16*r)/E^(r^2/4) - (4*r^3)/E^(r^2/4)))/r^4 - 
              (3*(16/E^(r^2/4) - (16*r^2)/E^(r^2/4) + 8*r^2*
                  (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + 
              ((-40*r)/E^(r^2/4) + (8*r^3)/E^(r^2/4) + 16*r*
                 (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 8*r^2*
                 (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/
                      (4*E^(r^2/4))))/2))/r^2)*Sin[2*theta]^2))/
          (r^2*(9.*^-16*(-48/(E^(r^2/4)*r^3) + (6*((16*r)/E^(r^2/4) - 
                  (4*r^3)/E^(r^2/4)))/r^4 - (3*(16/E^(r^2/4) - (16*r^2)/
                   E^(r^2/4) + 8*r^2*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/
                r^3 + ((-40*r)/E^(r^2/4) + (8*r^3)/E^(r^2/4) + 
                 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 
                 8*r^2*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + 
                      r^2/(4*E^(r^2/4))))/2))/r^2)^2*Cos[theta]^2*
             Sin[theta]^2 - (1 - 3.0000000000000004*^-8*(24/(E^(r^2/4)*r^3) - 
                (3*((16*r)/E^(r^2/4) - (4*r^3)/E^(r^2/4)))/r^4 + 
                (16/E^(r^2/4) - (16*r^2)/E^(r^2/4) + 8*r^2*
                   (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/r^3) + 
              7.500000000000001*^-9*(168/(E^(r^2/4)*r^3) - 
                (21*((16*r)/E^(r^2/4) - (4*r^3)/E^(r^2/4)))/r^4 + 
                (9*(16/E^(r^2/4) - (16*r^2)/E^(r^2/4) + 8*r^2*
                    (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 - 
                (2*((-40*r)/E^(r^2/4) + (8*r^3)/E^(r^2/4) + 16*r*
                    (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 8*r^2*
                    (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/
                         (4*E^(r^2/4))))/2)))/r^2 + (-32/E^(r^2/4) + 
                  (32*r^2)/E^(r^2/4) + 32*(-1/2*1/E^(r^2/4) + r^2/
                     (4*E^(r^2/4))) - 16*r^2*(-1/2*1/E^(r^2/4) + 
                    r^2/(4*E^(r^2/4))) + 32*r*(r/(2*E^(r^2/4)) - 
                    (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 
                  8*r^2*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - 
                    (r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/
                          (4*E^(r^2/4))))/2))/2))/r)*Sin[theta]^2)*
             (1 + 3.0000000000000004*^-8*(24/(E^(r^2/4)*r^3) - 
                (3*((16*r)/E^(r^2/4) - (4*r^3)/E^(r^2/4)))/r^4 + 
                (16/E^(r^2/4) - (16*r^2)/E^(r^2/4) + 8*r^2*
                   (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/r^3)*(2 - 
                3*Sin[theta]^2)))*(2 - 9.*^-16*(24/(E^(r^2/4)*r^3) - 
               (3*((16*r)/E^(r^2/4) - (4*r^3)/E^(r^2/4)))/r^4 + 
               (16/E^(r^2/4) - (16*r^2)/E^(r^2/4) + 8*r^2*(-1/2*1/E^(r^2/4) + 
                   r^2/(4*E^(r^2/4))))/r^3)^2*(1 + 3*Cos[2*theta]) + 
            1.5000000000000002*^-8*(168/(E^(r^2/4)*r^3) - 
              (21*((16*r)/E^(r^2/4) - (4*r^3)/E^(r^2/4)))/r^4 + 
              (9*(16/E^(r^2/4) - (16*r^2)/E^(r^2/4) + 8*r^2*
                  (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 - 
              (2*((-40*r)/E^(r^2/4) + (8*r^3)/E^(r^2/4) + 16*r*
                  (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 8*r^2*
                  (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/
                       (4*E^(r^2/4))))/2)))/r^2 + (-32/E^(r^2/4) + 
                (32*r^2)/E^(r^2/4) + 32*(-1/2*1/E^(r^2/4) + 
                  r^2/(4*E^(r^2/4))) - 16*r^2*(-1/2*1/E^(r^2/4) + 
                  r^2/(4*E^(r^2/4))) + 32*r*(r/(2*E^(r^2/4)) - 
                  (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 
                8*r^2*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - 
                  (r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/
                         (4*E^(r^2/4))))/2))/2))/r)*Sin[theta]^2 + 
            3.0000000000000004*^-8*(24/(E^(r^2/4)*r^3) - 
              (3*((16*r)/E^(r^2/4) - (4*r^3)/E^(r^2/4)))/r^4 + 
              (16/E^(r^2/4) - (16*r^2)/E^(r^2/4) + 8*r^2*(-1/2*1/E^(r^2/4) + 
                  r^2/(4*E^(r^2/4))))/r^3)*(-1 + 3*Cos[2*theta] + 
              7.500000000000001*^-9*(168/(E^(r^2/4)*r^3) - 
                (21*((16*r)/E^(r^2/4) - (4*r^3)/E^(r^2/4)))/r^4 + 
                (9*(16/E^(r^2/4) - (16*r^2)/E^(r^2/4) + 8*r^2*
                    (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 - 
                (2*((-40*r)/E^(r^2/4) + (8*r^3)/E^(r^2/4) + 16*r*
                    (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 8*r^2*
                    (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/
                         (4*E^(r^2/4))))/2)))/r^2 + (-32/E^(r^2/4) + 
                  (32*r^2)/E^(r^2/4) + 32*(-1/2*1/E^(r^2/4) + r^2/
                     (4*E^(r^2/4))) - 16*r^2*(-1/2*1/E^(r^2/4) + 
                    r^2/(4*E^(r^2/4))) + 32*r*(r/(2*E^(r^2/4)) - 
                    (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 
                  8*r^2*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - 
                    (r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/
                          (4*E^(r^2/4))))/2))/2))/r)*(1 + 3*Cos[2*theta])*
               Sin[theta]^2) - 4.5*^-16*(-48/(E^(r^2/4)*r^3) + 
               (6*((16*r)/E^(r^2/4) - (4*r^3)/E^(r^2/4)))/r^4 - 
               (3*(16/E^(r^2/4) - (16*r^2)/E^(r^2/4) + 8*r^2*
                   (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + 
               ((-40*r)/E^(r^2/4) + (8*r^3)/E^(r^2/4) + 16*r*
                  (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 8*r^2*
                  (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/
                       (4*E^(r^2/4))))/2))/r^2)^2*Sin[2*theta]^2)) - 
         (5.*^-9*((3*((3*((16*r)/E^(r^2/4) - (4*r^3)/E^(r^2/4)))/r^5 - 
               (3*(16/E^(r^2/4) - (16*r^2)/E^(r^2/4) + 8*r^2*
                   (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^4 + 
               ((-40*r)/E^(r^2/4) + (8*r^3)/E^(r^2/4) + 16*r*
                  (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 8*r^2*
                  (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/
                       (4*E^(r^2/4))))/2))/r^3)*(2 + 3.0000000000000004*^-8*
                (24/(E^(r^2/4)*r^3) - (3*((16*r)/E^(r^2/4) - (4*r^3)/
                     E^(r^2/4)))/r^4 + (16/E^(r^2/4) - (16*r^2)/E^(r^2/4) + 
                   8*r^2*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/r^3)*
                (1 + 3*Cos[2*theta])))/2 + 3*Sin[theta]^2*
             (3.0000000000000004*^-8*(-48/(E^(r^2/4)*r^3) + 
                (6*((16*r)/E^(r^2/4) - (4*r^3)/E^(r^2/4)))/r^4 - 
                (3*(16/E^(r^2/4) - (16*r^2)/E^(r^2/4) + 8*r^2*
                    (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + 
                ((-40*r)/E^(r^2/4) + (8*r^3)/E^(r^2/4) + 16*r*
                   (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 8*r^2*
                   (r/(2*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) - 
                   (4*r^3)/E^(r^2/4)))/r^5 + (6*(16/E^(r^2/4) - (16*r^2)/
                    E^(r^2/4) + 8*r^2*(-1/2*1/E^(r^2/4) + r^2/
                      (4*E^(r^2/4)))))/r^4 - (3*((-40*r)/E^(r^2/4) + 
                   (8*r^3)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + 
                     r^2/(4*E^(r^2/4))) + 8*r^2*(r/(2*E^(r^2/4)) - 
                     (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2)))/r^3 + 
                (-32/E^(r^2/4) + (32*r^2)/E^(r^2/4) + 32*(-1/2*1/E^(r^2/4) + 
                    r^2/(4*E^(r^2/4))) - 16*r^2*(-1/2*1/E^(r^2/4) + 
                    r^2/(4*E^(r^2/4))) + 32*r*(r/(2*E^(r^2/4)) - 
                    (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 
                  8*r^2*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - 
                    (r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/
                          (4*E^(r^2/4))))/2))/2))/r^2)*Cos[theta]^2 + 
              (((21*((16*r)/E^(r^2/4) - (4*r^3)/E^(r^2/4)))/r^5 - 
                 (21*(16/E^(r^2/4) - (16*r^2)/E^(r^2/4) + 8*r^2*
                     (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^4 + 
                 (9*((-40*r)/E^(r^2/4) + (8*r^3)/E^(r^2/4) + 16*r*
                     (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 8*r^2*
                     (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/
                          (4*E^(r^2/4))))/2)))/r^3 - (2*(-32/E^(r^2/4) + 
                    (32*r^2)/E^(r^2/4) + 32*(-1/2*1/E^(r^2/4) + r^2/
                       (4*E^(r^2/4))) - 16*r^2*(-1/2*1/E^(r^2/4) + 
                      r^2/(4*E^(r^2/4))) + 32*r*(r/(2*E^(r^2/4)) - 
                      (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 
                    8*r^2*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - 
                      (r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/
                          (4*E^(r^2/4))))/2))/2)))/r^2 + ((80*r)/E^(r^2/4) - 
                   (16*r^3)/E^(r^2/4) - 32*r*(-1/2*1/E^(r^2/4) + 
                     r^2/(4*E^(r^2/4))) + 64*(r/(2*E^(r^2/4)) - 
                     (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) - 
                   16*r^2*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + 
                        r^2/(4*E^(r^2/4))))/2) + 32*r*(1/(2*E^(r^2/4)) - 
                     r^2/(4*E^(r^2/4)) + (1/(2*E^(r^2/4)) - r^2/
                        (4*E^(r^2/4)))/2 - (r*((3*r)/(4*E^(r^2/4)) - 
                        r^3/(8*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - 
                     (3*r^2)/(8*E^(r^2/4)) - (r*(r/(2*E^(r^2/4)) - 
                        (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2))/2) + 
                   8*r^2*(-1/4*r/E^(r^2/4) + (r*(-1/2*1/E^(r^2/4) + 
                        r^2/(4*E^(r^2/4))))/4 + (3*(-1/2*r/E^(r^2/4) + 
                        (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2))/2 - 
                     (r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - 
                        (r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/
                          (4*E^(r^2/4))))/2))/2))/2))/r)*(-1 + 
                 3.0000000000000004*^-8*(24/(E^(r^2/4)*r^3) - 
                   (3*((16*r)/E^(r^2/4) - (4*r^3)/E^(r^2/4)))/r^4 + 
                   (16/E^(r^2/4) - (16*r^2)/E^(r^2/4) + 8*r^2*
                      (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/r^3)*
                  (-2 + 3*Sin[theta]^2)))/4))*
           (r*(2 - 6.000000000000001*^-8*(24/(E^(r^2/4)*r^3) - 
                (3*((16*r)/E^(r^2/4) - (4*r^3)/E^(r^2/4)))/r^4 + 
                (16/E^(r^2/4) - (16*r^2)/E^(r^2/4) + 8*r^2*
                   (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/r^3) - 
              3.0000000000000004*^-8*r*(-120/(E^(r^2/4)*r^4) + 
                (15*((16*r)/E^(r^2/4) - (4*r^3)/E^(r^2/4)))/r^5 - 
                (6*(16/E^(r^2/4) - (16*r^2)/E^(r^2/4) + 8*r^2*
                    (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^4 + 
                ((-40*r)/E^(r^2/4) + (8*r^3)/E^(r^2/4) + 16*r*
                   (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 8*r^2*
                   (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/
                        (4*E^(r^2/4))))/2))/r^3) + 1.5000000000000002*^-8*(
                168/(E^(r^2/4)*r^3) - (21*((16*r)/E^(r^2/4) - (4*r^3)/
                    E^(r^2/4)))/r^4 + (9*(16/E^(r^2/4) - (16*r^2)/E^(r^2/4) + 
                   8*r^2*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 - 
                (2*((-40*r)/E^(r^2/4) + (8*r^3)/E^(r^2/4) + 16*r*
                    (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 8*r^2*
                    (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/
                         (4*E^(r^2/4))))/2)))/r^2 + (-32/E^(r^2/4) + 
                  (32*r^2)/E^(r^2/4) + 32*(-1/2*1/E^(r^2/4) + r^2/
                     (4*E^(r^2/4))) - 16*r^2*(-1/2*1/E^(r^2/4) + 
                    r^2/(4*E^(r^2/4))) + 32*r*(r/(2*E^(r^2/4)) - 
                    (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 
                  8*r^2*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - 
                    (r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/
                          (4*E^(r^2/4))))/2))/2))/r)*Sin[theta]^2 + 
              7.500000000000001*^-9*r*(-840/(E^(r^2/4)*r^4) + 
                (105*((16*r)/E^(r^2/4) - (4*r^3)/E^(r^2/4)))/r^5 - 
                (48*(16/E^(r^2/4) - (16*r^2)/E^(r^2/4) + 8*r^2*
                    (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^4 + 
                (13*((-40*r)/E^(r^2/4) + (8*r^3)/E^(r^2/4) + 16*r*
                    (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 8*r^2*
                    (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/
                         (4*E^(r^2/4))))/2)))/r^3 - (3*(-32/E^(r^2/4) + 
                   (32*r^2)/E^(r^2/4) + 32*(-1/2*1/E^(r^2/4) + r^2/
                      (4*E^(r^2/4))) - 16*r^2*(-1/2*1/E^(r^2/4) + 
                     r^2/(4*E^(r^2/4))) + 32*r*(r/(2*E^(r^2/4)) - 
                     (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 
                   8*r^2*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - 
                     (r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/
                          (4*E^(r^2/4))))/2))/2)))/r^2 + ((80*r)/E^(r^2/4) - 
                  (16*r^3)/E^(r^2/4) - 32*r*(-1/2*1/E^(r^2/4) + 
                    r^2/(4*E^(r^2/4))) + 64*(r/(2*E^(r^2/4)) - 
                    (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) - 
                  16*r^2*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + 
                       r^2/(4*E^(r^2/4))))/2) + 32*r*(1/(2*E^(r^2/4)) - 
                    r^2/(4*E^(r^2/4)) + (1/(2*E^(r^2/4)) - r^2/(4*E^(r^2/4)))/
                     2 - (r*((3*r)/(4*E^(r^2/4)) - r^3/(8*E^(r^2/4))))/2) + 
                  16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - 
                    (r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/
                          (4*E^(r^2/4))))/2))/2) + 8*r^2*(-1/4*r/E^(r^2/4) + 
                    (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/4 + 
                    (3*(-1/2*r/E^(r^2/4) + (r*(-1/2*1/E^(r^2/4) + r^2/
                          (4*E^(r^2/4))))/2))/2 - (r*(3/(4*E^(r^2/4)) - 
                       (3*r^2)/(8*E^(r^2/4)) - (r*(r/(2*E^(r^2/4)) - 
                          (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2))/2))/
                     2))/r)*Sin[theta]^2)*(-1 + 3.0000000000000004*^-8*(
                24/(E^(r^2/4)*r^3) - (3*((16*r)/E^(r^2/4) - (4*r^3)/
                    E^(r^2/4)))/r^4 + (16/E^(r^2/4) - (16*r^2)/E^(r^2/4) + 
                  8*r^2*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/r^3)*(-2 + 
                3*Sin[theta]^2)) + 1.35*^-15*r*(24/(E^(r^2/4)*r^3) - 
              (3*((16*r)/E^(r^2/4) - (4*r^3)/E^(r^2/4)))/r^4 + 
              (16/E^(r^2/4) - (16*r^2)/E^(r^2/4) + 8*r^2*(-1/2*1/E^(r^2/4) + 
                  r^2/(4*E^(r^2/4))))/r^3)*(-48/(E^(r^2/4)*r^3) + 
              (6*((16*r)/E^(r^2/4) - (4*r^3)/E^(r^2/4)))/r^4 - 
              (3*(16/E^(r^2/4) - (16*r^2)/E^(r^2/4) + 8*r^2*
                  (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + 
              ((-40*r)/E^(r^2/4) + (8*r^3)/E^(r^2/4) + 16*r*
                 (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 8*r^2*
                 (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/
                      (4*E^(r^2/4))))/2))/r^2)*Sin[2*theta]^2))/
          (r^2*(9.*^-16*(-48/(E^(r^2/4)*r^3) + (6*((16*r)/E^(r^2/4) - 
                  (4*r^3)/E^(r^2/4)))/r^4 - (3*(16/E^(r^2/4) - (16*r^2)/
                   E^(r^2/4) + 8*r^2*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/
                r^3 + ((-40*r)/E^(r^2/4) + (8*r^3)/E^(r^2/4) + 
                 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 
                 8*r^2*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + 
                      r^2/(4*E^(r^2/4))))/2))/r^2)^2*Cos[theta]^2*
             Sin[theta]^2 - (1 - 3.0000000000000004*^-8*(24/(E^(r^2/4)*r^3) - 
                (3*((16*r)/E^(r^2/4) - (4*r^3)/E^(r^2/4)))/r^4 + 
                (16/E^(r^2/4) - (16*r^2)/E^(r^2/4) + 8*r^2*
                   (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/r^3) + 
              7.500000000000001*^-9*(168/(E^(r^2/4)*r^3) - 
                (21*((16*r)/E^(r^2/4) - (4*r^3)/E^(r^2/4)))/r^4 + 
                (9*(16/E^(r^2/4) - (16*r^2)/E^(r^2/4) + 8*r^2*
                    (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 - 
                (2*((-40*r)/E^(r^2/4) + (8*r^3)/E^(r^2/4) + 16*r*
                    (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 8*r^2*
                    (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/
                         (4*E^(r^2/4))))/2)))/r^2 + (-32/E^(r^2/4) + 
                  (32*r^2)/E^(r^2/4) + 32*(-1/2*1/E^(r^2/4) + r^2/
                     (4*E^(r^2/4))) - 16*r^2*(-1/2*1/E^(r^2/4) + 
                    r^2/(4*E^(r^2/4))) + 32*r*(r/(2*E^(r^2/4)) - 
                    (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 
                  8*r^2*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - 
                    (r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/
                          (4*E^(r^2/4))))/2))/2))/r)*Sin[theta]^2)*
             (1 + 3.0000000000000004*^-8*(24/(E^(r^2/4)*r^3) - 
                (3*((16*r)/E^(r^2/4) - (4*r^3)/E^(r^2/4)))/r^4 + 
                (16/E^(r^2/4) - (16*r^2)/E^(r^2/4) + 8*r^2*
                   (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/r^3)*(2 - 
                3*Sin[theta]^2)))*(-2 + 9.*^-16*(24/(E^(r^2/4)*r^3) - 
               (3*((16*r)/E^(r^2/4) - (4*r^3)/E^(r^2/4)))/r^4 + 
               (16/E^(r^2/4) - (16*r^2)/E^(r^2/4) + 8*r^2*(-1/2*1/E^(r^2/4) + 
                   r^2/(4*E^(r^2/4))))/r^3)^2*(1 + 3*Cos[2*theta]) - 
            1.5000000000000002*^-8*(168/(E^(r^2/4)*r^3) - 
              (21*((16*r)/E^(r^2/4) - (4*r^3)/E^(r^2/4)))/r^4 + 
              (9*(16/E^(r^2/4) - (16*r^2)/E^(r^2/4) + 8*r^2*
                  (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 - 
              (2*((-40*r)/E^(r^2/4) + (8*r^3)/E^(r^2/4) + 16*r*
                  (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 8*r^2*
                  (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/
                       (4*E^(r^2/4))))/2)))/r^2 + (-32/E^(r^2/4) + 
                (32*r^2)/E^(r^2/4) + 32*(-1/2*1/E^(r^2/4) + 
                  r^2/(4*E^(r^2/4))) - 16*r^2*(-1/2*1/E^(r^2/4) + 
                  r^2/(4*E^(r^2/4))) + 32*r*(r/(2*E^(r^2/4)) - 
                  (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 
                8*r^2*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - 
                  (r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/
                         (4*E^(r^2/4))))/2))/2))/r)*Sin[theta]^2 - 
            6.000000000000001*^-8*(24/(E^(r^2/4)*r^3) - 
              (3*((16*r)/E^(r^2/4) - (4*r^3)/E^(r^2/4)))/r^4 + 
              (16/E^(r^2/4) - (16*r^2)/E^(r^2/4) + 8*r^2*(-1/2*1/E^(r^2/4) + 
                  r^2/(4*E^(r^2/4))))/r^3)*(1 - 3*Sin[theta]^2 + 
              3.7500000000000005*^-9*(168/(E^(r^2/4)*r^3) - 
                (21*((16*r)/E^(r^2/4) - (4*r^3)/E^(r^2/4)))/r^4 + 
                (9*(16/E^(r^2/4) - (16*r^2)/E^(r^2/4) + 8*r^2*
                    (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 - 
                (2*((-40*r)/E^(r^2/4) + (8*r^3)/E^(r^2/4) + 16*r*
                    (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 8*r^2*
                    (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/
                         (4*E^(r^2/4))))/2)))/r^2 + (-32/E^(r^2/4) + 
                  (32*r^2)/E^(r^2/4) + 32*(-1/2*1/E^(r^2/4) + r^2/
                     (4*E^(r^2/4))) - 16*r^2*(-1/2*1/E^(r^2/4) + 
                    r^2/(4*E^(r^2/4))) + 32*r*(r/(2*E^(r^2/4)) - 
                    (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 
                  8*r^2*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - 
                    (r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/
                          (4*E^(r^2/4))))/2))/2))/r)*(1 + 3*Cos[2*theta])*
               Sin[theta]^2) + 4.5*^-16*(-48/(E^(r^2/4)*r^3) + 
               (6*((16*r)/E^(r^2/4) - (4*r^3)/E^(r^2/4)))/r^4 - 
               (3*(16/E^(r^2/4) - (16*r^2)/E^(r^2/4) + 8*r^2*
                   (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + 
               ((-40*r)/E^(r^2/4) + (8*r^3)/E^(r^2/4) + 16*r*
                  (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 8*r^2*
                  (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/
                       (4*E^(r^2/4))))/2))/r^2)^2*Sin[2*theta]^2)) - 
         (4.5*^-16*Cos[theta]^2*(-3.0000000000000004*^-8*
             ((3*((16*r)/E^(r^2/4) - (4*r^3)/E^(r^2/4)))/r^5 - 
              (3*(16/E^(r^2/4) - (16*r^2)/E^(r^2/4) + 8*r^2*
                  (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^4 + 
              ((-40*r)/E^(r^2/4) + (8*r^3)/E^(r^2/4) + 16*r*
                 (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 8*r^2*
                 (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/
                      (4*E^(r^2/4))))/2))/r^3)*(-48/(E^(r^2/4)*r^3) + 
              (6*((16*r)/E^(r^2/4) - (4*r^3)/E^(r^2/4)))/r^4 - 
              (3*(16/E^(r^2/4) - (16*r^2)/E^(r^2/4) + 8*r^2*
                  (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + 
              ((-40*r)/E^(r^2/4) + (8*r^3)/E^(r^2/4) + 16*r*
                 (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 8*r^2*
                 (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/
                      (4*E^(r^2/4))))/2))/r^2)*(1 + 3*Cos[2*theta]) + 
            ((-6*((16*r)/E^(r^2/4) - (4*r^3)/E^(r^2/4)))/r^5 + 
              (6*(16/E^(r^2/4) - (16*r^2)/E^(r^2/4) + 8*r^2*
                  (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^4 - 
              (3*((-40*r)/E^(r^2/4) + (8*r^3)/E^(r^2/4) + 16*r*
                  (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 8*r^2*
                  (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/
                       (4*E^(r^2/4))))/2)))/r^3 + (-32/E^(r^2/4) + 
                (32*r^2)/E^(r^2/4) + 32*(-1/2*1/E^(r^2/4) + 
                  r^2/(4*E^(r^2/4))) - 16*r^2*(-1/2*1/E^(r^2/4) + 
                  r^2/(4*E^(r^2/4))) + 32*r*(r/(2*E^(r^2/4)) - 
                  (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 
                8*r^2*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - 
                  (r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/
                         (4*E^(r^2/4))))/2))/2))/r^2)*
             (2 + 3.0000000000000004*^-8*(24/(E^(r^2/4)*r^3) - 
                (3*((16*r)/E^(r^2/4) - (4*r^3)/E^(r^2/4)))/r^4 + 
                (16/E^(r^2/4) - (16*r^2)/E^(r^2/4) + 8*r^2*
                   (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/r^3)*(1 + 
                3*Cos[2*theta])))*Sin[theta]^2*(6.000000000000001*^-8*
             (-48/(E^(r^2/4)*r^3) + (6*((16*r)/E^(r^2/4) - (4*r^3)/
                   E^(r^2/4)))/r^4 - (3*(16/E^(r^2/4) - (16*r^2)/E^(r^2/4) + 
                  8*r^2*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + 
               ((-40*r)/E^(r^2/4) + (8*r^3)/E^(r^2/4) + 16*r*
                  (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 8*r^2*
                  (r/(2*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] - 
            ((168/(E^(r^2/4)*r^3) - (21*((16*r)/E^(r^2/4) - (4*r^3)/
                   E^(r^2/4)))/r^4 + (9*(16/E^(r^2/4) - (16*r^2)/E^(r^2/4) + 
                  8*r^2*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 - 
               (2*((-40*r)/E^(r^2/4) + (8*r^3)/E^(r^2/4) + 16*r*
                   (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 8*r^2*
                   (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/
                        (4*E^(r^2/4))))/2)))/r^2 + (-32/E^(r^2/4) + 
                 (32*r^2)/E^(r^2/4) + 32*(-1/2*1/E^(r^2/4) + 
                   r^2/(4*E^(r^2/4))) - 16*r^2*(-1/2*1/E^(r^2/4) + 
                   r^2/(4*E^(r^2/4))) + 32*r*(r/(2*E^(r^2/4)) - 
                   (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 
                 8*r^2*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - 
                   (r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/
                          (4*E^(r^2/4))))/2))/2))/r)*
              (2 + 3.0000000000000004*^-8*(24/(E^(r^2/4)*r^3) - 
                 (3*((16*r)/E^(r^2/4) - (4*r^3)/E^(r^2/4)))/r^4 + 
                 (16/E^(r^2/4) - (16*r^2)/E^(r^2/4) + 8*r^2*
                    (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/r^3)*
                (1 + 3*Cos[2*theta])))/4 + (-48/(E^(r^2/4)*r^3) + 
              (6*((16*r)/E^(r^2/4) - (4*r^3)/E^(r^2/4)))/r^4 - 
              (3*(16/E^(r^2/4) - (16*r^2)/E^(r^2/4) + 8*r^2*
                  (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + 
              ((-40*r)/E^(r^2/4) + (8*r^3)/E^(r^2/4) + 16*r*
                 (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 8*r^2*
                 (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/
                      (4*E^(r^2/4))))/2))/r^2)*(2 - 6.000000000000001*^-8*(
                24/(E^(r^2/4)*r^3) - (3*((16*r)/E^(r^2/4) - (4*r^3)/
                    E^(r^2/4)))/r^4 + (16/E^(r^2/4) - (16*r^2)/E^(r^2/4) + 
                  8*r^2*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/r^3) - 
              3.0000000000000004*^-8*r*(-120/(E^(r^2/4)*r^4) + 
                (15*((16*r)/E^(r^2/4) - (4*r^3)/E^(r^2/4)))/r^5 - 
                (6*(16/E^(r^2/4) - (16*r^2)/E^(r^2/4) + 8*r^2*
                    (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^4 + 
                ((-40*r)/E^(r^2/4) + (8*r^3)/E^(r^2/4) + 16*r*
                   (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 8*r^2*
                   (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/
                        (4*E^(r^2/4))))/2))/r^3) + 1.5000000000000002*^-8*(
                168/(E^(r^2/4)*r^3) - (21*((16*r)/E^(r^2/4) - (4*r^3)/
                    E^(r^2/4)))/r^4 + (9*(16/E^(r^2/4) - (16*r^2)/E^(r^2/4) + 
                   8*r^2*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 - 
                (2*((-40*r)/E^(r^2/4) + (8*r^3)/E^(r^2/4) + 16*r*
                    (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 8*r^2*
                    (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/
                         (4*E^(r^2/4))))/2)))/r^2 + (-32/E^(r^2/4) + 
                  (32*r^2)/E^(r^2/4) + 32*(-1/2*1/E^(r^2/4) + r^2/
                     (4*E^(r^2/4))) - 16*r^2*(-1/2*1/E^(r^2/4) + 
                    r^2/(4*E^(r^2/4))) + 32*r*(r/(2*E^(r^2/4)) - 
                    (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 
                  8*r^2*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - 
                    (r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/
                          (4*E^(r^2/4))))/2))/2))/r)*Sin[theta]^2 + 
              7.500000000000001*^-9*r*(-840/(E^(r^2/4)*r^4) + 
                (105*((16*r)/E^(r^2/4) - (4*r^3)/E^(r^2/4)))/r^5 - 
                (48*(16/E^(r^2/4) - (16*r^2)/E^(r^2/4) + 8*r^2*
                    (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^4 + 
                (13*((-40*r)/E^(r^2/4) + (8*r^3)/E^(r^2/4) + 16*r*
                    (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 8*r^2*
                    (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/
                         (4*E^(r^2/4))))/2)))/r^3 - (3*(-32/E^(r^2/4) + 
                   (32*r^2)/E^(r^2/4) + 32*(-1/2*1/E^(r^2/4) + r^2/
                      (4*E^(r^2/4))) - 16*r^2*(-1/2*1/E^(r^2/4) + 
                     r^2/(4*E^(r^2/4))) + 32*r*(r/(2*E^(r^2/4)) - 
                     (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 
                   8*r^2*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - 
                     (r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/
                          (4*E^(r^2/4))))/2))/2)))/r^2 + ((80*r)/E^(r^2/4) - 
                  (16*r^3)/E^(r^2/4) - 32*r*(-1/2*1/E^(r^2/4) + 
                    r^2/(4*E^(r^2/4))) + 64*(r/(2*E^(r^2/4)) - 
                    (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) - 
                  16*r^2*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + 
                       r^2/(4*E^(r^2/4))))/2) + 32*r*(1/(2*E^(r^2/4)) - 
                    r^2/(4*E^(r^2/4)) + (1/(2*E^(r^2/4)) - r^2/(4*E^(r^2/4)))/
                     2 - (r*((3*r)/(4*E^(r^2/4)) - r^3/(8*E^(r^2/4))))/2) + 
                  16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - 
                    (r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/
                          (4*E^(r^2/4))))/2))/2) + 8*r^2*(-1/4*r/E^(r^2/4) + 
                    (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/4 + 
                    (3*(-1/2*r/E^(r^2/4) + (r*(-1/2*1/E^(r^2/4) + r^2/
                          (4*E^(r^2/4))))/2))/2 - (r*(3/(4*E^(r^2/4)) - 
                       (3*r^2)/(8*E^(r^2/4)) - (r*(r/(2*E^(r^2/4)) - 
                          (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2))/2))/
                     2))/r)*Sin[theta]^2)))/
          (r*(2 - 9.*^-16*(24/(E^(r^2/4)*r^3) - (3*((16*r)/E^(r^2/4) - 
                  (4*r^3)/E^(r^2/4)))/r^4 + (16/E^(r^2/4) - (16*r^2)/
                  E^(r^2/4) + 8*r^2*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/
                r^3)^2*(1 + 3*Cos[2*theta]) + 1.5000000000000002*^-8*
             (168/(E^(r^2/4)*r^3) - (21*((16*r)/E^(r^2/4) - (4*r^3)/
                  E^(r^2/4)))/r^4 + (9*(16/E^(r^2/4) - (16*r^2)/E^(r^2/4) + 
                 8*r^2*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 - 
              (2*((-40*r)/E^(r^2/4) + (8*r^3)/E^(r^2/4) + 16*r*
                  (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 8*r^2*
                  (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/
                       (4*E^(r^2/4))))/2)))/r^2 + (-32/E^(r^2/4) + 
                (32*r^2)/E^(r^2/4) + 32*(-1/2*1/E^(r^2/4) + 
                  r^2/(4*E^(r^2/4))) - 16*r^2*(-1/2*1/E^(r^2/4) + 
                  r^2/(4*E^(r^2/4))) + 32*r*(r/(2*E^(r^2/4)) - 
                  (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 
                8*r^2*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - 
                  (r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/
                         (4*E^(r^2/4))))/2))/2))/r)*Sin[theta]^2 + 
            3.0000000000000004*^-8*(24/(E^(r^2/4)*r^3) - 
              (3*((16*r)/E^(r^2/4) - (4*r^3)/E^(r^2/4)))/r^4 + 
              (16/E^(r^2/4) - (16*r^2)/E^(r^2/4) + 8*r^2*(-1/2*1/E^(r^2/4) + 
                  r^2/(4*E^(r^2/4))))/r^3)*(-1 + 3*Cos[2*theta] + 
              7.500000000000001*^-9*(168/(E^(r^2/4)*r^3) - 
                (21*((16*r)/E^(r^2/4) - (4*r^3)/E^(r^2/4)))/r^4 + 
                (9*(16/E^(r^2/4) - (16*r^2)/E^(r^2/4) + 8*r^2*
                    (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 - 
                (2*((-40*r)/E^(r^2/4) + (8*r^3)/E^(r^2/4) + 16*r*
                    (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 8*r^2*
                    (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/
                         (4*E^(r^2/4))))/2)))/r^2 + (-32/E^(r^2/4) + 
                  (32*r^2)/E^(r^2/4) + 32*(-1/2*1/E^(r^2/4) + r^2/
                     (4*E^(r^2/4))) - 16*r^2*(-1/2*1/E^(r^2/4) + 
                    r^2/(4*E^(r^2/4))) + 32*r*(r/(2*E^(r^2/4)) - 
                    (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 
                  8*r^2*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - 
                    (r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/
                          (4*E^(r^2/4))))/2))/2))/r)*(1 + 3*Cos[2*theta])*
               Sin[theta]^2) - 4.5*^-16*(-48/(E^(r^2/4)*r^3) + 
               (6*((16*r)/E^(r^2/4) - (4*r^3)/E^(r^2/4)))/r^4 - 
               (3*(16/E^(r^2/4) - (16*r^2)/E^(r^2/4) + 8*r^2*
                   (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + 
               ((-40*r)/E^(r^2/4) + (8*r^3)/E^(r^2/4) + 16*r*
                  (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 8*r^2*
                  (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/
                       (4*E^(r^2/4))))/2))/r^2)^2*Sin[2*theta]^2)*
           (-2 + 9.*^-16*(24/(E^(r^2/4)*r^3) - (3*((16*r)/E^(r^2/4) - 
                  (4*r^3)/E^(r^2/4)))/r^4 + (16/E^(r^2/4) - (16*r^2)/
                  E^(r^2/4) + 8*r^2*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/
                r^3)^2*(1 + 3*Cos[2*theta]) - 1.5000000000000002*^-8*
             (168/(E^(r^2/4)*r^3) - (21*((16*r)/E^(r^2/4) - (4*r^3)/
                  E^(r^2/4)))/r^4 + (9*(16/E^(r^2/4) - (16*r^2)/E^(r^2/4) + 
                 8*r^2*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 - 
              (2*((-40*r)/E^(r^2/4) + (8*r^3)/E^(r^2/4) + 16*r*
                  (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 8*r^2*
                  (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/
                       (4*E^(r^2/4))))/2)))/r^2 + (-32/E^(r^2/4) + 
                (32*r^2)/E^(r^2/4) + 32*(-1/2*1/E^(r^2/4) + 
                  r^2/(4*E^(r^2/4))) - 16*r^2*(-1/2*1/E^(r^2/4) + 
                  r^2/(4*E^(r^2/4))) + 32*r*(r/(2*E^(r^2/4)) - 
                  (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 
                8*r^2*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - 
                  (r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/
                         (4*E^(r^2/4))))/2))/2))/r)*Sin[theta]^2 - 
            3.0000000000000004*^-8*(24/(E^(r^2/4)*r^3) - 
              (3*((16*r)/E^(r^2/4) - (4*r^3)/E^(r^2/4)))/r^4 + 
              (16/E^(r^2/4) - (16*r^2)/E^(r^2/4) + 8*r^2*(-1/2*1/E^(r^2/4) + 
                  r^2/(4*E^(r^2/4))))/r^3)*(-1 + 3*Cos[2*theta] + 
              7.500000000000001*^-9*(168/(E^(r^2/4)*r^3) - 
                (21*((16*r)/E^(r^2/4) - (4*r^3)/E^(r^2/4)))/r^4 + 
                (9*(16/E^(r^2/4) - (16*r^2)/E^(r^2/4) + 8*r^2*
                    (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 - 
                (2*((-40*r)/E^(r^2/4) + (8*r^3)/E^(r^2/4) + 16*r*
                    (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 8*r^2*
                    (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/
                         (4*E^(r^2/4))))/2)))/r^2 + (-32/E^(r^2/4) + 
                  (32*r^2)/E^(r^2/4) + 32*(-1/2*1/E^(r^2/4) + r^2/
                     (4*E^(r^2/4))) - 16*r^2*(-1/2*1/E^(r^2/4) + 
                    r^2/(4*E^(r^2/4))) + 32*r*(r/(2*E^(r^2/4)) - 
                    (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 
                  8*r^2*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - 
                    (r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/
                          (4*E^(r^2/4))))/2))/2))/r)*(1 + 3*Cos[2*theta])*
               Sin[theta]^2) + 4.5*^-16*(-48/(E^(r^2/4)*r^3) + 
               (6*((16*r)/E^(r^2/4) - (4*r^3)/E^(r^2/4)))/r^4 - 
               (3*(16/E^(r^2/4) - (16*r^2)/E^(r^2/4) + 8*r^2*
                   (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + 
               ((-40*r)/E^(r^2/4) + (8*r^3)/E^(r^2/4) + 16*r*
                  (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 8*r^2*
                  (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/
                       (4*E^(r^2/4))))/2))/r^2)^2*Sin[2*theta]^2)) + 
         (2.25*^-16*Cos[theta]*(4*r*(240/(E^(r^2/4)*r^4) - 
              (30*((16*r)/E^(r^2/4) - (4*r^3)/E^(r^2/4)))/r^5 + 
              (15*(16/E^(r^2/4) - (16*r^2)/E^(r^2/4) + 8*r^2*
                  (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^4 - 
              (5*((-40*r)/E^(r^2/4) + (8*r^3)/E^(r^2/4) + 16*r*
                  (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 8*r^2*
                  (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/
                       (4*E^(r^2/4))))/2)))/r^3 + (-32/E^(r^2/4) + 
                (32*r^2)/E^(r^2/4) + 32*(-1/2*1/E^(r^2/4) + 
                  r^2/(4*E^(r^2/4))) - 16*r^2*(-1/2*1/E^(r^2/4) + 
                  r^2/(4*E^(r^2/4))) + 32*r*(r/(2*E^(r^2/4)) - 
                  (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 
                8*r^2*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - 
                  (r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/
                         (4*E^(r^2/4))))/2))/2))/r^2) - 
            1.8*^-7*(24/(E^(r^2/4)*r^3) - (3*((16*r)/E^(r^2/4) - (4*r^3)/
                   E^(r^2/4)))/r^4 + (16/E^(r^2/4) - (16*r^2)/E^(r^2/4) + 
                 8*r^2*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/r^3)^2*
             (1 + 3*Cos[2*theta]) - (-48/(E^(r^2/4)*r^3) + 
              (6*((16*r)/E^(r^2/4) - (4*r^3)/E^(r^2/4)))/r^4 - 
              (3*(16/E^(r^2/4) - (16*r^2)/E^(r^2/4) + 8*r^2*
                  (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + 
              ((-40*r)/E^(r^2/4) + (8*r^3)/E^(r^2/4) + 16*r*
                 (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 8*r^2*
                 (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/
                      (4*E^(r^2/4))))/2))/r^2)*(-4 + 3.0000000000000004*^-8*r*
               (-120/(E^(r^2/4)*r^4) + (15*((16*r)/E^(r^2/4) - (4*r^3)/
                    E^(r^2/4)))/r^5 - (6*(16/E^(r^2/4) - (16*r^2)/E^(r^2/4) + 
                   8*r^2*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^4 + 
                ((-40*r)/E^(r^2/4) + (8*r^3)/E^(r^2/4) + 16*r*
                   (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 8*r^2*
                   (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/
                        (4*E^(r^2/4))))/2))/r^3)*(1 + 3*Cos[2*theta])) + 
            6*(24/(E^(r^2/4)*r^3) - (3*((16*r)/E^(r^2/4) - (4*r^3)/
                  E^(r^2/4)))/r^4 + (16/E^(r^2/4) - (16*r^2)/E^(r^2/4) + 
                8*r^2*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/r^3)*
             (-2 + 1.*^-8*(-48/(E^(r^2/4)*r^3) + (6*((16*r)/E^(r^2/4) - 
                   (4*r^3)/E^(r^2/4)))/r^4 - (3*(16/E^(r^2/4) - (16*r^2)/
                    E^(r^2/4) + 8*r^2*(-1/2*1/E^(r^2/4) + r^2/
                      (4*E^(r^2/4)))))/r^3 + ((-40*r)/E^(r^2/4) + 
                  (8*r^3)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + 
                    r^2/(4*E^(r^2/4))) + 8*r^2*(r/(2*E^(r^2/4)) - 
                    (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2))/r^2)*(1 + 
                3*Cos[2*theta]) + 1.*^-8*r*(240/(E^(r^2/4)*r^4) - 
                (30*((16*r)/E^(r^2/4) - (4*r^3)/E^(r^2/4)))/r^5 + 
                (15*(16/E^(r^2/4) - (16*r^2)/E^(r^2/4) + 8*r^2*
                    (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^4 - 
                (5*((-40*r)/E^(r^2/4) + (8*r^3)/E^(r^2/4) + 16*r*
                    (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 8*r^2*
                    (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/
                         (4*E^(r^2/4))))/2)))/r^3 + (-32/E^(r^2/4) + 
                  (32*r^2)/E^(r^2/4) + 32*(-1/2*1/E^(r^2/4) + r^2/
                     (4*E^(r^2/4))) - 16*r^2*(-1/2*1/E^(r^2/4) + 
                    r^2/(4*E^(r^2/4))) + 32*r*(r/(2*E^(r^2/4)) - 
                    (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 
                  8*r^2*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - 
                    (r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/
                          (4*E^(r^2/4))))/2))/2))/r^2)*(1 + 3*Cos[2*theta])))*
           Sin[theta]*(((-6*((16*r)/E^(r^2/4) - (4*r^3)/E^(r^2/4)))/r^5 + 
              (6*(16/E^(r^2/4) - (16*r^2)/E^(r^2/4) + 8*r^2*
                  (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^4 - 
              (3*((-40*r)/E^(r^2/4) + (8*r^3)/E^(r^2/4) + 16*r*
                  (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 8*r^2*
                  (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/
                       (4*E^(r^2/4))))/2)))/r^3 + (-32/E^(r^2/4) + 
                (32*r^2)/E^(r^2/4) + 32*(-1/2*1/E^(r^2/4) + 
                  r^2/(4*E^(r^2/4))) - 16*r^2*(-1/2*1/E^(r^2/4) + 
                  r^2/(4*E^(r^2/4))) + 32*r*(r/(2*E^(r^2/4)) - 
                  (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 
                8*r^2*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - 
                  (r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/
                         (4*E^(r^2/4))))/2))/2))/r^2)*
             (1 - 3.0000000000000004*^-8*(24/(E^(r^2/4)*r^3) - 
                (3*((16*r)/E^(r^2/4) - (4*r^3)/E^(r^2/4)))/r^4 + 
                (16/E^(r^2/4) - (16*r^2)/E^(r^2/4) + 8*r^2*
                   (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/r^3) + 
              7.500000000000001*^-9*(168/(E^(r^2/4)*r^3) - 
                (21*((16*r)/E^(r^2/4) - (4*r^3)/E^(r^2/4)))/r^4 + 
                (9*(16/E^(r^2/4) - (16*r^2)/E^(r^2/4) + 8*r^2*
                    (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 - 
                (2*((-40*r)/E^(r^2/4) + (8*r^3)/E^(r^2/4) + 16*r*
                    (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 8*r^2*
                    (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/
                         (4*E^(r^2/4))))/2)))/r^2 + (-32/E^(r^2/4) + 
                  (32*r^2)/E^(r^2/4) + 32*(-1/2*1/E^(r^2/4) + r^2/
                     (4*E^(r^2/4))) - 16*r^2*(-1/2*1/E^(r^2/4) + 
                    r^2/(4*E^(r^2/4))) + 32*r*(r/(2*E^(r^2/4)) - 
                    (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 
                  8*r^2*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - 
                    (r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/
                          (4*E^(r^2/4))))/2))/2))/r)*Sin[theta]^2) + 
            1.*^-8*(-48/(E^(r^2/4)*r^3) + (6*((16*r)/E^(r^2/4) - 
                 (4*r^3)/E^(r^2/4)))/r^4 - (3*(16/E^(r^2/4) - (16*r^2)/
                  E^(r^2/4) + 8*r^2*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/
               r^3 + ((-40*r)/E^(r^2/4) + (8*r^3)/E^(r^2/4) + 
                16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 
                8*r^2*(r/(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) - (4*r^3)/E^(r^2/4)))/r^5 - 
                (3*(16/E^(r^2/4) - (16*r^2)/E^(r^2/4) + 8*r^2*
                    (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^4 + 
                ((-40*r)/E^(r^2/4) + (8*r^3)/E^(r^2/4) + 16*r*
                   (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 8*r^2*
                   (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/
                        (4*E^(r^2/4))))/2))/r^3) - 
              (3*((21*((16*r)/E^(r^2/4) - (4*r^3)/E^(r^2/4)))/r^5 - 
                 (21*(16/E^(r^2/4) - (16*r^2)/E^(r^2/4) + 8*r^2*
                     (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^4 + 
                 (9*((-40*r)/E^(r^2/4) + (8*r^3)/E^(r^2/4) + 16*r*
                     (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 8*r^2*
                     (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/
                          (4*E^(r^2/4))))/2)))/r^3 - (2*(-32/E^(r^2/4) + 
                    (32*r^2)/E^(r^2/4) + 32*(-1/2*1/E^(r^2/4) + r^2/
                       (4*E^(r^2/4))) - 16*r^2*(-1/2*1/E^(r^2/4) + 
                      r^2/(4*E^(r^2/4))) + 32*r*(r/(2*E^(r^2/4)) - 
                      (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 
                    8*r^2*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - 
                      (r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/
                          (4*E^(r^2/4))))/2))/2)))/r^2 + ((80*r)/E^(r^2/4) - 
                   (16*r^3)/E^(r^2/4) - 32*r*(-1/2*1/E^(r^2/4) + 
                     r^2/(4*E^(r^2/4))) + 64*(r/(2*E^(r^2/4)) - 
                     (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) - 
                   16*r^2*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + 
                        r^2/(4*E^(r^2/4))))/2) + 32*r*(1/(2*E^(r^2/4)) - 
                     r^2/(4*E^(r^2/4)) + (1/(2*E^(r^2/4)) - r^2/
                        (4*E^(r^2/4)))/2 - (r*((3*r)/(4*E^(r^2/4)) - 
                        r^3/(8*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - 
                     (3*r^2)/(8*E^(r^2/4)) - (r*(r/(2*E^(r^2/4)) - 
                        (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2))/2) + 
                   8*r^2*(-1/4*r/E^(r^2/4) + (r*(-1/2*1/E^(r^2/4) + 
                        r^2/(4*E^(r^2/4))))/4 + (3*(-1/2*r/E^(r^2/4) + 
                        (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2))/2 - 
                     (r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - 
                        (r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/
                          (4*E^(r^2/4))))/2))/2))/2))/r)*Sin[theta]^2)/4))*
           Sin[2*theta])/(r*(2 - 9.*^-16*(24/(E^(r^2/4)*r^3) - 
               (3*((16*r)/E^(r^2/4) - (4*r^3)/E^(r^2/4)))/r^4 + 
               (16/E^(r^2/4) - (16*r^2)/E^(r^2/4) + 8*r^2*(-1/2*1/E^(r^2/4) + 
                   r^2/(4*E^(r^2/4))))/r^3)^2*(1 + 3*Cos[2*theta]) + 
            1.5000000000000002*^-8*(168/(E^(r^2/4)*r^3) - 
              (21*((16*r)/E^(r^2/4) - (4*r^3)/E^(r^2/4)))/r^4 + 
              (9*(16/E^(r^2/4) - (16*r^2)/E^(r^2/4) + 8*r^2*
                  (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 - 
              (2*((-40*r)/E^(r^2/4) + (8*r^3)/E^(r^2/4) + 16*r*
                  (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 8*r^2*
                  (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/
                       (4*E^(r^2/4))))/2)))/r^2 + (-32/E^(r^2/4) + 
                (32*r^2)/E^(r^2/4) + 32*(-1/2*1/E^(r^2/4) + 
                  r^2/(4*E^(r^2/4))) - 16*r^2*(-1/2*1/E^(r^2/4) + 
                  r^2/(4*E^(r^2/4))) + 32*r*(r/(2*E^(r^2/4)) - 
                  (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 
                8*r^2*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - 
                  (r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/
                         (4*E^(r^2/4))))/2))/2))/r)*Sin[theta]^2 + 
            3.0000000000000004*^-8*(24/(E^(r^2/4)*r^3) - 
              (3*((16*r)/E^(r^2/4) - (4*r^3)/E^(r^2/4)))/r^4 + 
              (16/E^(r^2/4) - (16*r^2)/E^(r^2/4) + 8*r^2*(-1/2*1/E^(r^2/4) + 
                  r^2/(4*E^(r^2/4))))/r^3)*(-1 + 3*Cos[2*theta] + 
              7.500000000000001*^-9*(168/(E^(r^2/4)*r^3) - 
                (21*((16*r)/E^(r^2/4) - (4*r^3)/E^(r^2/4)))/r^4 + 
                (9*(16/E^(r^2/4) - (16*r^2)/E^(r^2/4) + 8*r^2*
                    (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 - 
                (2*((-40*r)/E^(r^2/4) + (8*r^3)/E^(r^2/4) + 16*r*
                    (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 8*r^2*
                    (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/
                         (4*E^(r^2/4))))/2)))/r^2 + (-32/E^(r^2/4) + 
                  (32*r^2)/E^(r^2/4) + 32*(-1/2*1/E^(r^2/4) + r^2/
                     (4*E^(r^2/4))) - 16*r^2*(-1/2*1/E^(r^2/4) + 
                    r^2/(4*E^(r^2/4))) + 32*r*(r/(2*E^(r^2/4)) - 
                    (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 
                  8*r^2*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - 
                    (r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/
                          (4*E^(r^2/4))))/2))/2))/r)*(1 + 3*Cos[2*theta])*
               Sin[theta]^2) - 4.5*^-16*(-48/(E^(r^2/4)*r^3) + 
               (6*((16*r)/E^(r^2/4) - (4*r^3)/E^(r^2/4)))/r^4 - 
               (3*(16/E^(r^2/4) - (16*r^2)/E^(r^2/4) + 8*r^2*
                   (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + 
               ((-40*r)/E^(r^2/4) + (8*r^3)/E^(r^2/4) + 16*r*
                  (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 8*r^2*
                  (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/
                       (4*E^(r^2/4))))/2))/r^2)^2*Sin[2*theta]^2)*
           (-2 + 9.*^-16*(24/(E^(r^2/4)*r^3) - (3*((16*r)/E^(r^2/4) - 
                  (4*r^3)/E^(r^2/4)))/r^4 + (16/E^(r^2/4) - (16*r^2)/
                  E^(r^2/4) + 8*r^2*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/
                r^3)^2*(1 + 3*Cos[2*theta]) - 1.5000000000000002*^-8*
             (168/(E^(r^2/4)*r^3) - (21*((16*r)/E^(r^2/4) - (4*r^3)/
                  E^(r^2/4)))/r^4 + (9*(16/E^(r^2/4) - (16*r^2)/E^(r^2/4) + 
                 8*r^2*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 - 
              (2*((-40*r)/E^(r^2/4) + (8*r^3)/E^(r^2/4) + 16*r*
                  (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 8*r^2*
                  (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/
                       (4*E^(r^2/4))))/2)))/r^2 + (-32/E^(r^2/4) + 
                (32*r^2)/E^(r^2/4) + 32*(-1/2*1/E^(r^2/4) + 
                  r^2/(4*E^(r^2/4))) - 16*r^2*(-1/2*1/E^(r^2/4) + 
                  r^2/(4*E^(r^2/4))) + 32*r*(r/(2*E^(r^2/4)) - 
                  (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 
                8*r^2*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - 
                  (r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/
                         (4*E^(r^2/4))))/2))/2))/r)*Sin[theta]^2 - 
            3.0000000000000004*^-8*(24/(E^(r^2/4)*r^3) - 
              (3*((16*r)/E^(r^2/4) - (4*r^3)/E^(r^2/4)))/r^4 + 
              (16/E^(r^2/4) - (16*r^2)/E^(r^2/4) + 8*r^2*(-1/2*1/E^(r^2/4) + 
                  r^2/(4*E^(r^2/4))))/r^3)*(-1 + 3*Cos[2*theta] + 
              7.500000000000001*^-9*(168/(E^(r^2/4)*r^3) - 
                (21*((16*r)/E^(r^2/4) - (4*r^3)/E^(r^2/4)))/r^4 + 
                (9*(16/E^(r^2/4) - (16*r^2)/E^(r^2/4) + 8*r^2*
                    (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 - 
                (2*((-40*r)/E^(r^2/4) + (8*r^3)/E^(r^2/4) + 16*r*
                    (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 8*r^2*
                    (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/
                         (4*E^(r^2/4))))/2)))/r^2 + (-32/E^(r^2/4) + 
                  (32*r^2)/E^(r^2/4) + 32*(-1/2*1/E^(r^2/4) + r^2/
                     (4*E^(r^2/4))) - 16*r^2*(-1/2*1/E^(r^2/4) + 
                    r^2/(4*E^(r^2/4))) + 32*r*(r/(2*E^(r^2/4)) - 
                    (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 
                  8*r^2*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - 
                    (r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/
                          (4*E^(r^2/4))))/2))/2))/r)*(1 + 3*Cos[2*theta])*
               Sin[theta]^2) + 4.5*^-16*(-48/(E^(r^2/4)*r^3) + 
               (6*((16*r)/E^(r^2/4) - (4*r^3)/E^(r^2/4)))/r^4 - 
               (3*(16/E^(r^2/4) - (16*r^2)/E^(r^2/4) + 8*r^2*
                   (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + 
               ((-40*r)/E^(r^2/4) + (8*r^3)/E^(r^2/4) + 16*r*
                  (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 8*r^2*
                  (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/
                       (4*E^(r^2/4))))/2))/r^2)^2*Sin[2*theta]^2)) + 
         (1.5000000000000002*^-8*(3.0000000000000004*^-8*
             (9.*^-8*(24/(E^(r^2/4)*r^3) - (3*((16*r)/E^(r^2/4) - (4*r^3)/
                     E^(r^2/4)))/r^4 + (16/E^(r^2/4) - (16*r^2)/E^(r^2/4) + 
                   8*r^2*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/r^3)^2 + 
              (168/(E^(r^2/4)*r^3) - (21*((16*r)/E^(r^2/4) - (4*r^3)/
                    E^(r^2/4)))/r^4 + (9*(16/E^(r^2/4) - (16*r^2)/E^(r^2/4) + 
                   8*r^2*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 - 
                (2*((-40*r)/E^(r^2/4) + (8*r^3)/E^(r^2/4) + 16*r*
                    (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 8*r^2*
                    (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/
                         (4*E^(r^2/4))))/2)))/r^2 + (-32/E^(r^2/4) + 
                  (32*r^2)/E^(r^2/4) + 32*(-1/2*1/E^(r^2/4) + r^2/
                     (4*E^(r^2/4))) - 16*r^2*(-1/2*1/E^(r^2/4) + 
                    r^2/(4*E^(r^2/4))) + 32*r*(r/(2*E^(r^2/4)) - 
                    (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 
                  8*r^2*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - 
                    (r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/
                          (4*E^(r^2/4))))/2))/2))/r)/4 - 
              3.0000000000000004*^-8*(-48/(E^(r^2/4)*r^3) + 
                 (6*((16*r)/E^(r^2/4) - (4*r^3)/E^(r^2/4)))/r^4 - 
                 (3*(16/E^(r^2/4) - (16*r^2)/E^(r^2/4) + 8*r^2*
                     (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + 
                 ((-40*r)/E^(r^2/4) + (8*r^3)/E^(r^2/4) + 16*r*
                    (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 8*r^2*
                    (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/
                         (4*E^(r^2/4))))/2))/r^2)^2*Cos[2*theta] + 
              3*(24/(E^(r^2/4)*r^3) - (3*((16*r)/E^(r^2/4) - (4*r^3)/
                    E^(r^2/4)))/r^4 + (16/E^(r^2/4) - (16*r^2)/E^(r^2/4) + 
                  8*r^2*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/r^3)*(-1 + 
                2.5*^-9*(168/(E^(r^2/4)*r^3) - (21*((16*r)/E^(r^2/4) - 
                     (4*r^3)/E^(r^2/4)))/r^4 + (9*(16/E^(r^2/4) - (16*r^2)/
                      E^(r^2/4) + 8*r^2*(-1/2*1/E^(r^2/4) + r^2/
                        (4*E^(r^2/4)))))/r^3 - (2*((-40*r)/E^(r^2/4) + 
                     (8*r^3)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + 
                       r^2/(4*E^(r^2/4))) + 8*r^2*(r/(2*E^(r^2/4)) - 
                       (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2)))/r^2 + 
                  (-32/E^(r^2/4) + (32*r^2)/E^(r^2/4) + 32*
                     (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) - 16*r^2*
                     (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*r*
                     (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/
                          (4*E^(r^2/4))))/2) + 8*r^2*(3/(4*E^(r^2/4)) - 
                      (3*r^2)/(8*E^(r^2/4)) - (r*(r/(2*E^(r^2/4)) - 
                         (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2))/2))/
                   r)*(-1 + 3*Cos[2*theta])))*(-3.0000000000000004*^-8*(
                (3*((16*r)/E^(r^2/4) - (4*r^3)/E^(r^2/4)))/r^5 - 
                (3*(16/E^(r^2/4) - (16*r^2)/E^(r^2/4) + 8*r^2*
                    (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^4 + 
                ((-40*r)/E^(r^2/4) + (8*r^3)/E^(r^2/4) + 16*r*
                   (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 8*r^2*
                   (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/
                        (4*E^(r^2/4))))/2))/r^3)*(-48/(E^(r^2/4)*r^3) + 
                (6*((16*r)/E^(r^2/4) - (4*r^3)/E^(r^2/4)))/r^4 - 
                (3*(16/E^(r^2/4) - (16*r^2)/E^(r^2/4) + 8*r^2*
                    (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + 
                ((-40*r)/E^(r^2/4) + (8*r^3)/E^(r^2/4) + 16*r*
                   (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 8*r^2*
                   (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/
                        (4*E^(r^2/4))))/2))/r^2)*(1 + 3*Cos[2*theta]) + 
              ((-6*((16*r)/E^(r^2/4) - (4*r^3)/E^(r^2/4)))/r^5 + 
                (6*(16/E^(r^2/4) - (16*r^2)/E^(r^2/4) + 8*r^2*
                    (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^4 - 
                (3*((-40*r)/E^(r^2/4) + (8*r^3)/E^(r^2/4) + 16*r*
                    (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 8*r^2*
                    (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/
                         (4*E^(r^2/4))))/2)))/r^3 + (-32/E^(r^2/4) + 
                  (32*r^2)/E^(r^2/4) + 32*(-1/2*1/E^(r^2/4) + r^2/
                     (4*E^(r^2/4))) - 16*r^2*(-1/2*1/E^(r^2/4) + 
                    r^2/(4*E^(r^2/4))) + 32*r*(r/(2*E^(r^2/4)) - 
                    (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 
                  8*r^2*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - 
                    (r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/
                          (4*E^(r^2/4))))/2))/2))/r^2)*(2 + 
                3.0000000000000004*^-8*(24/(E^(r^2/4)*r^3) - 
                  (3*((16*r)/E^(r^2/4) - (4*r^3)/E^(r^2/4)))/r^4 + 
                  (16/E^(r^2/4) - (16*r^2)/E^(r^2/4) + 8*r^2*
                     (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/r^3)*
                 (1 + 3*Cos[2*theta])))*Sin[2*theta]^2 + Cos[theta]^2*
             (-3.0000000000000004*^-8*((3*((16*r)/E^(r^2/4) - (4*r^3)/
                    E^(r^2/4)))/r^5 - (3*(16/E^(r^2/4) - (16*r^2)/E^(r^2/4) + 
                   8*r^2*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^4 + 
                ((-40*r)/E^(r^2/4) + (8*r^3)/E^(r^2/4) + 16*r*
                   (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 8*r^2*
                   (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/
                        (4*E^(r^2/4))))/2))/r^3)*(-48/(E^(r^2/4)*r^3) + 
                (6*((16*r)/E^(r^2/4) - (4*r^3)/E^(r^2/4)))/r^4 - 
                (3*(16/E^(r^2/4) - (16*r^2)/E^(r^2/4) + 8*r^2*
                    (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + 
                ((-40*r)/E^(r^2/4) + (8*r^3)/E^(r^2/4) + 16*r*
                   (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 8*r^2*
                   (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/
                        (4*E^(r^2/4))))/2))/r^2)*(1 + 3*Cos[2*theta]) + 
              ((-6*((16*r)/E^(r^2/4) - (4*r^3)/E^(r^2/4)))/r^5 + 
                (6*(16/E^(r^2/4) - (16*r^2)/E^(r^2/4) + 8*r^2*
                    (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^4 - 
                (3*((-40*r)/E^(r^2/4) + (8*r^3)/E^(r^2/4) + 16*r*
                    (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 8*r^2*
                    (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/
                         (4*E^(r^2/4))))/2)))/r^3 + (-32/E^(r^2/4) + 
                  (32*r^2)/E^(r^2/4) + 32*(-1/2*1/E^(r^2/4) + r^2/
                     (4*E^(r^2/4))) - 16*r^2*(-1/2*1/E^(r^2/4) + 
                    r^2/(4*E^(r^2/4))) + 32*r*(r/(2*E^(r^2/4)) - 
                    (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 
                  8*r^2*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - 
                    (r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/
                          (4*E^(r^2/4))))/2))/2))/r^2)*(2 + 
                3.0000000000000004*^-8*(24/(E^(r^2/4)*r^3) - 
                  (3*((16*r)/E^(r^2/4) - (4*r^3)/E^(r^2/4)))/r^4 + 
                  (16/E^(r^2/4) - (16*r^2)/E^(r^2/4) + 8*r^2*
                     (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/r^3)*
                 (1 + 3*Cos[2*theta])))*(-2 + 9.*^-16*(24/(E^(r^2/4)*r^3) - 
                 (3*((16*r)/E^(r^2/4) - (4*r^3)/E^(r^2/4)))/r^4 + 
                 (16/E^(r^2/4) - (16*r^2)/E^(r^2/4) + 8*r^2*
                    (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/r^3)^2*(1 + 
                3*Cos[2*theta]) - 1.5000000000000002*^-8*(168/(E^(r^2/4)*
                  r^3) - (21*((16*r)/E^(r^2/4) - (4*r^3)/E^(r^2/4)))/r^4 + 
                (9*(16/E^(r^2/4) - (16*r^2)/E^(r^2/4) + 8*r^2*
                    (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 - 
                (2*((-40*r)/E^(r^2/4) + (8*r^3)/E^(r^2/4) + 16*r*
                    (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 8*r^2*
                    (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/
                         (4*E^(r^2/4))))/2)))/r^2 + (-32/E^(r^2/4) + 
                  (32*r^2)/E^(r^2/4) + 32*(-1/2*1/E^(r^2/4) + r^2/
                     (4*E^(r^2/4))) - 16*r^2*(-1/2*1/E^(r^2/4) + 
                    r^2/(4*E^(r^2/4))) + 32*r*(r/(2*E^(r^2/4)) - 
                    (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 
                  8*r^2*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - 
                    (r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/
                          (4*E^(r^2/4))))/2))/2))/r)*Sin[theta]^2 - 
              3.0000000000000004*^-8*(24/(E^(r^2/4)*r^3) - 
                (3*((16*r)/E^(r^2/4) - (4*r^3)/E^(r^2/4)))/r^4 + 
                (16/E^(r^2/4) - (16*r^2)/E^(r^2/4) + 8*r^2*
                   (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/r^3)*(-1 + 
                3*Cos[2*theta] + 7.500000000000001*^-9*(168/(E^(r^2/4)*r^3) - 
                  (21*((16*r)/E^(r^2/4) - (4*r^3)/E^(r^2/4)))/r^4 + 
                  (9*(16/E^(r^2/4) - (16*r^2)/E^(r^2/4) + 8*r^2*
                      (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 - 
                  (2*((-40*r)/E^(r^2/4) + (8*r^3)/E^(r^2/4) + 16*r*
                      (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 8*r^2*
                      (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/
                          (4*E^(r^2/4))))/2)))/r^2 + (-32/E^(r^2/4) + 
                    (32*r^2)/E^(r^2/4) + 32*(-1/2*1/E^(r^2/4) + r^2/
                       (4*E^(r^2/4))) - 16*r^2*(-1/2*1/E^(r^2/4) + 
                      r^2/(4*E^(r^2/4))) + 32*r*(r/(2*E^(r^2/4)) - 
                      (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 
                    8*r^2*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - 
                      (r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/
                          (4*E^(r^2/4))))/2))/2))/r)*(1 + 3*Cos[2*theta])*
                 Sin[theta]^2) + 4.5*^-16*(-48/(E^(r^2/4)*r^3) + 
                 (6*((16*r)/E^(r^2/4) - (4*r^3)/E^(r^2/4)))/r^4 - 
                 (3*(16/E^(r^2/4) - (16*r^2)/E^(r^2/4) + 8*r^2*
                     (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + 
                 ((-40*r)/E^(r^2/4) + (8*r^3)/E^(r^2/4) + 16*r*
                    (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 8*r^2*
                    (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/
                         (4*E^(r^2/4))))/2))/r^2)^2*Sin[2*theta]^2) - 
            (-3.0000000000000004*^-8*((3*((16*r)/E^(r^2/4) - (4*r^3)/
                    E^(r^2/4)))/r^5 - (3*(16/E^(r^2/4) - (16*r^2)/E^(r^2/4) + 
                   8*r^2*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^4 + 
                ((-40*r)/E^(r^2/4) + (8*r^3)/E^(r^2/4) + 16*r*
                   (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 8*r^2*
                   (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/
                        (4*E^(r^2/4))))/2))/r^3)*(-48/(E^(r^2/4)*r^3) + 
                (6*((16*r)/E^(r^2/4) - (4*r^3)/E^(r^2/4)))/r^4 - 
                (3*(16/E^(r^2/4) - (16*r^2)/E^(r^2/4) + 8*r^2*
                    (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + 
                ((-40*r)/E^(r^2/4) + (8*r^3)/E^(r^2/4) + 16*r*
                   (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 8*r^2*
                   (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/
                        (4*E^(r^2/4))))/2))/r^2)*(1 + 3*Cos[2*theta]) + 
              ((-6*((16*r)/E^(r^2/4) - (4*r^3)/E^(r^2/4)))/r^5 + 
                (6*(16/E^(r^2/4) - (16*r^2)/E^(r^2/4) + 8*r^2*
                    (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^4 - 
                (3*((-40*r)/E^(r^2/4) + (8*r^3)/E^(r^2/4) + 16*r*
                    (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 8*r^2*
                    (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/
                         (4*E^(r^2/4))))/2)))/r^3 + (-32/E^(r^2/4) + 
                  (32*r^2)/E^(r^2/4) + 32*(-1/2*1/E^(r^2/4) + r^2/
                     (4*E^(r^2/4))) - 16*r^2*(-1/2*1/E^(r^2/4) + 
                    r^2/(4*E^(r^2/4))) + 32*r*(r/(2*E^(r^2/4)) - 
                    (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 
                  8*r^2*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - 
                    (r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/
                          (4*E^(r^2/4))))/2))/2))/r^2)*(2 + 
                3.0000000000000004*^-8*(24/(E^(r^2/4)*r^3) - 
                  (3*((16*r)/E^(r^2/4) - (4*r^3)/E^(r^2/4)))/r^4 + 
                  (16/E^(r^2/4) - (16*r^2)/E^(r^2/4) + 8*r^2*
                     (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/r^3)*
                 (1 + 3*Cos[2*theta])))*Sin[theta]^2*
             (-2 + 9.*^-16*(24/(E^(r^2/4)*r^3) - (3*((16*r)/E^(r^2/4) - 
                    (4*r^3)/E^(r^2/4)))/r^4 + (16/E^(r^2/4) - (16*r^2)/
                    E^(r^2/4) + 8*r^2*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/
                  r^3)^2*(1 + 3*Cos[2*theta]) - 1.5000000000000002*^-8*(
                168/(E^(r^2/4)*r^3) - (21*((16*r)/E^(r^2/4) - (4*r^3)/
                    E^(r^2/4)))/r^4 + (9*(16/E^(r^2/4) - (16*r^2)/E^(r^2/4) + 
                   8*r^2*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 - 
                (2*((-40*r)/E^(r^2/4) + (8*r^3)/E^(r^2/4) + 16*r*
                    (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 8*r^2*
                    (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/
                         (4*E^(r^2/4))))/2)))/r^2 + (-32/E^(r^2/4) + 
                  (32*r^2)/E^(r^2/4) + 32*(-1/2*1/E^(r^2/4) + r^2/
                     (4*E^(r^2/4))) - 16*r^2*(-1/2*1/E^(r^2/4) + 
                    r^2/(4*E^(r^2/4))) + 32*r*(r/(2*E^(r^2/4)) - 
                    (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 
                  8*r^2*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - 
                    (r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/
                          (4*E^(r^2/4))))/2))/2))/r)*Sin[theta]^2 - 
              3.0000000000000004*^-8*(24/(E^(r^2/4)*r^3) - 
                (3*((16*r)/E^(r^2/4) - (4*r^3)/E^(r^2/4)))/r^4 + 
                (16/E^(r^2/4) - (16*r^2)/E^(r^2/4) + 8*r^2*
                   (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/r^3)*(-1 + 
                3*Cos[2*theta] + 7.500000000000001*^-9*(168/(E^(r^2/4)*r^3) - 
                  (21*((16*r)/E^(r^2/4) - (4*r^3)/E^(r^2/4)))/r^4 + 
                  (9*(16/E^(r^2/4) - (16*r^2)/E^(r^2/4) + 8*r^2*
                      (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 - 
                  (2*((-40*r)/E^(r^2/4) + (8*r^3)/E^(r^2/4) + 16*r*
                      (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 8*r^2*
                      (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/
                          (4*E^(r^2/4))))/2)))/r^2 + (-32/E^(r^2/4) + 
                    (32*r^2)/E^(r^2/4) + 32*(-1/2*1/E^(r^2/4) + r^2/
                       (4*E^(r^2/4))) - 16*r^2*(-1/2*1/E^(r^2/4) + 
                      r^2/(4*E^(r^2/4))) + 32*r*(r/(2*E^(r^2/4)) - 
                      (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 
                    8*r^2*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - 
                      (r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/
                          (4*E^(r^2/4))))/2))/2))/r)*(1 + 3*Cos[2*theta])*
                 Sin[theta]^2) + 4.5*^-16*(-48/(E^(r^2/4)*r^3) + 
                 (6*((16*r)/E^(r^2/4) - (4*r^3)/E^(r^2/4)))/r^4 - 
                 (3*(16/E^(r^2/4) - (16*r^2)/E^(r^2/4) + 8*r^2*
                     (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + 
                 ((-40*r)/E^(r^2/4) + (8*r^3)/E^(r^2/4) + 16*r*
                    (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 8*r^2*
                    (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/
                         (4*E^(r^2/4))))/2))/r^2)^2*Sin[2*theta]^2) + 
            6.000000000000001*^-8*(3*((3*((16*r)/E^(r^2/4) - (4*r^3)/
                    E^(r^2/4)))/r^5 - (3*(16/E^(r^2/4) - (16*r^2)/E^(r^2/4) + 
                   8*r^2*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^4 + 
                ((-40*r)/E^(r^2/4) + (8*r^3)/E^(r^2/4) + 16*r*
                   (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 8*r^2*
                   (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/
                        (4*E^(r^2/4))))/2))/r^3)*(-48/(E^(r^2/4)*r^3) + 
                (6*((16*r)/E^(r^2/4) - (4*r^3)/E^(r^2/4)))/r^4 - 
                (3*(16/E^(r^2/4) - (16*r^2)/E^(r^2/4) + 8*r^2*
                    (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + 
                ((-40*r)/E^(r^2/4) + (8*r^3)/E^(r^2/4) + 16*r*
                   (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 8*r^2*
                   (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/
                        (4*E^(r^2/4))))/2))/r^2) - 3*(24/(E^(r^2/4)*r^3) - 
                (3*((16*r)/E^(r^2/4) - (4*r^3)/E^(r^2/4)))/r^4 + 
                (16/E^(r^2/4) - (16*r^2)/E^(r^2/4) + 8*r^2*
                   (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/r^3)*(
                (-6*((16*r)/E^(r^2/4) - (4*r^3)/E^(r^2/4)))/r^5 + 
                (6*(16/E^(r^2/4) - (16*r^2)/E^(r^2/4) + 8*r^2*
                    (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^4 - 
                (3*((-40*r)/E^(r^2/4) + (8*r^3)/E^(r^2/4) + 16*r*
                    (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 8*r^2*
                    (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/
                         (4*E^(r^2/4))))/2)))/r^3 + (-32/E^(r^2/4) + 
                  (32*r^2)/E^(r^2/4) + 32*(-1/2*1/E^(r^2/4) + r^2/
                     (4*E^(r^2/4))) - 16*r^2*(-1/2*1/E^(r^2/4) + 
                    r^2/(4*E^(r^2/4))) + 32*r*(r/(2*E^(r^2/4)) - 
                    (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 
                  8*r^2*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - 
                    (r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/
                          (4*E^(r^2/4))))/2))/2))/r^2))*Cos[theta]*Sin[theta]*
             Sin[2*theta]*(-2 + 9.*^-16*(24/(E^(r^2/4)*r^3) - 
                 (3*((16*r)/E^(r^2/4) - (4*r^3)/E^(r^2/4)))/r^4 + 
                 (16/E^(r^2/4) - (16*r^2)/E^(r^2/4) + 8*r^2*
                    (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/r^3)^2*(1 + 
                3*Cos[2*theta]) - 1.5000000000000002*^-8*(168/(E^(r^2/4)*
                  r^3) - (21*((16*r)/E^(r^2/4) - (4*r^3)/E^(r^2/4)))/r^4 + 
                (9*(16/E^(r^2/4) - (16*r^2)/E^(r^2/4) + 8*r^2*
                    (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 - 
                (2*((-40*r)/E^(r^2/4) + (8*r^3)/E^(r^2/4) + 16*r*
                    (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 8*r^2*
                    (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/
                         (4*E^(r^2/4))))/2)))/r^2 + (-32/E^(r^2/4) + 
                  (32*r^2)/E^(r^2/4) + 32*(-1/2*1/E^(r^2/4) + r^2/
                     (4*E^(r^2/4))) - 16*r^2*(-1/2*1/E^(r^2/4) + 
                    r^2/(4*E^(r^2/4))) + 32*r*(r/(2*E^(r^2/4)) - 
                    (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 
                  8*r^2*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - 
                    (r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/
                          (4*E^(r^2/4))))/2))/2))/r)*Sin[theta]^2 - 
              3.0000000000000004*^-8*(24/(E^(r^2/4)*r^3) - 
                (3*((16*r)/E^(r^2/4) - (4*r^3)/E^(r^2/4)))/r^4 + 
                (16/E^(r^2/4) - (16*r^2)/E^(r^2/4) + 8*r^2*
                   (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/r^3)*(-1 + 
                3*Cos[2*theta] + 7.500000000000001*^-9*(168/(E^(r^2/4)*r^3) - 
                  (21*((16*r)/E^(r^2/4) - (4*r^3)/E^(r^2/4)))/r^4 + 
                  (9*(16/E^(r^2/4) - (16*r^2)/E^(r^2/4) + 8*r^2*
                      (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 - 
                  (2*((-40*r)/E^(r^2/4) + (8*r^3)/E^(r^2/4) + 16*r*
                      (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 8*r^2*
                      (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/
                          (4*E^(r^2/4))))/2)))/r^2 + (-32/E^(r^2/4) + 
                    (32*r^2)/E^(r^2/4) + 32*(-1/2*1/E^(r^2/4) + r^2/
                       (4*E^(r^2/4))) - 16*r^2*(-1/2*1/E^(r^2/4) + 
                      r^2/(4*E^(r^2/4))) + 32*r*(r/(2*E^(r^2/4)) - 
                      (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 
                    8*r^2*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - 
                      (r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/
                          (4*E^(r^2/4))))/2))/2))/r)*(1 + 3*Cos[2*theta])*
                 Sin[theta]^2) + 4.5*^-16*(-48/(E^(r^2/4)*r^3) + 
                 (6*((16*r)/E^(r^2/4) - (4*r^3)/E^(r^2/4)))/r^4 - 
                 (3*(16/E^(r^2/4) - (16*r^2)/E^(r^2/4) + 8*r^2*
                     (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + 
                 ((-40*r)/E^(r^2/4) + (8*r^3)/E^(r^2/4) + 16*r*
                    (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 8*r^2*
                    (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/
                         (4*E^(r^2/4))))/2))/r^2)^2*Sin[2*theta]^2)))/
          (r*(2 - 9.*^-16*(24/(E^(r^2/4)*r^3) - (3*((16*r)/E^(r^2/4) - 
                   (4*r^3)/E^(r^2/4)))/r^4 + (16/E^(r^2/4) - (16*r^2)/
                   E^(r^2/4) + 8*r^2*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/
                 r^3)^2*(1 + 3*Cos[2*theta]) + 1.5000000000000002*^-8*
              (168/(E^(r^2/4)*r^3) - (21*((16*r)/E^(r^2/4) - (4*r^3)/
                   E^(r^2/4)))/r^4 + (9*(16/E^(r^2/4) - (16*r^2)/E^(r^2/4) + 
                  8*r^2*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 - 
               (2*((-40*r)/E^(r^2/4) + (8*r^3)/E^(r^2/4) + 16*r*
                   (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 8*r^2*
                   (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/
                        (4*E^(r^2/4))))/2)))/r^2 + (-32/E^(r^2/4) + 
                 (32*r^2)/E^(r^2/4) + 32*(-1/2*1/E^(r^2/4) + 
                   r^2/(4*E^(r^2/4))) - 16*r^2*(-1/2*1/E^(r^2/4) + 
                   r^2/(4*E^(r^2/4))) + 32*r*(r/(2*E^(r^2/4)) - 
                   (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 
                 8*r^2*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - 
                   (r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/
                          (4*E^(r^2/4))))/2))/2))/r)*Sin[theta]^2 + 
             3.0000000000000004*^-8*(24/(E^(r^2/4)*r^3) - 
               (3*((16*r)/E^(r^2/4) - (4*r^3)/E^(r^2/4)))/r^4 + 
               (16/E^(r^2/4) - (16*r^2)/E^(r^2/4) + 8*r^2*(-1/2*1/E^(r^2/4) + 
                   r^2/(4*E^(r^2/4))))/r^3)*(-1 + 3*Cos[2*theta] + 
               7.500000000000001*^-9*(168/(E^(r^2/4)*r^3) - 
                 (21*((16*r)/E^(r^2/4) - (4*r^3)/E^(r^2/4)))/r^4 + 
                 (9*(16/E^(r^2/4) - (16*r^2)/E^(r^2/4) + 8*r^2*
                     (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 - 
                 (2*((-40*r)/E^(r^2/4) + (8*r^3)/E^(r^2/4) + 16*r*
                     (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 8*r^2*
                     (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/
                          (4*E^(r^2/4))))/2)))/r^2 + (-32/E^(r^2/4) + 
                   (32*r^2)/E^(r^2/4) + 32*(-1/2*1/E^(r^2/4) + r^2/
                      (4*E^(r^2/4))) - 16*r^2*(-1/2*1/E^(r^2/4) + 
                     r^2/(4*E^(r^2/4))) + 32*r*(r/(2*E^(r^2/4)) - 
                     (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 
                   8*r^2*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - 
                     (r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/
                          (4*E^(r^2/4))))/2))/2))/r)*(1 + 3*Cos[2*theta])*
                Sin[theta]^2) - 4.5*^-16*(-48/(E^(r^2/4)*r^3) + 
                (6*((16*r)/E^(r^2/4) - (4*r^3)/E^(r^2/4)))/r^4 - 
                (3*(16/E^(r^2/4) - (16*r^2)/E^(r^2/4) + 8*r^2*
                    (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + 
                ((-40*r)/E^(r^2/4) + (8*r^3)/E^(r^2/4) + 16*r*
                   (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 8*r^2*
                   (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/
                        (4*E^(r^2/4))))/2))/r^2)^2*Sin[2*theta]^2)^2) - 
         (2.5*^-9*(2*(9.000000000000001*^-8*(-120/(E^(r^2/4)*r^4) + 
                (15*((16*r)/E^(r^2/4) - (4*r^3)/E^(r^2/4)))/r^5 - 
                (6*(16/E^(r^2/4) - (16*r^2)/E^(r^2/4) + 8*r^2*
                    (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^4 + 
                ((-40*r)/E^(r^2/4) + (8*r^3)/E^(r^2/4) + 16*r*
                   (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 8*r^2*
                   (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/
                        (4*E^(r^2/4))))/2))/r^3)*((3*((16*r)/E^(r^2/4) - 
                   (4*r^3)/E^(r^2/4)))/r^5 - (3*(16/E^(r^2/4) - (16*r^2)/
                    E^(r^2/4) + 8*r^2*(-1/2*1/E^(r^2/4) + r^2/
                      (4*E^(r^2/4)))))/r^4 + ((-40*r)/E^(r^2/4) + 
                  (8*r^3)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + 
                    r^2/(4*E^(r^2/4))) + 8*r^2*(r/(2*E^(r^2/4)) - 
                    (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2))/r^3)*(1 + 
                3*Cos[2*theta]) + 3*((-15*((16*r)/E^(r^2/4) - (4*r^3)/
                    E^(r^2/4)))/r^6 + (15*(16/E^(r^2/4) - (16*r^2)/
                    E^(r^2/4) + 8*r^2*(-1/2*1/E^(r^2/4) + r^2/
                      (4*E^(r^2/4)))))/r^5 - (6*((-40*r)/E^(r^2/4) + 
                   (8*r^3)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + 
                     r^2/(4*E^(r^2/4))) + 8*r^2*(r/(2*E^(r^2/4)) - 
                     (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2)))/r^4 + 
                (-32/E^(r^2/4) + (32*r^2)/E^(r^2/4) + 32*(-1/2*1/E^(r^2/4) + 
                    r^2/(4*E^(r^2/4))) - 16*r^2*(-1/2*1/E^(r^2/4) + 
                    r^2/(4*E^(r^2/4))) + 32*r*(r/(2*E^(r^2/4)) - 
                    (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 
                  8*r^2*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - 
                    (r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/
                          (4*E^(r^2/4))))/2))/2))/r^3)*(2 + 
                3.0000000000000004*^-8*(24/(E^(r^2/4)*r^3) - 
                  (3*((16*r)/E^(r^2/4) - (4*r^3)/E^(r^2/4)))/r^4 + 
                  (16/E^(r^2/4) - (16*r^2)/E^(r^2/4) + 8*r^2*
                     (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/r^3)*
                 (1 + 3*Cos[2*theta])) + 6*Sin[theta]^2*(
                3.0000000000000004*^-8*(240/(E^(r^2/4)*r^4) - 
                  (30*((16*r)/E^(r^2/4) - (4*r^3)/E^(r^2/4)))/r^5 + 
                  (15*(16/E^(r^2/4) - (16*r^2)/E^(r^2/4) + 8*r^2*
                      (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^4 - 
                  (5*((-40*r)/E^(r^2/4) + (8*r^3)/E^(r^2/4) + 16*r*
                      (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 8*r^2*
                      (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/
                          (4*E^(r^2/4))))/2)))/r^3 + (-32/E^(r^2/4) + 
                    (32*r^2)/E^(r^2/4) + 32*(-1/2*1/E^(r^2/4) + r^2/
                       (4*E^(r^2/4))) - 16*r^2*(-1/2*1/E^(r^2/4) + 
                      r^2/(4*E^(r^2/4))) + 32*r*(r/(2*E^(r^2/4)) - 
                      (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 
                    8*r^2*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - 
                      (r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/
                          (4*E^(r^2/4))))/2))/2))/r^2)*
                 ((-6*((16*r)/E^(r^2/4) - (4*r^3)/E^(r^2/4)))/r^5 + 
                  (6*(16/E^(r^2/4) - (16*r^2)/E^(r^2/4) + 8*r^2*
                      (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^4 - 
                  (3*((-40*r)/E^(r^2/4) + (8*r^3)/E^(r^2/4) + 16*r*
                      (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 8*r^2*
                      (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/
                          (4*E^(r^2/4))))/2)))/r^3 + (-32/E^(r^2/4) + 
                    (32*r^2)/E^(r^2/4) + 32*(-1/2*1/E^(r^2/4) + r^2/
                       (4*E^(r^2/4))) - 16*r^2*(-1/2*1/E^(r^2/4) + 
                      r^2/(4*E^(r^2/4))) + 32*r*(r/(2*E^(r^2/4)) - 
                      (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 
                    8*r^2*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - 
                      (r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/
                          (4*E^(r^2/4))))/2))/2))/r^2)*Cos[theta]^2 + 
                3.0000000000000004*^-8*(-48/(E^(r^2/4)*r^3) + 
                  (6*((16*r)/E^(r^2/4) - (4*r^3)/E^(r^2/4)))/r^4 - 
                  (3*(16/E^(r^2/4) - (16*r^2)/E^(r^2/4) + 8*r^2*
                      (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + 
                  ((-40*r)/E^(r^2/4) + (8*r^3)/E^(r^2/4) + 16*r*
                     (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 8*r^2*
                     (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*r)/E^(r^2/4) - 
                     (4*r^3)/E^(r^2/4)))/r^6 - (30*(16/E^(r^2/4) - (16*r^2)/
                      E^(r^2/4) + 8*r^2*(-1/2*1/E^(r^2/4) + r^2/
                        (4*E^(r^2/4)))))/r^5 + (15*((-40*r)/E^(r^2/4) + 
                     (8*r^3)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + 
                       r^2/(4*E^(r^2/4))) + 8*r^2*(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*(-32/E^(r^2/4) + (32*r^2)/E^(r^2/4) + 32*
                      (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) - 16*r^2*
                      (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*r*
                      (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/
                          (4*E^(r^2/4))))/2) + 8*r^2*(3/(4*E^(r^2/4)) - 
                       (3*r^2)/(8*E^(r^2/4)) - (r*(r/(2*E^(r^2/4)) - 
                          (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2))/2)))/
                   r^3 + ((80*r)/E^(r^2/4) - (16*r^3)/E^(r^2/4) - 
                    32*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 
                    64*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/
                          (4*E^(r^2/4))))/2) - 16*r^2*(r/(2*E^(r^2/4)) - 
                      (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 
                    32*r*(1/(2*E^(r^2/4)) - r^2/(4*E^(r^2/4)) + 
                      (1/(2*E^(r^2/4)) - r^2/(4*E^(r^2/4)))/2 - 
                      (r*((3*r)/(4*E^(r^2/4)) - r^3/(8*E^(r^2/4))))/2) + 
                    16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - 
                      (r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/
                          (4*E^(r^2/4))))/2))/2) + 8*r^2*(-1/4*r/E^(r^2/4) + 
                      (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/4 + 
                      (3*(-1/2*r/E^(r^2/4) + (r*(-1/2*1/E^(r^2/4) + r^2/
                          (4*E^(r^2/4))))/2))/2 - (r*(3/(4*E^(r^2/4)) - 
                         (3*r^2)/(8*E^(r^2/4)) - (r*(r/(2*E^(r^2/4)) - 
                          (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2))/2))/
                       2))/r^2)*Cos[theta]^2 + 7.500000000000001*^-9*
                 (-120/(E^(r^2/4)*r^4) + (15*((16*r)/E^(r^2/4) - (4*r^3)/
                      E^(r^2/4)))/r^5 - (6*(16/E^(r^2/4) - (16*r^2)/
                      E^(r^2/4) + 8*r^2*(-1/2*1/E^(r^2/4) + r^2/
                        (4*E^(r^2/4)))))/r^4 + ((-40*r)/E^(r^2/4) + 
                    (8*r^3)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + 
                      r^2/(4*E^(r^2/4))) + 8*r^2*(r/(2*E^(r^2/4)) - 
                      (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2))/r^3)*
                 ((21*((16*r)/E^(r^2/4) - (4*r^3)/E^(r^2/4)))/r^5 - 
                  (21*(16/E^(r^2/4) - (16*r^2)/E^(r^2/4) + 8*r^2*
                      (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^4 + 
                  (9*((-40*r)/E^(r^2/4) + (8*r^3)/E^(r^2/4) + 16*r*
                      (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 8*r^2*
                      (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/
                          (4*E^(r^2/4))))/2)))/r^3 - (2*(-32/E^(r^2/4) + 
                     (32*r^2)/E^(r^2/4) + 32*(-1/2*1/E^(r^2/4) + r^2/
                        (4*E^(r^2/4))) - 16*r^2*(-1/2*1/E^(r^2/4) + 
                       r^2/(4*E^(r^2/4))) + 32*r*(r/(2*E^(r^2/4)) - 
                       (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 
                     8*r^2*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - 
                       (r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/
                          (4*E^(r^2/4))))/2))/2)))/r^2 + ((80*r)/E^(r^2/4) - 
                    (16*r^3)/E^(r^2/4) - 32*r*(-1/2*1/E^(r^2/4) + 
                      r^2/(4*E^(r^2/4))) + 64*(r/(2*E^(r^2/4)) - 
                      (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) - 
                    16*r^2*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + 
                         r^2/(4*E^(r^2/4))))/2) + 32*r*(1/(2*E^(r^2/4)) - 
                      r^2/(4*E^(r^2/4)) + (1/(2*E^(r^2/4)) - r^2/
                         (4*E^(r^2/4)))/2 - (r*((3*r)/(4*E^(r^2/4)) - 
                         r^3/(8*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - 
                      (3*r^2)/(8*E^(r^2/4)) - (r*(r/(2*E^(r^2/4)) - 
                         (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2))/2) + 
                    8*r^2*(-1/4*r/E^(r^2/4) + (r*(-1/2*1/E^(r^2/4) + 
                         r^2/(4*E^(r^2/4))))/4 + (3*(-1/2*r/E^(r^2/4) + 
                         (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2))/2 - 
                      (r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - 
                         (r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/
                          (4*E^(r^2/4))))/2))/2))/2))/r)*(-2 + 
                  3*Sin[theta]^2) + (((-105*((16*r)/E^(r^2/4) - (4*r^3)/
                       E^(r^2/4)))/r^6 + (105*(16/E^(r^2/4) - (16*r^2)/
                       E^(r^2/4) + 8*r^2*(-1/2*1/E^(r^2/4) + r^2/
                         (4*E^(r^2/4)))))/r^5 - (48*((-40*r)/E^(r^2/4) + 
                      (8*r^3)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + 
                        r^2/(4*E^(r^2/4))) + 8*r^2*(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*(-32/E^(r^2/4) + (32*r^2)/E^(r^2/4) + 32*
                       (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) - 16*r^2*
                       (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*r*
                       (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/
                          (4*E^(r^2/4))))/2) + 8*r^2*(3/(4*E^(r^2/4)) - 
                        (3*r^2)/(8*E^(r^2/4)) - (r*(r/(2*E^(r^2/4)) - 
                          (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2))/2)))/
                    r^3 - (3*((80*r)/E^(r^2/4) - (16*r^3)/E^(r^2/4) - 
                      32*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 
                      64*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/
                          (4*E^(r^2/4))))/2) - 16*r^2*(r/(2*E^(r^2/4)) - 
                        (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 
                      32*r*(1/(2*E^(r^2/4)) - r^2/(4*E^(r^2/4)) + 
                        (1/(2*E^(r^2/4)) - r^2/(4*E^(r^2/4)))/2 - 
                        (r*((3*r)/(4*E^(r^2/4)) - r^3/(8*E^(r^2/4))))/2) + 
                      16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - 
                        (r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/
                          (4*E^(r^2/4))))/2))/2) + 8*r^2*(-1/4*r/E^(r^2/4) + 
                        (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/4 + 
                        (3*(-1/2*r/E^(r^2/4) + (r*(-1/2*1/E^(r^2/4) + 
                          r^2/(4*E^(r^2/4))))/2))/2 - (r*(3/(4*E^(r^2/4)) - 
                          (3*r^2)/(8*E^(r^2/4)) - (r*(r/(2*E^(r^2/4)) - 
                          (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2))/2))/
                         2)))/r^2 + (64/E^(r^2/4) - (64*r^2)/E^(r^2/4) - 
                     64*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*r^2*
                      (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) - 64*r*
                      (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/
                          (4*E^(r^2/4))))/2) + 64*(1/(2*E^(r^2/4)) - 
                       r^2/(4*E^(r^2/4)) + (1/(2*E^(r^2/4)) - r^2/
                          (4*E^(r^2/4)))/2 - (r*((3*r)/(4*E^(r^2/4)) - 
                          r^3/(8*E^(r^2/4))))/2) + 48*(3/(4*E^(r^2/4)) - 
                       (3*r^2)/(8*E^(r^2/4)) - (r*(r/(2*E^(r^2/4)) - 
                          (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2))/2) - 
                     16*r^2*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - 
                       (r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/
                          (4*E^(r^2/4))))/2))/2) + 32*r*((-5*r)/
                        (4*E^(r^2/4)) + r^3/(8*E^(r^2/4)) + 
                       (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2 - 
                       (r*(3/(4*E^(r^2/4)) - (5*r^2)/(8*E^(r^2/4)) + 
                          (r^2*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/4))/
                        2) + 32*r*(-1/4*r/E^(r^2/4) + (r*(-1/2*1/E^(r^2/4) + 
                          r^2/(4*E^(r^2/4))))/4 + (3*(-1/2*r/E^(r^2/4) + 
                          (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2))/2 - 
                       (r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - 
                          (r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + 
                          r^2/(4*E^(r^2/4))))/2))/2))/2) + 8*r^2*
                      (-1/8*1/E^(r^2/4) + r^2/(16*E^(r^2/4)) + 
                       (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))/2 + 
                       (r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/
                          (4*E^(r^2/4))))/2))/4 + 2*(-3/(4*E^(r^2/4)) + 
                         (3*r^2)/(8*E^(r^2/4)) + (r*(r/(2*E^(r^2/4)) - 
                          (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2))/2) - 
                       (r*(-1/4*r/E^(r^2/4) + (r*(-1/2*1/E^(r^2/4) + r^2/
                          (4*E^(r^2/4))))/4 + (3*(-1/2*r/E^(r^2/4) + 
                          (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2))/2 - 
                          (r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - 
                          (r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/
                          (4*E^(r^2/4))))/2))/2))/2))/2))/r)*(-1 + 
                   3.0000000000000004*^-8*(24/(E^(r^2/4)*r^3) - 
                     (3*((16*r)/E^(r^2/4) - (4*r^3)/E^(r^2/4)))/r^4 + 
                     (16/E^(r^2/4) - (16*r^2)/E^(r^2/4) + 8*r^2*
                        (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/r^3)*
                    (-2 + 3*Sin[theta]^2)))/4))*(-2 + 9.*^-16*
               (24/(E^(r^2/4)*r^3) - (3*((16*r)/E^(r^2/4) - (4*r^3)/
                     E^(r^2/4)))/r^4 + (16/E^(r^2/4) - (16*r^2)/E^(r^2/4) + 
                   8*r^2*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/r^3)^2*(1 + 
                3*Cos[2*theta]) - 1.5000000000000002*^-8*(168/(E^(r^2/4)*
                  r^3) - (21*((16*r)/E^(r^2/4) - (4*r^3)/E^(r^2/4)))/r^4 + 
                (9*(16/E^(r^2/4) - (16*r^2)/E^(r^2/4) + 8*r^2*
                    (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 - 
                (2*((-40*r)/E^(r^2/4) + (8*r^3)/E^(r^2/4) + 16*r*
                    (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 8*r^2*
                    (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/
                         (4*E^(r^2/4))))/2)))/r^2 + (-32/E^(r^2/4) + 
                  (32*r^2)/E^(r^2/4) + 32*(-1/2*1/E^(r^2/4) + r^2/
                     (4*E^(r^2/4))) - 16*r^2*(-1/2*1/E^(r^2/4) + 
                    r^2/(4*E^(r^2/4))) + 32*r*(r/(2*E^(r^2/4)) - 
                    (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 
                  8*r^2*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - 
                    (r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/
                          (4*E^(r^2/4))))/2))/2))/r)*Sin[theta]^2 - 
              6.000000000000001*^-8*(24/(E^(r^2/4)*r^3) - 
                (3*((16*r)/E^(r^2/4) - (4*r^3)/E^(r^2/4)))/r^4 + 
                (16/E^(r^2/4) - (16*r^2)/E^(r^2/4) + 8*r^2*
                   (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/r^3)*(1 - 
                3*Sin[theta]^2 + 3.7500000000000005*^-9*(168/(E^(r^2/4)*
                    r^3) - (21*((16*r)/E^(r^2/4) - (4*r^3)/E^(r^2/4)))/r^4 + 
                  (9*(16/E^(r^2/4) - (16*r^2)/E^(r^2/4) + 8*r^2*
                      (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 - 
                  (2*((-40*r)/E^(r^2/4) + (8*r^3)/E^(r^2/4) + 16*r*
                      (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 8*r^2*
                      (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/
                          (4*E^(r^2/4))))/2)))/r^2 + (-32/E^(r^2/4) + 
                    (32*r^2)/E^(r^2/4) + 32*(-1/2*1/E^(r^2/4) + r^2/
                       (4*E^(r^2/4))) - 16*r^2*(-1/2*1/E^(r^2/4) + 
                      r^2/(4*E^(r^2/4))) + 32*r*(r/(2*E^(r^2/4)) - 
                      (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 
                    8*r^2*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - 
                      (r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/
                          (4*E^(r^2/4))))/2))/2))/r)*(1 + 3*Cos[2*theta])*
                 Sin[theta]^2) + 4.5*^-16*(-48/(E^(r^2/4)*r^3) + 
                 (6*((16*r)/E^(r^2/4) - (4*r^3)/E^(r^2/4)))/r^4 - 
                 (3*(16/E^(r^2/4) - (16*r^2)/E^(r^2/4) + 8*r^2*
                     (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + 
                 ((-40*r)/E^(r^2/4) + (8*r^3)/E^(r^2/4) + 16*r*
                    (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 8*r^2*
                    (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/
                         (4*E^(r^2/4))))/2))/r^2)^2*Sin[2*theta]^2) + 
            1.*^-8*((-3*(-840/(E^(r^2/4)*r^4) + (105*((16*r)/E^(r^2/4) - 
                    (4*r^3)/E^(r^2/4)))/r^5 - (48*(16/E^(r^2/4) - (16*r^2)/
                     E^(r^2/4) + 8*r^2*(-1/2*1/E^(r^2/4) + r^2/
                       (4*E^(r^2/4)))))/r^4 + (13*((-40*r)/E^(r^2/4) + 
                    (8*r^3)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + 
                      r^2/(4*E^(r^2/4))) + 8*r^2*(r/(2*E^(r^2/4)) - 
                      (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2)))/r^3 - 
                 (3*(-32/E^(r^2/4) + (32*r^2)/E^(r^2/4) + 
                    32*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) - 16*r^2*
                     (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*r*
                     (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/
                          (4*E^(r^2/4))))/2) + 8*r^2*(3/(4*E^(r^2/4)) - 
                      (3*r^2)/(8*E^(r^2/4)) - (r*(r/(2*E^(r^2/4)) - 
                         (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2))/2)))/
                  r^2 + ((80*r)/E^(r^2/4) - (16*r^3)/E^(r^2/4) - 
                   32*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 
                   64*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/
                         (4*E^(r^2/4))))/2) - 16*r^2*(r/(2*E^(r^2/4)) - 
                     (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 
                   32*r*(1/(2*E^(r^2/4)) - r^2/(4*E^(r^2/4)) + 
                     (1/(2*E^(r^2/4)) - r^2/(4*E^(r^2/4)))/2 - 
                     (r*((3*r)/(4*E^(r^2/4)) - r^3/(8*E^(r^2/4))))/2) + 
                   16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - 
                     (r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/
                          (4*E^(r^2/4))))/2))/2) + 8*r^2*(-1/4*r/E^(r^2/4) + 
                     (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/4 + 
                     (3*(-1/2*r/E^(r^2/4) + (r*(-1/2*1/E^(r^2/4) + r^2/
                          (4*E^(r^2/4))))/2))/2 - (r*(3/(4*E^(r^2/4)) - 
                        (3*r^2)/(8*E^(r^2/4)) - (r*(r/(2*E^(r^2/4)) - 
                          (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2))/2))/
                      2))/r)*(2 + 3.0000000000000004*^-8*(24/(E^(r^2/4)*
                     r^3) - (3*((16*r)/E^(r^2/4) - (4*r^3)/E^(r^2/4)))/r^4 + 
                   (16/E^(r^2/4) - (16*r^2)/E^(r^2/4) + 8*r^2*
                      (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/r^3)*
                  (1 + 3*Cos[2*theta]))*Sin[theta]^2)/4 + 
              3*(-120/(E^(r^2/4)*r^4) + (15*((16*r)/E^(r^2/4) - (4*r^3)/
                    E^(r^2/4)))/r^5 - (6*(16/E^(r^2/4) - (16*r^2)/E^(r^2/4) + 
                   8*r^2*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^4 + 
                ((-40*r)/E^(r^2/4) + (8*r^3)/E^(r^2/4) + 16*r*
                   (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 8*r^2*
                   (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/
                        (4*E^(r^2/4))))/2))/r^3)*(1 - 3*Cos[2*theta] + 
                6.000000000000001*^-8*(24/(E^(r^2/4)*r^3) - 
                  (3*((16*r)/E^(r^2/4) - (4*r^3)/E^(r^2/4)))/r^4 + 
                  (16/E^(r^2/4) - (16*r^2)/E^(r^2/4) + 8*r^2*
                     (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/r^3)*
                 (1 + 3*Cos[2*theta]) - 7.500000000000001*^-9*
                 (168/(E^(r^2/4)*r^3) - (21*((16*r)/E^(r^2/4) - (4*r^3)/
                      E^(r^2/4)))/r^4 + (9*(16/E^(r^2/4) - (16*r^2)/
                      E^(r^2/4) + 8*r^2*(-1/2*1/E^(r^2/4) + r^2/
                        (4*E^(r^2/4)))))/r^3 - (2*((-40*r)/E^(r^2/4) + 
                     (8*r^3)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + 
                       r^2/(4*E^(r^2/4))) + 8*r^2*(r/(2*E^(r^2/4)) - 
                       (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2)))/r^2 + 
                  (-32/E^(r^2/4) + (32*r^2)/E^(r^2/4) + 32*
                     (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) - 16*r^2*
                     (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*r*
                     (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/
                          (4*E^(r^2/4))))/2) + 8*r^2*(3/(4*E^(r^2/4)) - 
                      (3*r^2)/(8*E^(r^2/4)) - (r*(r/(2*E^(r^2/4)) - 
                         (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2))/2))/
                   r)*(1 + 3*Cos[2*theta])*Sin[theta]^2) + 
              9.*^-8*(-48/(E^(r^2/4)*r^3) + (6*((16*r)/E^(r^2/4) - 
                   (4*r^3)/E^(r^2/4)))/r^4 - (3*(16/E^(r^2/4) - (16*r^2)/
                    E^(r^2/4) + 8*r^2*(-1/2*1/E^(r^2/4) + r^2/
                      (4*E^(r^2/4)))))/r^3 + ((-40*r)/E^(r^2/4) + 
                  (8*r^3)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + 
                    r^2/(4*E^(r^2/4))) + 8*r^2*(r/(2*E^(r^2/4)) - 
                    (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2))/r^2)*(
                240/(E^(r^2/4)*r^4) - (30*((16*r)/E^(r^2/4) - (4*r^3)/
                    E^(r^2/4)))/r^5 + (15*(16/E^(r^2/4) - (16*r^2)/
                    E^(r^2/4) + 8*r^2*(-1/2*1/E^(r^2/4) + r^2/
                      (4*E^(r^2/4)))))/r^4 - (5*((-40*r)/E^(r^2/4) + 
                   (8*r^3)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + 
                     r^2/(4*E^(r^2/4))) + 8*r^2*(r/(2*E^(r^2/4)) - 
                     (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2)))/r^3 + 
                (-32/E^(r^2/4) + (32*r^2)/E^(r^2/4) + 32*(-1/2*1/E^(r^2/4) + 
                    r^2/(4*E^(r^2/4))) - 16*r^2*(-1/2*1/E^(r^2/4) + 
                    r^2/(4*E^(r^2/4))) + 32*r*(r/(2*E^(r^2/4)) - 
                    (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 
                  8*r^2*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - 
                    (r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/
                          (4*E^(r^2/4))))/2))/2))/r^2)*Sin[2*theta]^2)*
             (-6*((3*((16*r)/E^(r^2/4) - (4*r^3)/E^(r^2/4)))/r^5 - 
                (3*(16/E^(r^2/4) - (16*r^2)/E^(r^2/4) + 8*r^2*
                    (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^4 + 
                ((-40*r)/E^(r^2/4) + (8*r^3)/E^(r^2/4) + 16*r*
                   (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 8*r^2*
                   (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/
                        (4*E^(r^2/4))))/2))/r^3)*(2 + 3.0000000000000004*^-8*
                 (24/(E^(r^2/4)*r^3) - (3*((16*r)/E^(r^2/4) - (4*r^3)/
                      E^(r^2/4)))/r^4 + (16/E^(r^2/4) - (16*r^2)/E^(r^2/4) + 
                    8*r^2*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/r^3)*
                 (1 + 3*Cos[2*theta])) + (3*((21*((16*r)/E^(r^2/4) - 
                    (4*r^3)/E^(r^2/4)))/r^5 - (21*(16/E^(r^2/4) - (16*r^2)/
                     E^(r^2/4) + 8*r^2*(-1/2*1/E^(r^2/4) + r^2/
                       (4*E^(r^2/4)))))/r^4 + (9*((-40*r)/E^(r^2/4) + 
                    (8*r^3)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + 
                      r^2/(4*E^(r^2/4))) + 8*r^2*(r/(2*E^(r^2/4)) - 
                      (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2)))/r^3 - 
                 (2*(-32/E^(r^2/4) + (32*r^2)/E^(r^2/4) + 
                    32*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) - 16*r^2*
                     (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*r*
                     (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/
                          (4*E^(r^2/4))))/2) + 8*r^2*(3/(4*E^(r^2/4)) - 
                      (3*r^2)/(8*E^(r^2/4)) - (r*(r/(2*E^(r^2/4)) - 
                         (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2))/2)))/
                  r^2 + ((80*r)/E^(r^2/4) - (16*r^3)/E^(r^2/4) - 
                   32*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 
                   64*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/
                         (4*E^(r^2/4))))/2) - 16*r^2*(r/(2*E^(r^2/4)) - 
                     (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 
                   32*r*(1/(2*E^(r^2/4)) - r^2/(4*E^(r^2/4)) + 
                     (1/(2*E^(r^2/4)) - r^2/(4*E^(r^2/4)))/2 - 
                     (r*((3*r)/(4*E^(r^2/4)) - r^3/(8*E^(r^2/4))))/2) + 
                   16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - 
                     (r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/
                          (4*E^(r^2/4))))/2))/2) + 8*r^2*(-1/4*r/E^(r^2/4) + 
                     (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/4 + 
                     (3*(-1/2*r/E^(r^2/4) + (r*(-1/2*1/E^(r^2/4) + r^2/
                          (4*E^(r^2/4))))/2))/2 - (r*(3/(4*E^(r^2/4)) - 
                        (3*r^2)/(8*E^(r^2/4)) - (r*(r/(2*E^(r^2/4)) - 
                          (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2))/2))/
                      2))/r)*(2 + 3.0000000000000004*^-8*(24/(E^(r^2/4)*
                     r^3) - (3*((16*r)/E^(r^2/4) - (4*r^3)/E^(r^2/4)))/r^4 + 
                   (16/E^(r^2/4) - (16*r^2)/E^(r^2/4) + 8*r^2*
                      (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/r^3)*
                  (1 + 3*Cos[2*theta]))*Sin[theta]^2)/2 - 
              9.*^-8*(-48/(E^(r^2/4)*r^3) + (6*((16*r)/E^(r^2/4) - 
                   (4*r^3)/E^(r^2/4)))/r^4 - (3*(16/E^(r^2/4) - (16*r^2)/
                    E^(r^2/4) + 8*r^2*(-1/2*1/E^(r^2/4) + r^2/
                      (4*E^(r^2/4)))))/r^3 + ((-40*r)/E^(r^2/4) + 
                  (8*r^3)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + 
                    r^2/(4*E^(r^2/4))) + 8*r^2*(r/(2*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) - (4*r^3)/E^(r^2/4)))/r^5 + 
                (6*(16/E^(r^2/4) - (16*r^2)/E^(r^2/4) + 8*r^2*
                    (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^4 - 
                (3*((-40*r)/E^(r^2/4) + (8*r^3)/E^(r^2/4) + 16*r*
                    (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 8*r^2*
                    (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/
                         (4*E^(r^2/4))))/2)))/r^3 + (-32/E^(r^2/4) + 
                  (32*r^2)/E^(r^2/4) + 32*(-1/2*1/E^(r^2/4) + r^2/
                     (4*E^(r^2/4))) - 16*r^2*(-1/2*1/E^(r^2/4) + 
                    r^2/(4*E^(r^2/4))) + 32*r*(r/(2*E^(r^2/4)) - 
                    (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 
                  8*r^2*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - 
                    (r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/
                          (4*E^(r^2/4))))/2))/2))/r^2)*Sin[2*theta]^2)))/
          (2 - 9.*^-16*(24/(E^(r^2/4)*r^3) - (3*((16*r)/E^(r^2/4) - 
                  (4*r^3)/E^(r^2/4)))/r^4 + (16/E^(r^2/4) - (16*r^2)/
                  E^(r^2/4) + 8*r^2*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/
                r^3)^2*(1 + 3*Cos[2*theta]) + 1.5000000000000002*^-8*
             (168/(E^(r^2/4)*r^3) - (21*((16*r)/E^(r^2/4) - (4*r^3)/
                  E^(r^2/4)))/r^4 + (9*(16/E^(r^2/4) - (16*r^2)/E^(r^2/4) + 
                 8*r^2*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 - 
              (2*((-40*r)/E^(r^2/4) + (8*r^3)/E^(r^2/4) + 16*r*
                  (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 8*r^2*
                  (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/
                       (4*E^(r^2/4))))/2)))/r^2 + (-32/E^(r^2/4) + 
                (32*r^2)/E^(r^2/4) + 32*(-1/2*1/E^(r^2/4) + 
                  r^2/(4*E^(r^2/4))) - 16*r^2*(-1/2*1/E^(r^2/4) + 
                  r^2/(4*E^(r^2/4))) + 32*r*(r/(2*E^(r^2/4)) - 
                  (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 
                8*r^2*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - 
                  (r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/
                         (4*E^(r^2/4))))/2))/2))/r)*Sin[theta]^2 + 
            3.0000000000000004*^-8*(24/(E^(r^2/4)*r^3) - 
              (3*((16*r)/E^(r^2/4) - (4*r^3)/E^(r^2/4)))/r^4 + 
              (16/E^(r^2/4) - (16*r^2)/E^(r^2/4) + 8*r^2*(-1/2*1/E^(r^2/4) + 
                  r^2/(4*E^(r^2/4))))/r^3)*(-1 + 3*Cos[2*theta] + 
              7.500000000000001*^-9*(168/(E^(r^2/4)*r^3) - 
                (21*((16*r)/E^(r^2/4) - (4*r^3)/E^(r^2/4)))/r^4 + 
                (9*(16/E^(r^2/4) - (16*r^2)/E^(r^2/4) + 8*r^2*
                    (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 - 
                (2*((-40*r)/E^(r^2/4) + (8*r^3)/E^(r^2/4) + 16*r*
                    (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 8*r^2*
                    (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/
                         (4*E^(r^2/4))))/2)))/r^2 + (-32/E^(r^2/4) + 
                  (32*r^2)/E^(r^2/4) + 32*(-1/2*1/E^(r^2/4) + r^2/
                     (4*E^(r^2/4))) - 16*r^2*(-1/2*1/E^(r^2/4) + 
                    r^2/(4*E^(r^2/4))) + 32*r*(r/(2*E^(r^2/4)) - 
                    (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 
                  8*r^2*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - 
                    (r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/
                          (4*E^(r^2/4))))/2))/2))/r)*(1 + 3*Cos[2*theta])*
               Sin[theta]^2) - 4.5*^-16*(-48/(E^(r^2/4)*r^3) + 
               (6*((16*r)/E^(r^2/4) - (4*r^3)/E^(r^2/4)))/r^4 - 
               (3*(16/E^(r^2/4) - (16*r^2)/E^(r^2/4) + 8*r^2*
                   (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + 
               ((-40*r)/E^(r^2/4) + (8*r^3)/E^(r^2/4) + 16*r*
                  (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 8*r^2*
                  (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/
                       (4*E^(r^2/4))))/2))/r^2)^2*Sin[2*theta]^2)^2))/
      (2*Sqrt[2]*r) - 
     (r^2*(1 - 3.0000000000000004*^-8*(24/(E^(r^2/4)*r^3) - 
           (3*((16*r)/E^(r^2/4) - (4*r^3)/E^(r^2/4)))/r^4 + 
           (16/E^(r^2/4) - (16*r^2)/E^(r^2/4) + 8*r^2*(-1/2*1/E^(r^2/4) + r^2/
                (4*E^(r^2/4))))/r^3) + 7.500000000000001*^-9*
          (168/(E^(r^2/4)*r^3) - (21*((16*r)/E^(r^2/4) - (4*r^3)/E^(r^2/4)))/
            r^4 + (9*(16/E^(r^2/4) - (16*r^2)/E^(r^2/4) + 
              8*r^2*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 - 
           (2*((-40*r)/E^(r^2/4) + (8*r^3)/E^(r^2/4) + 
              16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 
              8*r^2*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + 
                   r^2/(4*E^(r^2/4))))/2)))/r^2 + 
           (-32/E^(r^2/4) + (32*r^2)/E^(r^2/4) + 32*(-1/2*1/E^(r^2/4) + r^2/
                (4*E^(r^2/4))) - 16*r^2*(-1/2*1/E^(r^2/4) + r^2/
                (4*E^(r^2/4))) + 32*r*(r/(2*E^(r^2/4)) - 
               (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 
             8*r^2*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - 
               (r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/
                      (4*E^(r^2/4))))/2))/2))/r)*Sin[theta]^2)*
        (-1/4*(r*(2 - 6.000000000000001*^-8*(24/(E^(r^2/4)*r^3) - 
                 (3*((16*r)/E^(r^2/4) - (4*r^3)/E^(r^2/4)))/r^4 + 
                 (16/E^(r^2/4) - (16*r^2)/E^(r^2/4) + 8*r^2*
                    (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/r^3) - 
               3.0000000000000004*^-8*r*(-120/(E^(r^2/4)*r^4) + 
                 (15*((16*r)/E^(r^2/4) - (4*r^3)/E^(r^2/4)))/r^5 - 
                 (6*(16/E^(r^2/4) - (16*r^2)/E^(r^2/4) + 8*r^2*
                     (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^4 + 
                 ((-40*r)/E^(r^2/4) + (8*r^3)/E^(r^2/4) + 16*r*
                    (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 8*r^2*
                    (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/
                         (4*E^(r^2/4))))/2))/r^3) + 1.5000000000000002*^-8*
                (168/(E^(r^2/4)*r^3) - (21*((16*r)/E^(r^2/4) - (4*r^3)/
                     E^(r^2/4)))/r^4 + (9*(16/E^(r^2/4) - (16*r^2)/
                     E^(r^2/4) + 8*r^2*(-1/2*1/E^(r^2/4) + r^2/
                       (4*E^(r^2/4)))))/r^3 - (2*((-40*r)/E^(r^2/4) + 
                    (8*r^3)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + 
                      r^2/(4*E^(r^2/4))) + 8*r^2*(r/(2*E^(r^2/4)) - 
                      (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2)))/r^2 + 
                 (-32/E^(r^2/4) + (32*r^2)/E^(r^2/4) + 32*(-1/2*1/E^(r^2/4) + 
                     r^2/(4*E^(r^2/4))) - 16*r^2*(-1/2*1/E^(r^2/4) + 
                     r^2/(4*E^(r^2/4))) + 32*r*(r/(2*E^(r^2/4)) - 
                     (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 
                   8*r^2*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - 
                     (r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/
                          (4*E^(r^2/4))))/2))/2))/r)*Sin[theta]^2 + 
               7.500000000000001*^-9*r*(-840/(E^(r^2/4)*r^4) + 
                 (105*((16*r)/E^(r^2/4) - (4*r^3)/E^(r^2/4)))/r^5 - 
                 (48*(16/E^(r^2/4) - (16*r^2)/E^(r^2/4) + 8*r^2*
                     (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^4 + 
                 (13*((-40*r)/E^(r^2/4) + (8*r^3)/E^(r^2/4) + 16*r*
                     (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 8*r^2*
                     (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/
                          (4*E^(r^2/4))))/2)))/r^3 - (3*(-32/E^(r^2/4) + 
                    (32*r^2)/E^(r^2/4) + 32*(-1/2*1/E^(r^2/4) + r^2/
                       (4*E^(r^2/4))) - 16*r^2*(-1/2*1/E^(r^2/4) + 
                      r^2/(4*E^(r^2/4))) + 32*r*(r/(2*E^(r^2/4)) - 
                      (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 
                    8*r^2*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - 
                      (r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/
                          (4*E^(r^2/4))))/2))/2)))/r^2 + ((80*r)/E^(r^2/4) - 
                   (16*r^3)/E^(r^2/4) - 32*r*(-1/2*1/E^(r^2/4) + 
                     r^2/(4*E^(r^2/4))) + 64*(r/(2*E^(r^2/4)) - 
                     (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) - 
                   16*r^2*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + 
                        r^2/(4*E^(r^2/4))))/2) + 32*r*(1/(2*E^(r^2/4)) - 
                     r^2/(4*E^(r^2/4)) + (1/(2*E^(r^2/4)) - r^2/
                        (4*E^(r^2/4)))/2 - (r*((3*r)/(4*E^(r^2/4)) - 
                        r^3/(8*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - 
                     (3*r^2)/(8*E^(r^2/4)) - (r*(r/(2*E^(r^2/4)) - 
                        (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2))/2) + 
                   8*r^2*(-1/4*r/E^(r^2/4) + (r*(-1/2*1/E^(r^2/4) + 
                        r^2/(4*E^(r^2/4))))/4 + (3*(-1/2*r/E^(r^2/4) + 
                        (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2))/2 - 
                     (r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - 
                        (r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/
                          (4*E^(r^2/4))))/2))/2))/2))/r)*Sin[theta]^2)*
              (-1 + 3.0000000000000004*^-8*(24/(E^(r^2/4)*r^3) - 
                 (3*((16*r)/E^(r^2/4) - (4*r^3)/E^(r^2/4)))/r^4 + 
                 (16/E^(r^2/4) - (16*r^2)/E^(r^2/4) + 8*r^2*
                    (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/r^3)*
                (-2 + 3*Sin[theta]^2)) + 1.35*^-15*r*(24/(E^(r^2/4)*r^3) - 
               (3*((16*r)/E^(r^2/4) - (4*r^3)/E^(r^2/4)))/r^4 + 
               (16/E^(r^2/4) - (16*r^2)/E^(r^2/4) + 8*r^2*(-1/2*1/E^(r^2/4) + 
                   r^2/(4*E^(r^2/4))))/r^3)*(-48/(E^(r^2/4)*r^3) + 
               (6*((16*r)/E^(r^2/4) - (4*r^3)/E^(r^2/4)))/r^4 - 
               (3*(16/E^(r^2/4) - (16*r^2)/E^(r^2/4) + 8*r^2*
                   (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + 
               ((-40*r)/E^(r^2/4) + (8*r^3)/E^(r^2/4) + 16*r*
                  (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 8*r^2*
                  (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/
                       (4*E^(r^2/4))))/2))/r^2)*Sin[2*theta]^2)^2/
           (r^4*(9.*^-16*(-48/(E^(r^2/4)*r^3) + (6*((16*r)/E^(r^2/4) - 
                    (4*r^3)/E^(r^2/4)))/r^4 - (3*(16/E^(r^2/4) - (16*r^2)/
                     E^(r^2/4) + 8*r^2*(-1/2*1/E^(r^2/4) + r^2/
                       (4*E^(r^2/4)))))/r^3 + ((-40*r)/E^(r^2/4) + 
                   (8*r^3)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + 
                     r^2/(4*E^(r^2/4))) + 8*r^2*(r/(2*E^(r^2/4)) - 
                     (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2))/r^2)^
                2*Cos[theta]^2*Sin[theta]^2 - (1 - 3.0000000000000004*^-8*
                 (24/(E^(r^2/4)*r^3) - (3*((16*r)/E^(r^2/4) - (4*r^3)/
                      E^(r^2/4)))/r^4 + (16/E^(r^2/4) - (16*r^2)/E^(r^2/4) + 
                    8*r^2*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/r^3) + 
                7.500000000000001*^-9*(168/(E^(r^2/4)*r^3) - 
                  (21*((16*r)/E^(r^2/4) - (4*r^3)/E^(r^2/4)))/r^4 + 
                  (9*(16/E^(r^2/4) - (16*r^2)/E^(r^2/4) + 8*r^2*
                      (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 - 
                  (2*((-40*r)/E^(r^2/4) + (8*r^3)/E^(r^2/4) + 16*r*
                      (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 8*r^2*
                      (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/
                          (4*E^(r^2/4))))/2)))/r^2 + (-32/E^(r^2/4) + 
                    (32*r^2)/E^(r^2/4) + 32*(-1/2*1/E^(r^2/4) + r^2/
                       (4*E^(r^2/4))) - 16*r^2*(-1/2*1/E^(r^2/4) + 
                      r^2/(4*E^(r^2/4))) + 32*r*(r/(2*E^(r^2/4)) - 
                      (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 
                    8*r^2*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - 
                      (r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/
                          (4*E^(r^2/4))))/2))/2))/r)*Sin[theta]^2)*(1 + 
                3.0000000000000004*^-8*(24/(E^(r^2/4)*r^3) - 
                  (3*((16*r)/E^(r^2/4) - (4*r^3)/E^(r^2/4)))/r^4 + 
                  (16/E^(r^2/4) - (16*r^2)/E^(r^2/4) + 8*r^2*
                     (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/r^3)*
                 (2 - 3*Sin[theta]^2)))^2) + (7.500000000000001*^-17*
           ((3*((16*r)/E^(r^2/4) - (4*r^3)/E^(r^2/4)))/r^5 - 
            (3*(16/E^(r^2/4) - (16*r^2)/E^(r^2/4) + 8*r^2*(-1/2*1/E^(r^2/4) + 
                 r^2/(4*E^(r^2/4)))))/r^4 + ((-40*r)/E^(r^2/4) + 
              (8*r^3)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + 
                r^2/(4*E^(r^2/4))) + 8*r^2*(r/(2*E^(r^2/4)) - 
                (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2))/r^3)*
           (1 + 3*Cos[2*theta])*((3*((3*((16*r)/E^(r^2/4) - (4*r^3)/
                   E^(r^2/4)))/r^5 - (3*(16/E^(r^2/4) - (16*r^2)/E^(r^2/4) + 
                  8*r^2*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^4 + 
               ((-40*r)/E^(r^2/4) + (8*r^3)/E^(r^2/4) + 16*r*
                  (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 8*r^2*
                  (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/
                       (4*E^(r^2/4))))/2))/r^3)*(2 + 3.0000000000000004*^-8*
                (24/(E^(r^2/4)*r^3) - (3*((16*r)/E^(r^2/4) - (4*r^3)/
                     E^(r^2/4)))/r^4 + (16/E^(r^2/4) - (16*r^2)/E^(r^2/4) + 
                   8*r^2*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/r^3)*
                (1 + 3*Cos[2*theta])))/2 + 3*Sin[theta]^2*
             (3.0000000000000004*^-8*(-48/(E^(r^2/4)*r^3) + 
                (6*((16*r)/E^(r^2/4) - (4*r^3)/E^(r^2/4)))/r^4 - 
                (3*(16/E^(r^2/4) - (16*r^2)/E^(r^2/4) + 8*r^2*
                    (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + 
                ((-40*r)/E^(r^2/4) + (8*r^3)/E^(r^2/4) + 16*r*
                   (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 8*r^2*
                   (r/(2*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) - 
                   (4*r^3)/E^(r^2/4)))/r^5 + (6*(16/E^(r^2/4) - (16*r^2)/
                    E^(r^2/4) + 8*r^2*(-1/2*1/E^(r^2/4) + r^2/
                      (4*E^(r^2/4)))))/r^4 - (3*((-40*r)/E^(r^2/4) + 
                   (8*r^3)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + 
                     r^2/(4*E^(r^2/4))) + 8*r^2*(r/(2*E^(r^2/4)) - 
                     (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2)))/r^3 + 
                (-32/E^(r^2/4) + (32*r^2)/E^(r^2/4) + 32*(-1/2*1/E^(r^2/4) + 
                    r^2/(4*E^(r^2/4))) - 16*r^2*(-1/2*1/E^(r^2/4) + 
                    r^2/(4*E^(r^2/4))) + 32*r*(r/(2*E^(r^2/4)) - 
                    (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 
                  8*r^2*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - 
                    (r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/
                          (4*E^(r^2/4))))/2))/2))/r^2)*Cos[theta]^2 + 
              (((21*((16*r)/E^(r^2/4) - (4*r^3)/E^(r^2/4)))/r^5 - 
                 (21*(16/E^(r^2/4) - (16*r^2)/E^(r^2/4) + 8*r^2*
                     (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^4 + 
                 (9*((-40*r)/E^(r^2/4) + (8*r^3)/E^(r^2/4) + 16*r*
                     (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 8*r^2*
                     (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/
                          (4*E^(r^2/4))))/2)))/r^3 - (2*(-32/E^(r^2/4) + 
                    (32*r^2)/E^(r^2/4) + 32*(-1/2*1/E^(r^2/4) + r^2/
                       (4*E^(r^2/4))) - 16*r^2*(-1/2*1/E^(r^2/4) + 
                      r^2/(4*E^(r^2/4))) + 32*r*(r/(2*E^(r^2/4)) - 
                      (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 
                    8*r^2*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - 
                      (r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/
                          (4*E^(r^2/4))))/2))/2)))/r^2 + ((80*r)/E^(r^2/4) - 
                   (16*r^3)/E^(r^2/4) - 32*r*(-1/2*1/E^(r^2/4) + 
                     r^2/(4*E^(r^2/4))) + 64*(r/(2*E^(r^2/4)) - 
                     (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) - 
                   16*r^2*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + 
                        r^2/(4*E^(r^2/4))))/2) + 32*r*(1/(2*E^(r^2/4)) - 
                     r^2/(4*E^(r^2/4)) + (1/(2*E^(r^2/4)) - r^2/
                        (4*E^(r^2/4)))/2 - (r*((3*r)/(4*E^(r^2/4)) - 
                        r^3/(8*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - 
                     (3*r^2)/(8*E^(r^2/4)) - (r*(r/(2*E^(r^2/4)) - 
                        (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2))/2) + 
                   8*r^2*(-1/4*r/E^(r^2/4) + (r*(-1/2*1/E^(r^2/4) + 
                        r^2/(4*E^(r^2/4))))/4 + (3*(-1/2*r/E^(r^2/4) + 
                        (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2))/2 - 
                     (r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - 
                        (r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/
                          (4*E^(r^2/4))))/2))/2))/2))/r)*(-1 + 
                 3.0000000000000004*^-8*(24/(E^(r^2/4)*r^3) - 
                   (3*((16*r)/E^(r^2/4) - (4*r^3)/E^(r^2/4)))/r^4 + 
                   (16/E^(r^2/4) - (16*r^2)/E^(r^2/4) + 8*r^2*
                      (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/r^3)*
                  (-2 + 3*Sin[theta]^2)))/4)))/
          (-2 + 9.*^-16*(24/(E^(r^2/4)*r^3) - (3*((16*r)/E^(r^2/4) - 
                 (4*r^3)/E^(r^2/4)))/r^4 + (16/E^(r^2/4) - (16*r^2)/
                 E^(r^2/4) + 8*r^2*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/r^
                3)^2*(1 + 3*Cos[2*theta]) - 1.5000000000000002*^-8*
            (168/(E^(r^2/4)*r^3) - (21*((16*r)/E^(r^2/4) - (4*r^3)/
                 E^(r^2/4)))/r^4 + (9*(16/E^(r^2/4) - (16*r^2)/E^(r^2/4) + 
                8*r^2*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 - 
             (2*((-40*r)/E^(r^2/4) + (8*r^3)/E^(r^2/4) + 16*r*
                 (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 8*r^2*
                 (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/
                      (4*E^(r^2/4))))/2)))/r^2 + (-32/E^(r^2/4) + (32*r^2)/
                E^(r^2/4) + 32*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) - 16*
                r^2*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*r*
                (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/
                  2) + 8*r^2*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - 
                 (r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/
                        (4*E^(r^2/4))))/2))/2))/r)*Sin[theta]^2 - 
           6.000000000000001*^-8*(24/(E^(r^2/4)*r^3) - 
             (3*((16*r)/E^(r^2/4) - (4*r^3)/E^(r^2/4)))/r^4 + 
             (16/E^(r^2/4) - (16*r^2)/E^(r^2/4) + 8*r^2*(-1/2*1/E^(r^2/4) + 
                 r^2/(4*E^(r^2/4))))/r^3)*(1 - 3*Sin[theta]^2 + 
             3.7500000000000005*^-9*(168/(E^(r^2/4)*r^3) - 
               (21*((16*r)/E^(r^2/4) - (4*r^3)/E^(r^2/4)))/r^4 + 
               (9*(16/E^(r^2/4) - (16*r^2)/E^(r^2/4) + 8*r^2*
                   (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 - 
               (2*((-40*r)/E^(r^2/4) + (8*r^3)/E^(r^2/4) + 16*r*
                   (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 8*r^2*
                   (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/
                        (4*E^(r^2/4))))/2)))/r^2 + (-32/E^(r^2/4) + 
                 (32*r^2)/E^(r^2/4) + 32*(-1/2*1/E^(r^2/4) + 
                   r^2/(4*E^(r^2/4))) - 16*r^2*(-1/2*1/E^(r^2/4) + 
                   r^2/(4*E^(r^2/4))) + 32*r*(r/(2*E^(r^2/4)) - 
                   (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 
                 8*r^2*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - 
                   (r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/
                          (4*E^(r^2/4))))/2))/2))/r)*(1 + 3*Cos[2*theta])*
              Sin[theta]^2) + 4.5*^-16*(-48/(E^(r^2/4)*r^3) + 
              (6*((16*r)/E^(r^2/4) - (4*r^3)/E^(r^2/4)))/r^4 - 
              (3*(16/E^(r^2/4) - (16*r^2)/E^(r^2/4) + 8*r^2*
                  (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + 
              ((-40*r)/E^(r^2/4) + (8*r^3)/E^(r^2/4) + 16*r*
                 (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 8*r^2*
                 (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/
                      (4*E^(r^2/4))))/2))/r^2)^2*Sin[2*theta]^2) + 
         (2.25*^-16*((-6*((16*r)/E^(r^2/4) - (4*r^3)/E^(r^2/4)))/r^5 + 
            (6*(16/E^(r^2/4) - (16*r^2)/E^(r^2/4) + 8*r^2*(-1/2*1/E^(r^2/4) + 
                 r^2/(4*E^(r^2/4)))))/r^4 - (3*((-40*r)/E^(r^2/4) + (8*r^3)/
                E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 8*
                r^2*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/
                     (4*E^(r^2/4))))/2)))/r^3 + (-32/E^(r^2/4) + 
              (32*r^2)/E^(r^2/4) + 32*(-1/2*1/E^(r^2/4) + 
                r^2/(4*E^(r^2/4))) - 16*r^2*(-1/2*1/E^(r^2/4) + 
                r^2/(4*E^(r^2/4))) + 32*r*(r/(2*E^(r^2/4)) - 
                (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 
              8*r^2*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - 
                (r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/
                       (4*E^(r^2/4))))/2))/2))/r^2)*Cos[theta]^2*
           (-3.0000000000000004*^-8*((3*((16*r)/E^(r^2/4) - (4*r^3)/
                  E^(r^2/4)))/r^5 - (3*(16/E^(r^2/4) - (16*r^2)/E^(r^2/4) + 
                 8*r^2*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^4 + 
              ((-40*r)/E^(r^2/4) + (8*r^3)/E^(r^2/4) + 16*r*
                 (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 8*r^2*
                 (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/
                      (4*E^(r^2/4))))/2))/r^3)*(-48/(E^(r^2/4)*r^3) + 
              (6*((16*r)/E^(r^2/4) - (4*r^3)/E^(r^2/4)))/r^4 - 
              (3*(16/E^(r^2/4) - (16*r^2)/E^(r^2/4) + 8*r^2*
                  (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + 
              ((-40*r)/E^(r^2/4) + (8*r^3)/E^(r^2/4) + 16*r*
                 (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 8*r^2*
                 (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/
                      (4*E^(r^2/4))))/2))/r^2)*(1 + 3*Cos[2*theta]) + 
            ((-6*((16*r)/E^(r^2/4) - (4*r^3)/E^(r^2/4)))/r^5 + 
              (6*(16/E^(r^2/4) - (16*r^2)/E^(r^2/4) + 8*r^2*
                  (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^4 - 
              (3*((-40*r)/E^(r^2/4) + (8*r^3)/E^(r^2/4) + 16*r*
                  (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 8*r^2*
                  (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/
                       (4*E^(r^2/4))))/2)))/r^3 + (-32/E^(r^2/4) + 
                (32*r^2)/E^(r^2/4) + 32*(-1/2*1/E^(r^2/4) + 
                  r^2/(4*E^(r^2/4))) - 16*r^2*(-1/2*1/E^(r^2/4) + 
                  r^2/(4*E^(r^2/4))) + 32*r*(r/(2*E^(r^2/4)) - 
                  (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 
                8*r^2*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - 
                  (r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/
                         (4*E^(r^2/4))))/2))/2))/r^2)*
             (2 + 3.0000000000000004*^-8*(24/(E^(r^2/4)*r^3) - 
                (3*((16*r)/E^(r^2/4) - (4*r^3)/E^(r^2/4)))/r^4 + 
                (16/E^(r^2/4) - (16*r^2)/E^(r^2/4) + 8*r^2*
                   (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/r^3)*(1 + 
                3*Cos[2*theta])))*Sin[theta]^2)/
          (-2 + 9.*^-16*(24/(E^(r^2/4)*r^3) - (3*((16*r)/E^(r^2/4) - 
                 (4*r^3)/E^(r^2/4)))/r^4 + (16/E^(r^2/4) - (16*r^2)/
                 E^(r^2/4) + 8*r^2*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/r^
                3)^2*(1 + 3*Cos[2*theta]) - 1.5000000000000002*^-8*
            (168/(E^(r^2/4)*r^3) - (21*((16*r)/E^(r^2/4) - (4*r^3)/
                 E^(r^2/4)))/r^4 + (9*(16/E^(r^2/4) - (16*r^2)/E^(r^2/4) + 
                8*r^2*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 - 
             (2*((-40*r)/E^(r^2/4) + (8*r^3)/E^(r^2/4) + 16*r*
                 (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 8*r^2*
                 (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/
                      (4*E^(r^2/4))))/2)))/r^2 + (-32/E^(r^2/4) + (32*r^2)/
                E^(r^2/4) + 32*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) - 16*
                r^2*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*r*
                (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/
                  2) + 8*r^2*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - 
                 (r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/
                        (4*E^(r^2/4))))/2))/2))/r)*Sin[theta]^2 - 
           3.0000000000000004*^-8*(24/(E^(r^2/4)*r^3) - 
             (3*((16*r)/E^(r^2/4) - (4*r^3)/E^(r^2/4)))/r^4 + 
             (16/E^(r^2/4) - (16*r^2)/E^(r^2/4) + 8*r^2*(-1/2*1/E^(r^2/4) + 
                 r^2/(4*E^(r^2/4))))/r^3)*(-1 + 3*Cos[2*theta] + 
             7.500000000000001*^-9*(168/(E^(r^2/4)*r^3) - 
               (21*((16*r)/E^(r^2/4) - (4*r^3)/E^(r^2/4)))/r^4 + 
               (9*(16/E^(r^2/4) - (16*r^2)/E^(r^2/4) + 8*r^2*
                   (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 - 
               (2*((-40*r)/E^(r^2/4) + (8*r^3)/E^(r^2/4) + 16*r*
                   (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 8*r^2*
                   (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/
                        (4*E^(r^2/4))))/2)))/r^2 + (-32/E^(r^2/4) + 
                 (32*r^2)/E^(r^2/4) + 32*(-1/2*1/E^(r^2/4) + 
                   r^2/(4*E^(r^2/4))) - 16*r^2*(-1/2*1/E^(r^2/4) + 
                   r^2/(4*E^(r^2/4))) + 32*r*(r/(2*E^(r^2/4)) - 
                   (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 
                 8*r^2*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - 
                   (r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/
                          (4*E^(r^2/4))))/2))/2))/r)*(1 + 3*Cos[2*theta])*
              Sin[theta]^2) + 4.5*^-16*(-48/(E^(r^2/4)*r^3) + 
              (6*((16*r)/E^(r^2/4) - (4*r^3)/E^(r^2/4)))/r^4 - 
              (3*(16/E^(r^2/4) - (16*r^2)/E^(r^2/4) + 8*r^2*
                  (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + 
              ((-40*r)/E^(r^2/4) + (8*r^3)/E^(r^2/4) + 16*r*
                 (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 8*r^2*
                 (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/
                      (4*E^(r^2/4))))/2))/r^2)^2*Sin[2*theta]^2) + 
         (2.25*^-16*Cos[theta]*(4*r*(240/(E^(r^2/4)*r^4) - 
              (30*((16*r)/E^(r^2/4) - (4*r^3)/E^(r^2/4)))/r^5 + 
              (15*(16/E^(r^2/4) - (16*r^2)/E^(r^2/4) + 8*r^2*
                  (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^4 - 
              (5*((-40*r)/E^(r^2/4) + (8*r^3)/E^(r^2/4) + 16*r*
                  (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 8*r^2*
                  (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/
                       (4*E^(r^2/4))))/2)))/r^3 + (-32/E^(r^2/4) + 
                (32*r^2)/E^(r^2/4) + 32*(-1/2*1/E^(r^2/4) + 
                  r^2/(4*E^(r^2/4))) - 16*r^2*(-1/2*1/E^(r^2/4) + 
                  r^2/(4*E^(r^2/4))) + 32*r*(r/(2*E^(r^2/4)) - 
                  (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 
                8*r^2*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - 
                  (r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/
                         (4*E^(r^2/4))))/2))/2))/r^2) - 
            1.8*^-7*(24/(E^(r^2/4)*r^3) - (3*((16*r)/E^(r^2/4) - (4*r^3)/
                   E^(r^2/4)))/r^4 + (16/E^(r^2/4) - (16*r^2)/E^(r^2/4) + 
                 8*r^2*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/r^3)^2*
             (1 + 3*Cos[2*theta]) - (-48/(E^(r^2/4)*r^3) + 
              (6*((16*r)/E^(r^2/4) - (4*r^3)/E^(r^2/4)))/r^4 - 
              (3*(16/E^(r^2/4) - (16*r^2)/E^(r^2/4) + 8*r^2*
                  (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + 
              ((-40*r)/E^(r^2/4) + (8*r^3)/E^(r^2/4) + 16*r*
                 (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 8*r^2*
                 (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/
                      (4*E^(r^2/4))))/2))/r^2)*(-4 + 3.0000000000000004*^-8*r*
               (-120/(E^(r^2/4)*r^4) + (15*((16*r)/E^(r^2/4) - (4*r^3)/
                    E^(r^2/4)))/r^5 - (6*(16/E^(r^2/4) - (16*r^2)/E^(r^2/4) + 
                   8*r^2*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^4 + 
                ((-40*r)/E^(r^2/4) + (8*r^3)/E^(r^2/4) + 16*r*
                   (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 8*r^2*
                   (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/
                        (4*E^(r^2/4))))/2))/r^3)*(1 + 3*Cos[2*theta])) + 
            6*(24/(E^(r^2/4)*r^3) - (3*((16*r)/E^(r^2/4) - (4*r^3)/
                  E^(r^2/4)))/r^4 + (16/E^(r^2/4) - (16*r^2)/E^(r^2/4) + 
                8*r^2*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/r^3)*
             (-2 + 1.*^-8*(-48/(E^(r^2/4)*r^3) + (6*((16*r)/E^(r^2/4) - 
                   (4*r^3)/E^(r^2/4)))/r^4 - (3*(16/E^(r^2/4) - (16*r^2)/
                    E^(r^2/4) + 8*r^2*(-1/2*1/E^(r^2/4) + r^2/
                      (4*E^(r^2/4)))))/r^3 + ((-40*r)/E^(r^2/4) + 
                  (8*r^3)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + 
                    r^2/(4*E^(r^2/4))) + 8*r^2*(r/(2*E^(r^2/4)) - 
                    (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2))/r^2)*(1 + 
                3*Cos[2*theta]) + 1.*^-8*r*(240/(E^(r^2/4)*r^4) - 
                (30*((16*r)/E^(r^2/4) - (4*r^3)/E^(r^2/4)))/r^5 + 
                (15*(16/E^(r^2/4) - (16*r^2)/E^(r^2/4) + 8*r^2*
                    (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^4 - 
                (5*((-40*r)/E^(r^2/4) + (8*r^3)/E^(r^2/4) + 16*r*
                    (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 8*r^2*
                    (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/
                         (4*E^(r^2/4))))/2)))/r^3 + (-32/E^(r^2/4) + 
                  (32*r^2)/E^(r^2/4) + 32*(-1/2*1/E^(r^2/4) + r^2/
                     (4*E^(r^2/4))) - 16*r^2*(-1/2*1/E^(r^2/4) + 
                    r^2/(4*E^(r^2/4))) + 32*r*(r/(2*E^(r^2/4)) - 
                    (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 
                  8*r^2*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - 
                    (r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/
                          (4*E^(r^2/4))))/2))/2))/r^2)*(1 + 3*Cos[2*theta])))*
           Sin[theta]*(-1.8*^-7*(24/(E^(r^2/4)*r^3) - (3*((16*r)/E^(r^2/4) - 
                  (4*r^3)/E^(r^2/4)))/r^4 + (16/E^(r^2/4) - (16*r^2)/
                  E^(r^2/4) + 8*r^2*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/
                r^3)^2 + 6*(24/(E^(r^2/4)*r^3) - (3*((16*r)/E^(r^2/4) - 
                 (4*r^3)/E^(r^2/4)))/r^4 + (16/E^(r^2/4) - (16*r^2)/
                 E^(r^2/4) + 8*r^2*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/r^
                3)*(1 + 1.*^-8*(-48/(E^(r^2/4)*r^3) + (6*((16*r)/E^(r^2/4) - 
                   (4*r^3)/E^(r^2/4)))/r^4 - (3*(16/E^(r^2/4) - (16*r^2)/
                    E^(r^2/4) + 8*r^2*(-1/2*1/E^(r^2/4) + r^2/
                      (4*E^(r^2/4)))))/r^3 + ((-40*r)/E^(r^2/4) + 
                  (8*r^3)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + 
                    r^2/(4*E^(r^2/4))) + 8*r^2*(r/(2*E^(r^2/4)) - 
                    (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2))/r^2) + 
              7.500000000000001*^-9*(168/(E^(r^2/4)*r^3) - 
                (21*((16*r)/E^(r^2/4) - (4*r^3)/E^(r^2/4)))/r^4 + 
                (9*(16/E^(r^2/4) - (16*r^2)/E^(r^2/4) + 8*r^2*
                    (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 - 
                (2*((-40*r)/E^(r^2/4) + (8*r^3)/E^(r^2/4) + 16*r*
                    (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 8*r^2*
                    (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/
                         (4*E^(r^2/4))))/2)))/r^2 + (-32/E^(r^2/4) + 
                  (32*r^2)/E^(r^2/4) + 32*(-1/2*1/E^(r^2/4) + r^2/
                     (4*E^(r^2/4))) - 16*r^2*(-1/2*1/E^(r^2/4) + 
                    r^2/(4*E^(r^2/4))) + 32*r*(r/(2*E^(r^2/4)) - 
                    (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 
                  8*r^2*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - 
                    (r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/
                          (4*E^(r^2/4))))/2))/2))/r)*Sin[theta]^2) + 
            (-48/(E^(r^2/4)*r^3) + (6*((16*r)/E^(r^2/4) - (4*r^3)/E^(r^2/4)))/
               r^4 - (3*(16/E^(r^2/4) - (16*r^2)/E^(r^2/4) + 8*r^2*
                  (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + 
              ((-40*r)/E^(r^2/4) + (8*r^3)/E^(r^2/4) + 16*r*
                 (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 8*r^2*
                 (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/
                      (4*E^(r^2/4))))/2))/r^2)*(-2 + 3.0000000000000004*^-8*r*
               (-120/(E^(r^2/4)*r^4) + (15*((16*r)/E^(r^2/4) - (4*r^3)/
                    E^(r^2/4)))/r^5 - (6*(16/E^(r^2/4) - (16*r^2)/E^(r^2/4) + 
                   8*r^2*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^4 + 
                ((-40*r)/E^(r^2/4) + (8*r^3)/E^(r^2/4) + 16*r*
                   (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 8*r^2*
                   (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/
                        (4*E^(r^2/4))))/2))/r^3) - 1.5000000000000002*^-8*(
                168/(E^(r^2/4)*r^3) - (21*((16*r)/E^(r^2/4) - (4*r^3)/
                    E^(r^2/4)))/r^4 + (9*(16/E^(r^2/4) - (16*r^2)/E^(r^2/4) + 
                   8*r^2*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 - 
                (2*((-40*r)/E^(r^2/4) + (8*r^3)/E^(r^2/4) + 16*r*
                    (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 8*r^2*
                    (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/
                         (4*E^(r^2/4))))/2)))/r^2 + (-32/E^(r^2/4) + 
                  (32*r^2)/E^(r^2/4) + 32*(-1/2*1/E^(r^2/4) + r^2/
                     (4*E^(r^2/4))) - 16*r^2*(-1/2*1/E^(r^2/4) + 
                    r^2/(4*E^(r^2/4))) + 32*r*(r/(2*E^(r^2/4)) - 
                    (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 
                  8*r^2*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - 
                    (r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/
                          (4*E^(r^2/4))))/2))/2))/r)*Sin[theta]^2 - 
              7.500000000000001*^-9*r*(-840/(E^(r^2/4)*r^4) + 
                (105*((16*r)/E^(r^2/4) - (4*r^3)/E^(r^2/4)))/r^5 - 
                (48*(16/E^(r^2/4) - (16*r^2)/E^(r^2/4) + 8*r^2*
                    (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^4 + 
                (13*((-40*r)/E^(r^2/4) + (8*r^3)/E^(r^2/4) + 16*r*
                    (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 8*r^2*
                    (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/
                         (4*E^(r^2/4))))/2)))/r^3 - (3*(-32/E^(r^2/4) + 
                   (32*r^2)/E^(r^2/4) + 32*(-1/2*1/E^(r^2/4) + r^2/
                      (4*E^(r^2/4))) - 16*r^2*(-1/2*1/E^(r^2/4) + 
                     r^2/(4*E^(r^2/4))) + 32*r*(r/(2*E^(r^2/4)) - 
                     (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 
                   8*r^2*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - 
                     (r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/
                          (4*E^(r^2/4))))/2))/2)))/r^2 + ((80*r)/E^(r^2/4) - 
                  (16*r^3)/E^(r^2/4) - 32*r*(-1/2*1/E^(r^2/4) + 
                    r^2/(4*E^(r^2/4))) + 64*(r/(2*E^(r^2/4)) - 
                    (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) - 
                  16*r^2*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + 
                       r^2/(4*E^(r^2/4))))/2) + 32*r*(1/(2*E^(r^2/4)) - 
                    r^2/(4*E^(r^2/4)) + (1/(2*E^(r^2/4)) - r^2/(4*E^(r^2/4)))/
                     2 - (r*((3*r)/(4*E^(r^2/4)) - r^3/(8*E^(r^2/4))))/2) + 
                  16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - 
                    (r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/
                          (4*E^(r^2/4))))/2))/2) + 8*r^2*(-1/4*r/E^(r^2/4) + 
                    (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/4 + 
                    (3*(-1/2*r/E^(r^2/4) + (r*(-1/2*1/E^(r^2/4) + r^2/
                          (4*E^(r^2/4))))/2))/2 - (r*(3/(4*E^(r^2/4)) - 
                       (3*r^2)/(8*E^(r^2/4)) - (r*(r/(2*E^(r^2/4)) - 
                          (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2))/2))/
                     2))/r)*Sin[theta]^2))*Sin[2*theta])/
          (r^2*(2 - 9.*^-16*(24/(E^(r^2/4)*r^3) - (3*((16*r)/E^(r^2/4) - 
                  (4*r^3)/E^(r^2/4)))/r^4 + (16/E^(r^2/4) - (16*r^2)/
                  E^(r^2/4) + 8*r^2*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/
                r^3)^2*(1 + 3*Cos[2*theta]) + 1.5000000000000002*^-8*
             (168/(E^(r^2/4)*r^3) - (21*((16*r)/E^(r^2/4) - (4*r^3)/
                  E^(r^2/4)))/r^4 + (9*(16/E^(r^2/4) - (16*r^2)/E^(r^2/4) + 
                 8*r^2*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 - 
              (2*((-40*r)/E^(r^2/4) + (8*r^3)/E^(r^2/4) + 16*r*
                  (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 8*r^2*
                  (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/
                       (4*E^(r^2/4))))/2)))/r^2 + (-32/E^(r^2/4) + 
                (32*r^2)/E^(r^2/4) + 32*(-1/2*1/E^(r^2/4) + 
                  r^2/(4*E^(r^2/4))) - 16*r^2*(-1/2*1/E^(r^2/4) + 
                  r^2/(4*E^(r^2/4))) + 32*r*(r/(2*E^(r^2/4)) - 
                  (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 
                8*r^2*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - 
                  (r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/
                         (4*E^(r^2/4))))/2))/2))/r)*Sin[theta]^2 + 
            3.0000000000000004*^-8*(24/(E^(r^2/4)*r^3) - 
              (3*((16*r)/E^(r^2/4) - (4*r^3)/E^(r^2/4)))/r^4 + 
              (16/E^(r^2/4) - (16*r^2)/E^(r^2/4) + 8*r^2*(-1/2*1/E^(r^2/4) + 
                  r^2/(4*E^(r^2/4))))/r^3)*(-1 + 3*Cos[2*theta] + 
              7.500000000000001*^-9*(168/(E^(r^2/4)*r^3) - 
                (21*((16*r)/E^(r^2/4) - (4*r^3)/E^(r^2/4)))/r^4 + 
                (9*(16/E^(r^2/4) - (16*r^2)/E^(r^2/4) + 8*r^2*
                    (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 - 
                (2*((-40*r)/E^(r^2/4) + (8*r^3)/E^(r^2/4) + 16*r*
                    (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 8*r^2*
                    (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/
                         (4*E^(r^2/4))))/2)))/r^2 + (-32/E^(r^2/4) + 
                  (32*r^2)/E^(r^2/4) + 32*(-1/2*1/E^(r^2/4) + r^2/
                     (4*E^(r^2/4))) - 16*r^2*(-1/2*1/E^(r^2/4) + 
                    r^2/(4*E^(r^2/4))) + 32*r*(r/(2*E^(r^2/4)) - 
                    (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 
                  8*r^2*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - 
                    (r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/
                          (4*E^(r^2/4))))/2))/2))/r)*(1 + 3*Cos[2*theta])*
               Sin[theta]^2) - 4.5*^-16*(-48/(E^(r^2/4)*r^3) + 
               (6*((16*r)/E^(r^2/4) - (4*r^3)/E^(r^2/4)))/r^4 - 
               (3*(16/E^(r^2/4) - (16*r^2)/E^(r^2/4) + 8*r^2*
                   (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + 
               ((-40*r)/E^(r^2/4) + (8*r^3)/E^(r^2/4) + 16*r*
                  (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 8*r^2*
                  (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/
                       (4*E^(r^2/4))))/2))/r^2)^2*Sin[2*theta]^2)*
           (-2 + 9.*^-16*(24/(E^(r^2/4)*r^3) - (3*((16*r)/E^(r^2/4) - 
                  (4*r^3)/E^(r^2/4)))/r^4 + (16/E^(r^2/4) - (16*r^2)/
                  E^(r^2/4) + 8*r^2*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/
                r^3)^2*(1 + 3*Cos[2*theta]) - 1.5000000000000002*^-8*
             (168/(E^(r^2/4)*r^3) - (21*((16*r)/E^(r^2/4) - (4*r^3)/
                  E^(r^2/4)))/r^4 + (9*(16/E^(r^2/4) - (16*r^2)/E^(r^2/4) + 
                 8*r^2*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 - 
              (2*((-40*r)/E^(r^2/4) + (8*r^3)/E^(r^2/4) + 16*r*
                  (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 8*r^2*
                  (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/
                       (4*E^(r^2/4))))/2)))/r^2 + (-32/E^(r^2/4) + 
                (32*r^2)/E^(r^2/4) + 32*(-1/2*1/E^(r^2/4) + 
                  r^2/(4*E^(r^2/4))) - 16*r^2*(-1/2*1/E^(r^2/4) + 
                  r^2/(4*E^(r^2/4))) + 32*r*(r/(2*E^(r^2/4)) - 
                  (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 
                8*r^2*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - 
                  (r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/
                         (4*E^(r^2/4))))/2))/2))/r)*Sin[theta]^2 - 
            3.0000000000000004*^-8*(24/(E^(r^2/4)*r^3) - 
              (3*((16*r)/E^(r^2/4) - (4*r^3)/E^(r^2/4)))/r^4 + 
              (16/E^(r^2/4) - (16*r^2)/E^(r^2/4) + 8*r^2*(-1/2*1/E^(r^2/4) + 
                  r^2/(4*E^(r^2/4))))/r^3)*(-1 + 3*Cos[2*theta] + 
              7.500000000000001*^-9*(168/(E^(r^2/4)*r^3) - 
                (21*((16*r)/E^(r^2/4) - (4*r^3)/E^(r^2/4)))/r^4 + 
                (9*(16/E^(r^2/4) - (16*r^2)/E^(r^2/4) + 8*r^2*
                    (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 - 
                (2*((-40*r)/E^(r^2/4) + (8*r^3)/E^(r^2/4) + 16*r*
                    (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 8*r^2*
                    (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/
                         (4*E^(r^2/4))))/2)))/r^2 + (-32/E^(r^2/4) + 
                  (32*r^2)/E^(r^2/4) + 32*(-1/2*1/E^(r^2/4) + r^2/
                     (4*E^(r^2/4))) - 16*r^2*(-1/2*1/E^(r^2/4) + 
                    r^2/(4*E^(r^2/4))) + 32*r*(r/(2*E^(r^2/4)) - 
                    (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 
                  8*r^2*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - 
                    (r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/
                          (4*E^(r^2/4))))/2))/2))/r)*(1 + 3*Cos[2*theta])*
               Sin[theta]^2) + 4.5*^-16*(-48/(E^(r^2/4)*r^3) + 
               (6*((16*r)/E^(r^2/4) - (4*r^3)/E^(r^2/4)))/r^4 - 
               (3*(16/E^(r^2/4) - (16*r^2)/E^(r^2/4) + 8*r^2*
                   (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + 
               ((-40*r)/E^(r^2/4) + (8*r^3)/E^(r^2/4) + 16*r*
                  (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 8*r^2*
                  (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/
                       (4*E^(r^2/4))))/2))/r^2)^2*Sin[2*theta]^2)) - 
         (2.25*^-16*Cos[theta]*(4*r*(240/(E^(r^2/4)*r^4) - 
              (30*((16*r)/E^(r^2/4) - (4*r^3)/E^(r^2/4)))/r^5 + 
              (15*(16/E^(r^2/4) - (16*r^2)/E^(r^2/4) + 8*r^2*
                  (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^4 - 
              (5*((-40*r)/E^(r^2/4) + (8*r^3)/E^(r^2/4) + 16*r*
                  (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 8*r^2*
                  (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/
                       (4*E^(r^2/4))))/2)))/r^3 + (-32/E^(r^2/4) + 
                (32*r^2)/E^(r^2/4) + 32*(-1/2*1/E^(r^2/4) + 
                  r^2/(4*E^(r^2/4))) - 16*r^2*(-1/2*1/E^(r^2/4) + 
                  r^2/(4*E^(r^2/4))) + 32*r*(r/(2*E^(r^2/4)) - 
                  (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 
                8*r^2*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - 
                  (r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/
                         (4*E^(r^2/4))))/2))/2))/r^2) - 
            1.8*^-7*(24/(E^(r^2/4)*r^3) - (3*((16*r)/E^(r^2/4) - (4*r^3)/
                   E^(r^2/4)))/r^4 + (16/E^(r^2/4) - (16*r^2)/E^(r^2/4) + 
                 8*r^2*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/r^3)^2*
             (1 + 3*Cos[2*theta]) - (-48/(E^(r^2/4)*r^3) + 
              (6*((16*r)/E^(r^2/4) - (4*r^3)/E^(r^2/4)))/r^4 - 
              (3*(16/E^(r^2/4) - (16*r^2)/E^(r^2/4) + 8*r^2*
                  (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + 
              ((-40*r)/E^(r^2/4) + (8*r^3)/E^(r^2/4) + 16*r*
                 (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 8*r^2*
                 (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/
                      (4*E^(r^2/4))))/2))/r^2)*(-4 + 3.0000000000000004*^-8*r*
               (-120/(E^(r^2/4)*r^4) + (15*((16*r)/E^(r^2/4) - (4*r^3)/
                    E^(r^2/4)))/r^5 - (6*(16/E^(r^2/4) - (16*r^2)/E^(r^2/4) + 
                   8*r^2*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^4 + 
                ((-40*r)/E^(r^2/4) + (8*r^3)/E^(r^2/4) + 16*r*
                   (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 8*r^2*
                   (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/
                        (4*E^(r^2/4))))/2))/r^3)*(1 + 3*Cos[2*theta])) + 
            6*(24/(E^(r^2/4)*r^3) - (3*((16*r)/E^(r^2/4) - (4*r^3)/
                  E^(r^2/4)))/r^4 + (16/E^(r^2/4) - (16*r^2)/E^(r^2/4) + 
                8*r^2*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/r^3)*
             (-2 + 1.*^-8*(-48/(E^(r^2/4)*r^3) + (6*((16*r)/E^(r^2/4) - 
                   (4*r^3)/E^(r^2/4)))/r^4 - (3*(16/E^(r^2/4) - (16*r^2)/
                    E^(r^2/4) + 8*r^2*(-1/2*1/E^(r^2/4) + r^2/
                      (4*E^(r^2/4)))))/r^3 + ((-40*r)/E^(r^2/4) + 
                  (8*r^3)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + 
                    r^2/(4*E^(r^2/4))) + 8*r^2*(r/(2*E^(r^2/4)) - 
                    (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2))/r^2)*(1 + 
                3*Cos[2*theta]) + 1.*^-8*r*(240/(E^(r^2/4)*r^4) - 
                (30*((16*r)/E^(r^2/4) - (4*r^3)/E^(r^2/4)))/r^5 + 
                (15*(16/E^(r^2/4) - (16*r^2)/E^(r^2/4) + 8*r^2*
                    (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^4 - 
                (5*((-40*r)/E^(r^2/4) + (8*r^3)/E^(r^2/4) + 16*r*
                    (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 8*r^2*
                    (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/
                         (4*E^(r^2/4))))/2)))/r^3 + (-32/E^(r^2/4) + 
                  (32*r^2)/E^(r^2/4) + 32*(-1/2*1/E^(r^2/4) + r^2/
                     (4*E^(r^2/4))) - 16*r^2*(-1/2*1/E^(r^2/4) + 
                    r^2/(4*E^(r^2/4))) + 32*r*(r/(2*E^(r^2/4)) - 
                    (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 
                  8*r^2*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - 
                    (r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/
                          (4*E^(r^2/4))))/2))/2))/r^2)*(1 + 3*Cos[2*theta])))*
           Sin[theta]*(6.000000000000001*^-8*(-48/(E^(r^2/4)*r^3) + 
               (6*((16*r)/E^(r^2/4) - (4*r^3)/E^(r^2/4)))/r^4 - 
               (3*(16/E^(r^2/4) - (16*r^2)/E^(r^2/4) + 8*r^2*
                   (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + 
               ((-40*r)/E^(r^2/4) + (8*r^3)/E^(r^2/4) + 16*r*
                  (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 8*r^2*
                  (r/(2*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] - 
            ((168/(E^(r^2/4)*r^3) - (21*((16*r)/E^(r^2/4) - (4*r^3)/
                   E^(r^2/4)))/r^4 + (9*(16/E^(r^2/4) - (16*r^2)/E^(r^2/4) + 
                  8*r^2*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 - 
               (2*((-40*r)/E^(r^2/4) + (8*r^3)/E^(r^2/4) + 16*r*
                   (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 8*r^2*
                   (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/
                        (4*E^(r^2/4))))/2)))/r^2 + (-32/E^(r^2/4) + 
                 (32*r^2)/E^(r^2/4) + 32*(-1/2*1/E^(r^2/4) + 
                   r^2/(4*E^(r^2/4))) - 16*r^2*(-1/2*1/E^(r^2/4) + 
                   r^2/(4*E^(r^2/4))) + 32*r*(r/(2*E^(r^2/4)) - 
                   (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 
                 8*r^2*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - 
                   (r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/
                          (4*E^(r^2/4))))/2))/2))/r)*
              (2 + 3.0000000000000004*^-8*(24/(E^(r^2/4)*r^3) - 
                 (3*((16*r)/E^(r^2/4) - (4*r^3)/E^(r^2/4)))/r^4 + 
                 (16/E^(r^2/4) - (16*r^2)/E^(r^2/4) + 8*r^2*
                    (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/r^3)*
                (1 + 3*Cos[2*theta])))/4 + (-48/(E^(r^2/4)*r^3) + 
              (6*((16*r)/E^(r^2/4) - (4*r^3)/E^(r^2/4)))/r^4 - 
              (3*(16/E^(r^2/4) - (16*r^2)/E^(r^2/4) + 8*r^2*
                  (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + 
              ((-40*r)/E^(r^2/4) + (8*r^3)/E^(r^2/4) + 16*r*
                 (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 8*r^2*
                 (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/
                      (4*E^(r^2/4))))/2))/r^2)*(2 - 6.000000000000001*^-8*(
                24/(E^(r^2/4)*r^3) - (3*((16*r)/E^(r^2/4) - (4*r^3)/
                    E^(r^2/4)))/r^4 + (16/E^(r^2/4) - (16*r^2)/E^(r^2/4) + 
                  8*r^2*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/r^3) - 
              3.0000000000000004*^-8*r*(-120/(E^(r^2/4)*r^4) + 
                (15*((16*r)/E^(r^2/4) - (4*r^3)/E^(r^2/4)))/r^5 - 
                (6*(16/E^(r^2/4) - (16*r^2)/E^(r^2/4) + 8*r^2*
                    (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^4 + 
                ((-40*r)/E^(r^2/4) + (8*r^3)/E^(r^2/4) + 16*r*
                   (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 8*r^2*
                   (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/
                        (4*E^(r^2/4))))/2))/r^3) + 1.5000000000000002*^-8*(
                168/(E^(r^2/4)*r^3) - (21*((16*r)/E^(r^2/4) - (4*r^3)/
                    E^(r^2/4)))/r^4 + (9*(16/E^(r^2/4) - (16*r^2)/E^(r^2/4) + 
                   8*r^2*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 - 
                (2*((-40*r)/E^(r^2/4) + (8*r^3)/E^(r^2/4) + 16*r*
                    (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 8*r^2*
                    (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/
                         (4*E^(r^2/4))))/2)))/r^2 + (-32/E^(r^2/4) + 
                  (32*r^2)/E^(r^2/4) + 32*(-1/2*1/E^(r^2/4) + r^2/
                     (4*E^(r^2/4))) - 16*r^2*(-1/2*1/E^(r^2/4) + 
                    r^2/(4*E^(r^2/4))) + 32*r*(r/(2*E^(r^2/4)) - 
                    (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 
                  8*r^2*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - 
                    (r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/
                          (4*E^(r^2/4))))/2))/2))/r)*Sin[theta]^2 + 
              7.500000000000001*^-9*r*(-840/(E^(r^2/4)*r^4) + 
                (105*((16*r)/E^(r^2/4) - (4*r^3)/E^(r^2/4)))/r^5 - 
                (48*(16/E^(r^2/4) - (16*r^2)/E^(r^2/4) + 8*r^2*
                    (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^4 + 
                (13*((-40*r)/E^(r^2/4) + (8*r^3)/E^(r^2/4) + 16*r*
                    (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 8*r^2*
                    (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/
                         (4*E^(r^2/4))))/2)))/r^3 - (3*(-32/E^(r^2/4) + 
                   (32*r^2)/E^(r^2/4) + 32*(-1/2*1/E^(r^2/4) + r^2/
                      (4*E^(r^2/4))) - 16*r^2*(-1/2*1/E^(r^2/4) + 
                     r^2/(4*E^(r^2/4))) + 32*r*(r/(2*E^(r^2/4)) - 
                     (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 
                   8*r^2*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - 
                     (r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/
                          (4*E^(r^2/4))))/2))/2)))/r^2 + ((80*r)/E^(r^2/4) - 
                  (16*r^3)/E^(r^2/4) - 32*r*(-1/2*1/E^(r^2/4) + 
                    r^2/(4*E^(r^2/4))) + 64*(r/(2*E^(r^2/4)) - 
                    (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) - 
                  16*r^2*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + 
                       r^2/(4*E^(r^2/4))))/2) + 32*r*(1/(2*E^(r^2/4)) - 
                    r^2/(4*E^(r^2/4)) + (1/(2*E^(r^2/4)) - r^2/(4*E^(r^2/4)))/
                     2 - (r*((3*r)/(4*E^(r^2/4)) - r^3/(8*E^(r^2/4))))/2) + 
                  16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - 
                    (r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/
                          (4*E^(r^2/4))))/2))/2) + 8*r^2*(-1/4*r/E^(r^2/4) + 
                    (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/4 + 
                    (3*(-1/2*r/E^(r^2/4) + (r*(-1/2*1/E^(r^2/4) + r^2/
                          (4*E^(r^2/4))))/2))/2 - (r*(3/(4*E^(r^2/4)) - 
                       (3*r^2)/(8*E^(r^2/4)) - (r*(r/(2*E^(r^2/4)) - 
                          (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2))/2))/
                     2))/r)*Sin[theta]^2))*Sin[2*theta])/
          (r^2*(2 - 9.*^-16*(24/(E^(r^2/4)*r^3) - (3*((16*r)/E^(r^2/4) - 
                  (4*r^3)/E^(r^2/4)))/r^4 + (16/E^(r^2/4) - (16*r^2)/
                  E^(r^2/4) + 8*r^2*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/
                r^3)^2*(1 + 3*Cos[2*theta]) + 1.5000000000000002*^-8*
             (168/(E^(r^2/4)*r^3) - (21*((16*r)/E^(r^2/4) - (4*r^3)/
                  E^(r^2/4)))/r^4 + (9*(16/E^(r^2/4) - (16*r^2)/E^(r^2/4) + 
                 8*r^2*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 - 
              (2*((-40*r)/E^(r^2/4) + (8*r^3)/E^(r^2/4) + 16*r*
                  (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 8*r^2*
                  (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/
                       (4*E^(r^2/4))))/2)))/r^2 + (-32/E^(r^2/4) + 
                (32*r^2)/E^(r^2/4) + 32*(-1/2*1/E^(r^2/4) + 
                  r^2/(4*E^(r^2/4))) - 16*r^2*(-1/2*1/E^(r^2/4) + 
                  r^2/(4*E^(r^2/4))) + 32*r*(r/(2*E^(r^2/4)) - 
                  (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 
                8*r^2*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - 
                  (r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/
                         (4*E^(r^2/4))))/2))/2))/r)*Sin[theta]^2 + 
            3.0000000000000004*^-8*(24/(E^(r^2/4)*r^3) - 
              (3*((16*r)/E^(r^2/4) - (4*r^3)/E^(r^2/4)))/r^4 + 
              (16/E^(r^2/4) - (16*r^2)/E^(r^2/4) + 8*r^2*(-1/2*1/E^(r^2/4) + 
                  r^2/(4*E^(r^2/4))))/r^3)*(-1 + 3*Cos[2*theta] + 
              7.500000000000001*^-9*(168/(E^(r^2/4)*r^3) - 
                (21*((16*r)/E^(r^2/4) - (4*r^3)/E^(r^2/4)))/r^4 + 
                (9*(16/E^(r^2/4) - (16*r^2)/E^(r^2/4) + 8*r^2*
                    (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 - 
                (2*((-40*r)/E^(r^2/4) + (8*r^3)/E^(r^2/4) + 16*r*
                    (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 8*r^2*
                    (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/
                         (4*E^(r^2/4))))/2)))/r^2 + (-32/E^(r^2/4) + 
                  (32*r^2)/E^(r^2/4) + 32*(-1/2*1/E^(r^2/4) + r^2/
                     (4*E^(r^2/4))) - 16*r^2*(-1/2*1/E^(r^2/4) + 
                    r^2/(4*E^(r^2/4))) + 32*r*(r/(2*E^(r^2/4)) - 
                    (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 
                  8*r^2*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - 
                    (r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/
                          (4*E^(r^2/4))))/2))/2))/r)*(1 + 3*Cos[2*theta])*
               Sin[theta]^2) - 4.5*^-16*(-48/(E^(r^2/4)*r^3) + 
               (6*((16*r)/E^(r^2/4) - (4*r^3)/E^(r^2/4)))/r^4 - 
               (3*(16/E^(r^2/4) - (16*r^2)/E^(r^2/4) + 8*r^2*
                   (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + 
               ((-40*r)/E^(r^2/4) + (8*r^3)/E^(r^2/4) + 16*r*
                  (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 8*r^2*
                  (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/
                       (4*E^(r^2/4))))/2))/r^2)^2*Sin[2*theta]^2)*
           (-2 + 9.*^-16*(24/(E^(r^2/4)*r^3) - (3*((16*r)/E^(r^2/4) - 
                  (4*r^3)/E^(r^2/4)))/r^4 + (16/E^(r^2/4) - (16*r^2)/
                  E^(r^2/4) + 8*r^2*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/
                r^3)^2*(1 + 3*Cos[2*theta]) - 1.5000000000000002*^-8*
             (168/(E^(r^2/4)*r^3) - (21*((16*r)/E^(r^2/4) - (4*r^3)/
                  E^(r^2/4)))/r^4 + (9*(16/E^(r^2/4) - (16*r^2)/E^(r^2/4) + 
                 8*r^2*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 - 
              (2*((-40*r)/E^(r^2/4) + (8*r^3)/E^(r^2/4) + 16*r*
                  (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 8*r^2*
                  (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/
                       (4*E^(r^2/4))))/2)))/r^2 + (-32/E^(r^2/4) + 
                (32*r^2)/E^(r^2/4) + 32*(-1/2*1/E^(r^2/4) + 
                  r^2/(4*E^(r^2/4))) - 16*r^2*(-1/2*1/E^(r^2/4) + 
                  r^2/(4*E^(r^2/4))) + 32*r*(r/(2*E^(r^2/4)) - 
                  (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 
                8*r^2*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - 
                  (r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/
                         (4*E^(r^2/4))))/2))/2))/r)*Sin[theta]^2 - 
            3.0000000000000004*^-8*(24/(E^(r^2/4)*r^3) - 
              (3*((16*r)/E^(r^2/4) - (4*r^3)/E^(r^2/4)))/r^4 + 
              (16/E^(r^2/4) - (16*r^2)/E^(r^2/4) + 8*r^2*(-1/2*1/E^(r^2/4) + 
                  r^2/(4*E^(r^2/4))))/r^3)*(-1 + 3*Cos[2*theta] + 
              7.500000000000001*^-9*(168/(E^(r^2/4)*r^3) - 
                (21*((16*r)/E^(r^2/4) - (4*r^3)/E^(r^2/4)))/r^4 + 
                (9*(16/E^(r^2/4) - (16*r^2)/E^(r^2/4) + 8*r^2*
                    (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 - 
                (2*((-40*r)/E^(r^2/4) + (8*r^3)/E^(r^2/4) + 16*r*
                    (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 8*r^2*
                    (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/
                         (4*E^(r^2/4))))/2)))/r^2 + (-32/E^(r^2/4) + 
                  (32*r^2)/E^(r^2/4) + 32*(-1/2*1/E^(r^2/4) + r^2/
                     (4*E^(r^2/4))) - 16*r^2*(-1/2*1/E^(r^2/4) + 
                    r^2/(4*E^(r^2/4))) + 32*r*(r/(2*E^(r^2/4)) - 
                    (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 
                  8*r^2*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - 
                    (r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/
                          (4*E^(r^2/4))))/2))/2))/r)*(1 + 3*Cos[2*theta])*
               Sin[theta]^2) + 4.5*^-16*(-48/(E^(r^2/4)*r^3) + 
               (6*((16*r)/E^(r^2/4) - (4*r^3)/E^(r^2/4)))/r^4 - 
               (3*(16/E^(r^2/4) - (16*r^2)/E^(r^2/4) + 8*r^2*
                   (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + 
               ((-40*r)/E^(r^2/4) + (8*r^3)/E^(r^2/4) + 16*r*
                  (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 8*r^2*
                  (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/
                       (4*E^(r^2/4))))/2))/r^2)^2*Sin[2*theta]^2)) + 
         (2.5*^-9*(r*(2 - 6.000000000000001*^-8*(24/(E^(r^2/4)*r^3) - 
                (3*((16*r)/E^(r^2/4) - (4*r^3)/E^(r^2/4)))/r^4 + 
                (16/E^(r^2/4) - (16*r^2)/E^(r^2/4) + 8*r^2*
                   (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/r^3) - 
              3.0000000000000004*^-8*r*(-120/(E^(r^2/4)*r^4) + 
                (15*((16*r)/E^(r^2/4) - (4*r^3)/E^(r^2/4)))/r^5 - 
                (6*(16/E^(r^2/4) - (16*r^2)/E^(r^2/4) + 8*r^2*
                    (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^4 + 
                ((-40*r)/E^(r^2/4) + (8*r^3)/E^(r^2/4) + 16*r*
                   (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 8*r^2*
                   (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/
                        (4*E^(r^2/4))))/2))/r^3) + 1.5000000000000002*^-8*(
                168/(E^(r^2/4)*r^3) - (21*((16*r)/E^(r^2/4) - (4*r^3)/
                    E^(r^2/4)))/r^4 + (9*(16/E^(r^2/4) - (16*r^2)/E^(r^2/4) + 
                   8*r^2*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 - 
                (2*((-40*r)/E^(r^2/4) + (8*r^3)/E^(r^2/4) + 16*r*
                    (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 8*r^2*
                    (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/
                         (4*E^(r^2/4))))/2)))/r^2 + (-32/E^(r^2/4) + 
                  (32*r^2)/E^(r^2/4) + 32*(-1/2*1/E^(r^2/4) + r^2/
                     (4*E^(r^2/4))) - 16*r^2*(-1/2*1/E^(r^2/4) + 
                    r^2/(4*E^(r^2/4))) + 32*r*(r/(2*E^(r^2/4)) - 
                    (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 
                  8*r^2*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - 
                    (r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/
                          (4*E^(r^2/4))))/2))/2))/r)*Sin[theta]^2 + 
              7.500000000000001*^-9*r*(-840/(E^(r^2/4)*r^4) + 
                (105*((16*r)/E^(r^2/4) - (4*r^3)/E^(r^2/4)))/r^5 - 
                (48*(16/E^(r^2/4) - (16*r^2)/E^(r^2/4) + 8*r^2*
                    (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^4 + 
                (13*((-40*r)/E^(r^2/4) + (8*r^3)/E^(r^2/4) + 16*r*
                    (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 8*r^2*
                    (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/
                         (4*E^(r^2/4))))/2)))/r^3 - (3*(-32/E^(r^2/4) + 
                   (32*r^2)/E^(r^2/4) + 32*(-1/2*1/E^(r^2/4) + r^2/
                      (4*E^(r^2/4))) - 16*r^2*(-1/2*1/E^(r^2/4) + 
                     r^2/(4*E^(r^2/4))) + 32*r*(r/(2*E^(r^2/4)) - 
                     (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 
                   8*r^2*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - 
                     (r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/
                          (4*E^(r^2/4))))/2))/2)))/r^2 + ((80*r)/E^(r^2/4) - 
                  (16*r^3)/E^(r^2/4) - 32*r*(-1/2*1/E^(r^2/4) + 
                    r^2/(4*E^(r^2/4))) + 64*(r/(2*E^(r^2/4)) - 
                    (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) - 
                  16*r^2*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + 
                       r^2/(4*E^(r^2/4))))/2) + 32*r*(1/(2*E^(r^2/4)) - 
                    r^2/(4*E^(r^2/4)) + (1/(2*E^(r^2/4)) - r^2/(4*E^(r^2/4)))/
                     2 - (r*((3*r)/(4*E^(r^2/4)) - r^3/(8*E^(r^2/4))))/2) + 
                  16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - 
                    (r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/
                          (4*E^(r^2/4))))/2))/2) + 8*r^2*(-1/4*r/E^(r^2/4) + 
                    (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/4 + 
                    (3*(-1/2*r/E^(r^2/4) + (r*(-1/2*1/E^(r^2/4) + r^2/
                          (4*E^(r^2/4))))/2))/2 - (r*(3/(4*E^(r^2/4)) - 
                       (3*r^2)/(8*E^(r^2/4)) - (r*(r/(2*E^(r^2/4)) - 
                          (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2))/2))/
                     2))/r)*Sin[theta]^2)*(-1 + 3.0000000000000004*^-8*(
                24/(E^(r^2/4)*r^3) - (3*((16*r)/E^(r^2/4) - (4*r^3)/
                    E^(r^2/4)))/r^4 + (16/E^(r^2/4) - (16*r^2)/E^(r^2/4) + 
                  8*r^2*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/r^3)*(-2 + 
                3*Sin[theta]^2)) + 1.35*^-15*r*(24/(E^(r^2/4)*r^3) - 
              (3*((16*r)/E^(r^2/4) - (4*r^3)/E^(r^2/4)))/r^4 + 
              (16/E^(r^2/4) - (16*r^2)/E^(r^2/4) + 8*r^2*(-1/2*1/E^(r^2/4) + 
                  r^2/(4*E^(r^2/4))))/r^3)*(-48/(E^(r^2/4)*r^3) + 
              (6*((16*r)/E^(r^2/4) - (4*r^3)/E^(r^2/4)))/r^4 - 
              (3*(16/E^(r^2/4) - (16*r^2)/E^(r^2/4) + 8*r^2*
                  (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + 
              ((-40*r)/E^(r^2/4) + (8*r^3)/E^(r^2/4) + 16*r*
                 (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 8*r^2*
                 (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/
                      (4*E^(r^2/4))))/2))/r^2)*Sin[2*theta]^2)*
           (-3*r*(-120/(E^(r^2/4)*r^4) + (15*((16*r)/E^(r^2/4) - 
                 (4*r^3)/E^(r^2/4)))/r^5 - (6*(16/E^(r^2/4) - (16*r^2)/
                  E^(r^2/4) + 8*r^2*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/
               r^4 + ((-40*r)/E^(r^2/4) + (8*r^3)/E^(r^2/4) + 
                16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 
                8*r^2*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + 
                     r^2/(4*E^(r^2/4))))/2))/r^3)*(1 + 3*Cos[2*theta])*
             (1 + 7.500000000000001*^-9*(168/(E^(r^2/4)*r^3) - 
                (21*((16*r)/E^(r^2/4) - (4*r^3)/E^(r^2/4)))/r^4 + 
                (9*(16/E^(r^2/4) - (16*r^2)/E^(r^2/4) + 8*r^2*
                    (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 - 
                (2*((-40*r)/E^(r^2/4) + (8*r^3)/E^(r^2/4) + 16*r*
                    (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 8*r^2*
                    (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/
                         (4*E^(r^2/4))))/2)))/r^2 + (-32/E^(r^2/4) + 
                  (32*r^2)/E^(r^2/4) + 32*(-1/2*1/E^(r^2/4) + r^2/
                     (4*E^(r^2/4))) - 16*r^2*(-1/2*1/E^(r^2/4) + 
                    r^2/(4*E^(r^2/4))) + 32*r*(r/(2*E^(r^2/4)) - 
                    (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 
                  8*r^2*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - 
                    (r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/
                          (4*E^(r^2/4))))/2))/2))/r)*Sin[theta]^2) + 
            9.*^-8*(-48/(E^(r^2/4)*r^3) + (6*((16*r)/E^(r^2/4) - (4*r^3)/
                   E^(r^2/4)))/r^4 - (3*(16/E^(r^2/4) - (16*r^2)/E^(r^2/4) + 
                  8*r^2*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + 
               ((-40*r)/E^(r^2/4) + (8*r^3)/E^(r^2/4) + 16*r*
                  (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 8*r^2*
                  (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/
                       (4*E^(r^2/4))))/2))/r^2)^2*Sin[2*theta]^2 + 
            9.*^-8*r*(-48/(E^(r^2/4)*r^3) + (6*((16*r)/E^(r^2/4) - 
                 (4*r^3)/E^(r^2/4)))/r^4 - (3*(16/E^(r^2/4) - (16*r^2)/
                  E^(r^2/4) + 8*r^2*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/
               r^3 + ((-40*r)/E^(r^2/4) + (8*r^3)/E^(r^2/4) + 
                16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 
                8*r^2*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + 
                     r^2/(4*E^(r^2/4))))/2))/r^2)*(240/(E^(r^2/4)*r^4) - 
              (30*((16*r)/E^(r^2/4) - (4*r^3)/E^(r^2/4)))/r^5 + 
              (15*(16/E^(r^2/4) - (16*r^2)/E^(r^2/4) + 8*r^2*
                  (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^4 - 
              (5*((-40*r)/E^(r^2/4) + (8*r^3)/E^(r^2/4) + 16*r*
                  (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 8*r^2*
                  (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/
                       (4*E^(r^2/4))))/2)))/r^3 + (-32/E^(r^2/4) + 
                (32*r^2)/E^(r^2/4) + 32*(-1/2*1/E^(r^2/4) + 
                  r^2/(4*E^(r^2/4))) - 16*r^2*(-1/2*1/E^(r^2/4) + 
                  r^2/(4*E^(r^2/4))) + 32*r*(r/(2*E^(r^2/4)) - 
                  (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 
                8*r^2*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - 
                  (r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/
                         (4*E^(r^2/4))))/2))/2))/r^2)*Sin[2*theta]^2 + 
            3.0000000000000004*^-8*(24/(E^(r^2/4)*r^3) - 
              (3*((16*r)/E^(r^2/4) - (4*r^3)/E^(r^2/4)))/r^4 + 
              (16/E^(r^2/4) - (16*r^2)/E^(r^2/4) + 8*r^2*(-1/2*1/E^(r^2/4) + 
                  r^2/(4*E^(r^2/4))))/r^3)*(3*r*(-120/(E^(r^2/4)*r^4) + 
                (15*((16*r)/E^(r^2/4) - (4*r^3)/E^(r^2/4)))/r^5 - 
                (6*(16/E^(r^2/4) - (16*r^2)/E^(r^2/4) + 8*r^2*
                    (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^4 + 
                ((-40*r)/E^(r^2/4) + (8*r^3)/E^(r^2/4) + 16*r*
                   (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 8*r^2*
                   (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/
                        (4*E^(r^2/4))))/2))/r^3)*(1 + 3*Cos[2*theta]) - 
              9*(-48/(E^(r^2/4)*r^3) + (6*((16*r)/E^(r^2/4) - (4*r^3)/
                    E^(r^2/4)))/r^4 - (3*(16/E^(r^2/4) - (16*r^2)/E^(r^2/4) + 
                   8*r^2*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + 
                ((-40*r)/E^(r^2/4) + (8*r^3)/E^(r^2/4) + 16*r*
                   (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 8*r^2*
                   (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/
                        (4*E^(r^2/4))))/2))/r^2)*Sin[2*theta]^2)))/
          (r^3*(9.*^-16*(-48/(E^(r^2/4)*r^3) + (6*((16*r)/E^(r^2/4) - 
                  (4*r^3)/E^(r^2/4)))/r^4 - (3*(16/E^(r^2/4) - (16*r^2)/
                   E^(r^2/4) + 8*r^2*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/
                r^3 + ((-40*r)/E^(r^2/4) + (8*r^3)/E^(r^2/4) + 
                 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 
                 8*r^2*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + 
                      r^2/(4*E^(r^2/4))))/2))/r^2)^2*Cos[theta]^2*
             Sin[theta]^2 - (1 - 3.0000000000000004*^-8*(24/(E^(r^2/4)*r^3) - 
                (3*((16*r)/E^(r^2/4) - (4*r^3)/E^(r^2/4)))/r^4 + 
                (16/E^(r^2/4) - (16*r^2)/E^(r^2/4) + 8*r^2*
                   (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/r^3) + 
              7.500000000000001*^-9*(168/(E^(r^2/4)*r^3) - 
                (21*((16*r)/E^(r^2/4) - (4*r^3)/E^(r^2/4)))/r^4 + 
                (9*(16/E^(r^2/4) - (16*r^2)/E^(r^2/4) + 8*r^2*
                    (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 - 
                (2*((-40*r)/E^(r^2/4) + (8*r^3)/E^(r^2/4) + 16*r*
                    (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 8*r^2*
                    (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/
                         (4*E^(r^2/4))))/2)))/r^2 + (-32/E^(r^2/4) + 
                  (32*r^2)/E^(r^2/4) + 32*(-1/2*1/E^(r^2/4) + r^2/
                     (4*E^(r^2/4))) - 16*r^2*(-1/2*1/E^(r^2/4) + 
                    r^2/(4*E^(r^2/4))) + 32*r*(r/(2*E^(r^2/4)) - 
                    (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 
                  8*r^2*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - 
                    (r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/
                          (4*E^(r^2/4))))/2))/2))/r)*Sin[theta]^2)*
             (1 + 3.0000000000000004*^-8*(24/(E^(r^2/4)*r^3) - 
                (3*((16*r)/E^(r^2/4) - (4*r^3)/E^(r^2/4)))/r^4 + 
                (16/E^(r^2/4) - (16*r^2)/E^(r^2/4) + 8*r^2*
                   (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/r^3)*(2 - 
                3*Sin[theta]^2)))*(-2 + 9.*^-16*(24/(E^(r^2/4)*r^3) - 
               (3*((16*r)/E^(r^2/4) - (4*r^3)/E^(r^2/4)))/r^4 + 
               (16/E^(r^2/4) - (16*r^2)/E^(r^2/4) + 8*r^2*(-1/2*1/E^(r^2/4) + 
                   r^2/(4*E^(r^2/4))))/r^3)^2*(1 + 3*Cos[2*theta]) - 
            1.5000000000000002*^-8*(168/(E^(r^2/4)*r^3) - 
              (21*((16*r)/E^(r^2/4) - (4*r^3)/E^(r^2/4)))/r^4 + 
              (9*(16/E^(r^2/4) - (16*r^2)/E^(r^2/4) + 8*r^2*
                  (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 - 
              (2*((-40*r)/E^(r^2/4) + (8*r^3)/E^(r^2/4) + 16*r*
                  (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 8*r^2*
                  (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/
                       (4*E^(r^2/4))))/2)))/r^2 + (-32/E^(r^2/4) + 
                (32*r^2)/E^(r^2/4) + 32*(-1/2*1/E^(r^2/4) + 
                  r^2/(4*E^(r^2/4))) - 16*r^2*(-1/2*1/E^(r^2/4) + 
                  r^2/(4*E^(r^2/4))) + 32*r*(r/(2*E^(r^2/4)) - 
                  (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 
                8*r^2*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - 
                  (r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/
                         (4*E^(r^2/4))))/2))/2))/r)*Sin[theta]^2 - 
            3.0000000000000004*^-8*(24/(E^(r^2/4)*r^3) - 
              (3*((16*r)/E^(r^2/4) - (4*r^3)/E^(r^2/4)))/r^4 + 
              (16/E^(r^2/4) - (16*r^2)/E^(r^2/4) + 8*r^2*(-1/2*1/E^(r^2/4) + 
                  r^2/(4*E^(r^2/4))))/r^3)*(-1 + 3*Cos[2*theta] + 
              7.500000000000001*^-9*(168/(E^(r^2/4)*r^3) - 
                (21*((16*r)/E^(r^2/4) - (4*r^3)/E^(r^2/4)))/r^4 + 
                (9*(16/E^(r^2/4) - (16*r^2)/E^(r^2/4) + 8*r^2*
                    (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 - 
                (2*((-40*r)/E^(r^2/4) + (8*r^3)/E^(r^2/4) + 16*r*
                    (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 8*r^2*
                    (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/
                         (4*E^(r^2/4))))/2)))/r^2 + (-32/E^(r^2/4) + 
                  (32*r^2)/E^(r^2/4) + 32*(-1/2*1/E^(r^2/4) + r^2/
                     (4*E^(r^2/4))) - 16*r^2*(-1/2*1/E^(r^2/4) + 
                    r^2/(4*E^(r^2/4))) + 32*r*(r/(2*E^(r^2/4)) - 
                    (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 
                  8*r^2*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - 
                    (r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/
                          (4*E^(r^2/4))))/2))/2))/r)*(1 + 3*Cos[2*theta])*
               Sin[theta]^2) + 4.5*^-16*(-48/(E^(r^2/4)*r^3) + 
               (6*((16*r)/E^(r^2/4) - (4*r^3)/E^(r^2/4)))/r^4 - 
               (3*(16/E^(r^2/4) - (16*r^2)/E^(r^2/4) + 8*r^2*
                   (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + 
               ((-40*r)/E^(r^2/4) + (8*r^3)/E^(r^2/4) + 16*r*
                  (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 8*r^2*
                  (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/
                       (4*E^(r^2/4))))/2))/r^2)^2*Sin[2*theta]^2)) + 
         (7.500000000000001*^-9*(-6.000000000000001*^-8*
             (9.*^-8*(24/(E^(r^2/4)*r^3) - (3*((16*r)/E^(r^2/4) - (4*r^3)/
                     E^(r^2/4)))/r^4 + (16/E^(r^2/4) - (16*r^2)/E^(r^2/4) + 
                   8*r^2*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/r^3)^2 + 
              (168/(E^(r^2/4)*r^3) - (21*((16*r)/E^(r^2/4) - (4*r^3)/
                    E^(r^2/4)))/r^4 + (9*(16/E^(r^2/4) - (16*r^2)/E^(r^2/4) + 
                   8*r^2*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 - 
                (2*((-40*r)/E^(r^2/4) + (8*r^3)/E^(r^2/4) + 16*r*
                    (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 8*r^2*
                    (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/
                         (4*E^(r^2/4))))/2)))/r^2 + (-32/E^(r^2/4) + 
                  (32*r^2)/E^(r^2/4) + 32*(-1/2*1/E^(r^2/4) + r^2/
                     (4*E^(r^2/4))) - 16*r^2*(-1/2*1/E^(r^2/4) + 
                    r^2/(4*E^(r^2/4))) + 32*r*(r/(2*E^(r^2/4)) - 
                    (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 
                  8*r^2*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - 
                    (r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/
                          (4*E^(r^2/4))))/2))/2))/r)/4 - 
              3.0000000000000004*^-8*(-48/(E^(r^2/4)*r^3) + 
                 (6*((16*r)/E^(r^2/4) - (4*r^3)/E^(r^2/4)))/r^4 - 
                 (3*(16/E^(r^2/4) - (16*r^2)/E^(r^2/4) + 8*r^2*
                     (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + 
                 ((-40*r)/E^(r^2/4) + (8*r^3)/E^(r^2/4) + 16*r*
                    (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 8*r^2*
                    (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/
                         (4*E^(r^2/4))))/2))/r^2)^2*Cos[2*theta] + 
              3*(24/(E^(r^2/4)*r^3) - (3*((16*r)/E^(r^2/4) - (4*r^3)/
                    E^(r^2/4)))/r^4 + (16/E^(r^2/4) - (16*r^2)/E^(r^2/4) + 
                  8*r^2*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/r^3)*(-1 + 
                2.5*^-9*(168/(E^(r^2/4)*r^3) - (21*((16*r)/E^(r^2/4) - 
                     (4*r^3)/E^(r^2/4)))/r^4 + (9*(16/E^(r^2/4) - (16*r^2)/
                      E^(r^2/4) + 8*r^2*(-1/2*1/E^(r^2/4) + r^2/
                        (4*E^(r^2/4)))))/r^3 - (2*((-40*r)/E^(r^2/4) + 
                     (8*r^3)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + 
                       r^2/(4*E^(r^2/4))) + 8*r^2*(r/(2*E^(r^2/4)) - 
                       (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2)))/r^2 + 
                  (-32/E^(r^2/4) + (32*r^2)/E^(r^2/4) + 32*
                     (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) - 16*r^2*
                     (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*r*
                     (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/
                          (4*E^(r^2/4))))/2) + 8*r^2*(3/(4*E^(r^2/4)) - 
                      (3*r^2)/(8*E^(r^2/4)) - (r*(r/(2*E^(r^2/4)) - 
                         (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2))/2))/
                   r)*(-1 + 3*Cos[2*theta])))*(-4*r*(240/(E^(r^2/4)*r^4) - 
                (30*((16*r)/E^(r^2/4) - (4*r^3)/E^(r^2/4)))/r^5 + 
                (15*(16/E^(r^2/4) - (16*r^2)/E^(r^2/4) + 8*r^2*
                    (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^4 - 
                (5*((-40*r)/E^(r^2/4) + (8*r^3)/E^(r^2/4) + 16*r*
                    (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 8*r^2*
                    (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/
                         (4*E^(r^2/4))))/2)))/r^3 + (-32/E^(r^2/4) + 
                  (32*r^2)/E^(r^2/4) + 32*(-1/2*1/E^(r^2/4) + r^2/
                     (4*E^(r^2/4))) - 16*r^2*(-1/2*1/E^(r^2/4) + 
                    r^2/(4*E^(r^2/4))) + 32*r*(r/(2*E^(r^2/4)) - 
                    (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 
                  8*r^2*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - 
                    (r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/
                          (4*E^(r^2/4))))/2))/2))/r^2) + 
              1.8*^-7*(24/(E^(r^2/4)*r^3) - (3*((16*r)/E^(r^2/4) - (4*r^3)/
                     E^(r^2/4)))/r^4 + (16/E^(r^2/4) - (16*r^2)/E^(r^2/4) + 
                   8*r^2*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/r^3)^2*(1 + 
                3*Cos[2*theta]) + (-48/(E^(r^2/4)*r^3) + 
                (6*((16*r)/E^(r^2/4) - (4*r^3)/E^(r^2/4)))/r^4 - 
                (3*(16/E^(r^2/4) - (16*r^2)/E^(r^2/4) + 8*r^2*
                    (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + 
                ((-40*r)/E^(r^2/4) + (8*r^3)/E^(r^2/4) + 16*r*
                   (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 8*r^2*
                   (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/
                        (4*E^(r^2/4))))/2))/r^2)*(-4 + 3.0000000000000004*^-8*
                 r*(-120/(E^(r^2/4)*r^4) + (15*((16*r)/E^(r^2/4) - (4*r^3)/
                      E^(r^2/4)))/r^5 - (6*(16/E^(r^2/4) - (16*r^2)/
                      E^(r^2/4) + 8*r^2*(-1/2*1/E^(r^2/4) + r^2/
                        (4*E^(r^2/4)))))/r^4 + ((-40*r)/E^(r^2/4) + 
                    (8*r^3)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + 
                      r^2/(4*E^(r^2/4))) + 8*r^2*(r/(2*E^(r^2/4)) - 
                      (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2))/r^3)*
                 (1 + 3*Cos[2*theta])) - 6*(24/(E^(r^2/4)*r^3) - 
                (3*((16*r)/E^(r^2/4) - (4*r^3)/E^(r^2/4)))/r^4 + 
                (16/E^(r^2/4) - (16*r^2)/E^(r^2/4) + 8*r^2*
                   (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/r^3)*(-2 + 
                1.*^-8*(-48/(E^(r^2/4)*r^3) + (6*((16*r)/E^(r^2/4) - 
                     (4*r^3)/E^(r^2/4)))/r^4 - (3*(16/E^(r^2/4) - (16*r^2)/
                      E^(r^2/4) + 8*r^2*(-1/2*1/E^(r^2/4) + r^2/
                        (4*E^(r^2/4)))))/r^3 + ((-40*r)/E^(r^2/4) + 
                    (8*r^3)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + 
                      r^2/(4*E^(r^2/4))) + 8*r^2*(r/(2*E^(r^2/4)) - 
                      (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2))/r^2)*
                 (1 + 3*Cos[2*theta]) + 1.*^-8*r*(240/(E^(r^2/4)*r^4) - 
                  (30*((16*r)/E^(r^2/4) - (4*r^3)/E^(r^2/4)))/r^5 + 
                  (15*(16/E^(r^2/4) - (16*r^2)/E^(r^2/4) + 8*r^2*
                      (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^4 - 
                  (5*((-40*r)/E^(r^2/4) + (8*r^3)/E^(r^2/4) + 16*r*
                      (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 8*r^2*
                      (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/
                          (4*E^(r^2/4))))/2)))/r^3 + (-32/E^(r^2/4) + 
                    (32*r^2)/E^(r^2/4) + 32*(-1/2*1/E^(r^2/4) + r^2/
                       (4*E^(r^2/4))) - 16*r^2*(-1/2*1/E^(r^2/4) + 
                      r^2/(4*E^(r^2/4))) + 32*r*(r/(2*E^(r^2/4)) - 
                      (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 
                    8*r^2*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - 
                      (r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/
                          (4*E^(r^2/4))))/2))/2))/r^2)*(1 + 3*Cos[2*theta])))*
             Sin[2*theta]^2 + 2*Cos[2*theta]*(4*r*(240/(E^(r^2/4)*r^4) - 
                (30*((16*r)/E^(r^2/4) - (4*r^3)/E^(r^2/4)))/r^5 + 
                (15*(16/E^(r^2/4) - (16*r^2)/E^(r^2/4) + 8*r^2*
                    (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^4 - 
                (5*((-40*r)/E^(r^2/4) + (8*r^3)/E^(r^2/4) + 16*r*
                    (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 8*r^2*
                    (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/
                         (4*E^(r^2/4))))/2)))/r^3 + (-32/E^(r^2/4) + 
                  (32*r^2)/E^(r^2/4) + 32*(-1/2*1/E^(r^2/4) + r^2/
                     (4*E^(r^2/4))) - 16*r^2*(-1/2*1/E^(r^2/4) + 
                    r^2/(4*E^(r^2/4))) + 32*r*(r/(2*E^(r^2/4)) - 
                    (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 
                  8*r^2*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - 
                    (r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/
                          (4*E^(r^2/4))))/2))/2))/r^2) - 
              1.8*^-7*(24/(E^(r^2/4)*r^3) - (3*((16*r)/E^(r^2/4) - (4*r^3)/
                     E^(r^2/4)))/r^4 + (16/E^(r^2/4) - (16*r^2)/E^(r^2/4) + 
                   8*r^2*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/r^3)^2*(1 + 
                3*Cos[2*theta]) - (-48/(E^(r^2/4)*r^3) + 
                (6*((16*r)/E^(r^2/4) - (4*r^3)/E^(r^2/4)))/r^4 - 
                (3*(16/E^(r^2/4) - (16*r^2)/E^(r^2/4) + 8*r^2*
                    (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + 
                ((-40*r)/E^(r^2/4) + (8*r^3)/E^(r^2/4) + 16*r*
                   (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 8*r^2*
                   (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/
                        (4*E^(r^2/4))))/2))/r^2)*(-4 + 3.0000000000000004*^-8*
                 r*(-120/(E^(r^2/4)*r^4) + (15*((16*r)/E^(r^2/4) - (4*r^3)/
                      E^(r^2/4)))/r^5 - (6*(16/E^(r^2/4) - (16*r^2)/
                      E^(r^2/4) + 8*r^2*(-1/2*1/E^(r^2/4) + r^2/
                        (4*E^(r^2/4)))))/r^4 + ((-40*r)/E^(r^2/4) + 
                    (8*r^3)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + 
                      r^2/(4*E^(r^2/4))) + 8*r^2*(r/(2*E^(r^2/4)) - 
                      (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2))/r^3)*
                 (1 + 3*Cos[2*theta])) + 6*(24/(E^(r^2/4)*r^3) - 
                (3*((16*r)/E^(r^2/4) - (4*r^3)/E^(r^2/4)))/r^4 + 
                (16/E^(r^2/4) - (16*r^2)/E^(r^2/4) + 8*r^2*
                   (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/r^3)*(-2 + 
                1.*^-8*(-48/(E^(r^2/4)*r^3) + (6*((16*r)/E^(r^2/4) - 
                     (4*r^3)/E^(r^2/4)))/r^4 - (3*(16/E^(r^2/4) - (16*r^2)/
                      E^(r^2/4) + 8*r^2*(-1/2*1/E^(r^2/4) + r^2/
                        (4*E^(r^2/4)))))/r^3 + ((-40*r)/E^(r^2/4) + 
                    (8*r^3)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + 
                      r^2/(4*E^(r^2/4))) + 8*r^2*(r/(2*E^(r^2/4)) - 
                      (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2))/r^2)*
                 (1 + 3*Cos[2*theta]) + 1.*^-8*r*(240/(E^(r^2/4)*r^4) - 
                  (30*((16*r)/E^(r^2/4) - (4*r^3)/E^(r^2/4)))/r^5 + 
                  (15*(16/E^(r^2/4) - (16*r^2)/E^(r^2/4) + 8*r^2*
                      (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^4 - 
                  (5*((-40*r)/E^(r^2/4) + (8*r^3)/E^(r^2/4) + 16*r*
                      (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 8*r^2*
                      (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/
                          (4*E^(r^2/4))))/2)))/r^3 + (-32/E^(r^2/4) + 
                    (32*r^2)/E^(r^2/4) + 32*(-1/2*1/E^(r^2/4) + r^2/
                       (4*E^(r^2/4))) - 16*r^2*(-1/2*1/E^(r^2/4) + 
                      r^2/(4*E^(r^2/4))) + 32*r*(r/(2*E^(r^2/4)) - 
                      (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 
                    8*r^2*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - 
                      (r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/
                          (4*E^(r^2/4))))/2))/2))/r^2)*(1 + 3*Cos[2*theta])))*
             (-2 + 9.*^-16*(24/(E^(r^2/4)*r^3) - (3*((16*r)/E^(r^2/4) - 
                    (4*r^3)/E^(r^2/4)))/r^4 + (16/E^(r^2/4) - (16*r^2)/
                    E^(r^2/4) + 8*r^2*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/
                  r^3)^2*(1 + 3*Cos[2*theta]) - 1.5000000000000002*^-8*(
                168/(E^(r^2/4)*r^3) - (21*((16*r)/E^(r^2/4) - (4*r^3)/
                    E^(r^2/4)))/r^4 + (9*(16/E^(r^2/4) - (16*r^2)/E^(r^2/4) + 
                   8*r^2*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 - 
                (2*((-40*r)/E^(r^2/4) + (8*r^3)/E^(r^2/4) + 16*r*
                    (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 8*r^2*
                    (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/
                         (4*E^(r^2/4))))/2)))/r^2 + (-32/E^(r^2/4) + 
                  (32*r^2)/E^(r^2/4) + 32*(-1/2*1/E^(r^2/4) + r^2/
                     (4*E^(r^2/4))) - 16*r^2*(-1/2*1/E^(r^2/4) + 
                    r^2/(4*E^(r^2/4))) + 32*r*(r/(2*E^(r^2/4)) - 
                    (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 
                  8*r^2*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - 
                    (r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/
                          (4*E^(r^2/4))))/2))/2))/r)*Sin[theta]^2 - 
              3.0000000000000004*^-8*(24/(E^(r^2/4)*r^3) - 
                (3*((16*r)/E^(r^2/4) - (4*r^3)/E^(r^2/4)))/r^4 + 
                (16/E^(r^2/4) - (16*r^2)/E^(r^2/4) + 8*r^2*
                   (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/r^3)*(-1 + 
                3*Cos[2*theta] + 7.500000000000001*^-9*(168/(E^(r^2/4)*r^3) - 
                  (21*((16*r)/E^(r^2/4) - (4*r^3)/E^(r^2/4)))/r^4 + 
                  (9*(16/E^(r^2/4) - (16*r^2)/E^(r^2/4) + 8*r^2*
                      (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 - 
                  (2*((-40*r)/E^(r^2/4) + (8*r^3)/E^(r^2/4) + 16*r*
                      (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 8*r^2*
                      (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/
                          (4*E^(r^2/4))))/2)))/r^2 + (-32/E^(r^2/4) + 
                    (32*r^2)/E^(r^2/4) + 32*(-1/2*1/E^(r^2/4) + r^2/
                       (4*E^(r^2/4))) - 16*r^2*(-1/2*1/E^(r^2/4) + 
                      r^2/(4*E^(r^2/4))) + 32*r*(r/(2*E^(r^2/4)) - 
                      (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 
                    8*r^2*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - 
                      (r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/
                          (4*E^(r^2/4))))/2))/2))/r)*(1 + 3*Cos[2*theta])*
                 Sin[theta]^2) + 4.5*^-16*(-48/(E^(r^2/4)*r^3) + 
                 (6*((16*r)/E^(r^2/4) - (4*r^3)/E^(r^2/4)))/r^4 - 
                 (3*(16/E^(r^2/4) - (16*r^2)/E^(r^2/4) + 8*r^2*
                     (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + 
                 ((-40*r)/E^(r^2/4) + (8*r^3)/E^(r^2/4) + 16*r*
                    (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 8*r^2*
                    (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/
                         (4*E^(r^2/4))))/2))/r^2)^2*Sin[2*theta]^2) + 
            6.000000000000001*^-8*(18*(24/(E^(r^2/4)*r^3) - 
                 (3*((16*r)/E^(r^2/4) - (4*r^3)/E^(r^2/4)))/r^4 + 
                 (16/E^(r^2/4) - (16*r^2)/E^(r^2/4) + 8*r^2*
                    (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/r^3)^2 + 
              3*r*(-120/(E^(r^2/4)*r^4) + (15*((16*r)/E^(r^2/4) - (4*r^3)/
                    E^(r^2/4)))/r^5 - (6*(16/E^(r^2/4) - (16*r^2)/E^(r^2/4) + 
                   8*r^2*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^4 + 
                ((-40*r)/E^(r^2/4) + (8*r^3)/E^(r^2/4) + 16*r*
                   (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 8*r^2*
                   (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/
                        (4*E^(r^2/4))))/2))/r^3)*(-48/(E^(r^2/4)*r^3) + 
                (6*((16*r)/E^(r^2/4) - (4*r^3)/E^(r^2/4)))/r^4 - 
                (3*(16/E^(r^2/4) - (16*r^2)/E^(r^2/4) + 8*r^2*
                    (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + 
                ((-40*r)/E^(r^2/4) + (8*r^3)/E^(r^2/4) + 16*r*
                   (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 8*r^2*
                   (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/
                        (4*E^(r^2/4))))/2))/r^2) - 6*(24/(E^(r^2/4)*r^3) - 
                (3*((16*r)/E^(r^2/4) - (4*r^3)/E^(r^2/4)))/r^4 + 
                (16/E^(r^2/4) - (16*r^2)/E^(r^2/4) + 8*r^2*
                   (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/r^3)*(
                -48/(E^(r^2/4)*r^3) + (6*((16*r)/E^(r^2/4) - (4*r^3)/
                    E^(r^2/4)))/r^4 - (3*(16/E^(r^2/4) - (16*r^2)/E^(r^2/4) + 
                   8*r^2*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + 
                ((-40*r)/E^(r^2/4) + (8*r^3)/E^(r^2/4) + 16*r*
                   (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 8*r^2*
                   (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*(240/(E^(r^2/4)*r^4) - 
                  (30*((16*r)/E^(r^2/4) - (4*r^3)/E^(r^2/4)))/r^5 + 
                  (15*(16/E^(r^2/4) - (16*r^2)/E^(r^2/4) + 8*r^2*
                      (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^4 - 
                  (5*((-40*r)/E^(r^2/4) + (8*r^3)/E^(r^2/4) + 16*r*
                      (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 8*r^2*
                      (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/
                          (4*E^(r^2/4))))/2)))/r^3 + (-32/E^(r^2/4) + 
                    (32*r^2)/E^(r^2/4) + 32*(-1/2*1/E^(r^2/4) + r^2/
                       (4*E^(r^2/4))) - 16*r^2*(-1/2*1/E^(r^2/4) + 
                      r^2/(4*E^(r^2/4))) + 32*r*(r/(2*E^(r^2/4)) - 
                      (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 
                    8*r^2*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - 
                      (r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/
                          (4*E^(r^2/4))))/2))/2))/r^2)))*Sin[2*theta]^2*
             (-2 + 9.*^-16*(24/(E^(r^2/4)*r^3) - (3*((16*r)/E^(r^2/4) - 
                    (4*r^3)/E^(r^2/4)))/r^4 + (16/E^(r^2/4) - (16*r^2)/
                    E^(r^2/4) + 8*r^2*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/
                  r^3)^2*(1 + 3*Cos[2*theta]) - 1.5000000000000002*^-8*(
                168/(E^(r^2/4)*r^3) - (21*((16*r)/E^(r^2/4) - (4*r^3)/
                    E^(r^2/4)))/r^4 + (9*(16/E^(r^2/4) - (16*r^2)/E^(r^2/4) + 
                   8*r^2*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 - 
                (2*((-40*r)/E^(r^2/4) + (8*r^3)/E^(r^2/4) + 16*r*
                    (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 8*r^2*
                    (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/
                         (4*E^(r^2/4))))/2)))/r^2 + (-32/E^(r^2/4) + 
                  (32*r^2)/E^(r^2/4) + 32*(-1/2*1/E^(r^2/4) + r^2/
                     (4*E^(r^2/4))) - 16*r^2*(-1/2*1/E^(r^2/4) + 
                    r^2/(4*E^(r^2/4))) + 32*r*(r/(2*E^(r^2/4)) - 
                    (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 
                  8*r^2*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - 
                    (r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/
                          (4*E^(r^2/4))))/2))/2))/r)*Sin[theta]^2 - 
              3.0000000000000004*^-8*(24/(E^(r^2/4)*r^3) - 
                (3*((16*r)/E^(r^2/4) - (4*r^3)/E^(r^2/4)))/r^4 + 
                (16/E^(r^2/4) - (16*r^2)/E^(r^2/4) + 8*r^2*
                   (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/r^3)*(-1 + 
                3*Cos[2*theta] + 7.500000000000001*^-9*(168/(E^(r^2/4)*r^3) - 
                  (21*((16*r)/E^(r^2/4) - (4*r^3)/E^(r^2/4)))/r^4 + 
                  (9*(16/E^(r^2/4) - (16*r^2)/E^(r^2/4) + 8*r^2*
                      (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 - 
                  (2*((-40*r)/E^(r^2/4) + (8*r^3)/E^(r^2/4) + 16*r*
                      (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 8*r^2*
                      (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/
                          (4*E^(r^2/4))))/2)))/r^2 + (-32/E^(r^2/4) + 
                    (32*r^2)/E^(r^2/4) + 32*(-1/2*1/E^(r^2/4) + r^2/
                       (4*E^(r^2/4))) - 16*r^2*(-1/2*1/E^(r^2/4) + 
                      r^2/(4*E^(r^2/4))) + 32*r*(r/(2*E^(r^2/4)) - 
                      (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 
                    8*r^2*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - 
                      (r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/
                          (4*E^(r^2/4))))/2))/2))/r)*(1 + 3*Cos[2*theta])*
                 Sin[theta]^2) + 4.5*^-16*(-48/(E^(r^2/4)*r^3) + 
                 (6*((16*r)/E^(r^2/4) - (4*r^3)/E^(r^2/4)))/r^4 - 
                 (3*(16/E^(r^2/4) - (16*r^2)/E^(r^2/4) + 8*r^2*
                     (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + 
                 ((-40*r)/E^(r^2/4) + (8*r^3)/E^(r^2/4) + 16*r*
                    (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 8*r^2*
                    (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/
                         (4*E^(r^2/4))))/2))/r^2)^2*Sin[2*theta]^2)))/
          (r^2*(2 - 9.*^-16*(24/(E^(r^2/4)*r^3) - (3*((16*r)/E^(r^2/4) - 
                   (4*r^3)/E^(r^2/4)))/r^4 + (16/E^(r^2/4) - (16*r^2)/
                   E^(r^2/4) + 8*r^2*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/
                 r^3)^2*(1 + 3*Cos[2*theta]) + 1.5000000000000002*^-8*
              (168/(E^(r^2/4)*r^3) - (21*((16*r)/E^(r^2/4) - (4*r^3)/
                   E^(r^2/4)))/r^4 + (9*(16/E^(r^2/4) - (16*r^2)/E^(r^2/4) + 
                  8*r^2*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 - 
               (2*((-40*r)/E^(r^2/4) + (8*r^3)/E^(r^2/4) + 16*r*
                   (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 8*r^2*
                   (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/
                        (4*E^(r^2/4))))/2)))/r^2 + (-32/E^(r^2/4) + 
                 (32*r^2)/E^(r^2/4) + 32*(-1/2*1/E^(r^2/4) + 
                   r^2/(4*E^(r^2/4))) - 16*r^2*(-1/2*1/E^(r^2/4) + 
                   r^2/(4*E^(r^2/4))) + 32*r*(r/(2*E^(r^2/4)) - 
                   (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 
                 8*r^2*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - 
                   (r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/
                          (4*E^(r^2/4))))/2))/2))/r)*Sin[theta]^2 + 
             3.0000000000000004*^-8*(24/(E^(r^2/4)*r^3) - 
               (3*((16*r)/E^(r^2/4) - (4*r^3)/E^(r^2/4)))/r^4 + 
               (16/E^(r^2/4) - (16*r^2)/E^(r^2/4) + 8*r^2*(-1/2*1/E^(r^2/4) + 
                   r^2/(4*E^(r^2/4))))/r^3)*(-1 + 3*Cos[2*theta] + 
               7.500000000000001*^-9*(168/(E^(r^2/4)*r^3) - 
                 (21*((16*r)/E^(r^2/4) - (4*r^3)/E^(r^2/4)))/r^4 + 
                 (9*(16/E^(r^2/4) - (16*r^2)/E^(r^2/4) + 8*r^2*
                     (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 - 
                 (2*((-40*r)/E^(r^2/4) + (8*r^3)/E^(r^2/4) + 16*r*
                     (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 8*r^2*
                     (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/
                          (4*E^(r^2/4))))/2)))/r^2 + (-32/E^(r^2/4) + 
                   (32*r^2)/E^(r^2/4) + 32*(-1/2*1/E^(r^2/4) + r^2/
                      (4*E^(r^2/4))) - 16*r^2*(-1/2*1/E^(r^2/4) + 
                     r^2/(4*E^(r^2/4))) + 32*r*(r/(2*E^(r^2/4)) - 
                     (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 
                   8*r^2*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - 
                     (r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/
                          (4*E^(r^2/4))))/2))/2))/r)*(1 + 3*Cos[2*theta])*
                Sin[theta]^2) - 4.5*^-16*(-48/(E^(r^2/4)*r^3) + 
                (6*((16*r)/E^(r^2/4) - (4*r^3)/E^(r^2/4)))/r^4 - 
                (3*(16/E^(r^2/4) - (16*r^2)/E^(r^2/4) + 8*r^2*
                    (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + 
                ((-40*r)/E^(r^2/4) + (8*r^3)/E^(r^2/4) + 16*r*
                   (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 8*r^2*
                   (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/
                        (4*E^(r^2/4))))/2))/r^2)^2*Sin[2*theta]^2)^2) - 
         (-2*(9.*^-16*(-48/(E^(r^2/4)*r^3) + (6*((16*r)/E^(r^2/4) - 
                   (4*r^3)/E^(r^2/4)))/r^4 - (3*(16/E^(r^2/4) - (16*r^2)/
                    E^(r^2/4) + 8*r^2*(-1/2*1/E^(r^2/4) + r^2/
                      (4*E^(r^2/4)))))/r^3 + ((-40*r)/E^(r^2/4) + 
                  (8*r^3)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + 
                    r^2/(4*E^(r^2/4))) + 8*r^2*(r/(2*E^(r^2/4)) - 
                    (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2))/r^2)^2*
              Cos[theta]^2*Sin[theta]^2 - (1 - 3.0000000000000004*^-8*
                (24/(E^(r^2/4)*r^3) - (3*((16*r)/E^(r^2/4) - (4*r^3)/
                     E^(r^2/4)))/r^4 + (16/E^(r^2/4) - (16*r^2)/E^(r^2/4) + 
                   8*r^2*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/r^3) + 
               7.500000000000001*^-9*(168/(E^(r^2/4)*r^3) - 
                 (21*((16*r)/E^(r^2/4) - (4*r^3)/E^(r^2/4)))/r^4 + 
                 (9*(16/E^(r^2/4) - (16*r^2)/E^(r^2/4) + 8*r^2*
                     (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 - 
                 (2*((-40*r)/E^(r^2/4) + (8*r^3)/E^(r^2/4) + 16*r*
                     (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 8*r^2*
                     (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/
                          (4*E^(r^2/4))))/2)))/r^2 + (-32/E^(r^2/4) + 
                   (32*r^2)/E^(r^2/4) + 32*(-1/2*1/E^(r^2/4) + r^2/
                      (4*E^(r^2/4))) - 16*r^2*(-1/2*1/E^(r^2/4) + 
                     r^2/(4*E^(r^2/4))) + 32*r*(r/(2*E^(r^2/4)) - 
                     (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 
                   8*r^2*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - 
                     (r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/
                          (4*E^(r^2/4))))/2))/2))/r)*Sin[theta]^2)*
              (1 + 3.0000000000000004*^-8*(24/(E^(r^2/4)*r^3) - 
                 (3*((16*r)/E^(r^2/4) - (4*r^3)/E^(r^2/4)))/r^4 + 
                 (16/E^(r^2/4) - (16*r^2)/E^(r^2/4) + 8*r^2*
                    (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/r^3)*
                (2 - 3*Sin[theta]^2)))*(r*(2 - 6.000000000000001*^-8*
                (24/(E^(r^2/4)*r^3) - (3*((16*r)/E^(r^2/4) - (4*r^3)/
                     E^(r^2/4)))/r^4 + (16/E^(r^2/4) - (16*r^2)/E^(r^2/4) + 
                   8*r^2*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/r^3) - 
               3.0000000000000004*^-8*r*(-120/(E^(r^2/4)*r^4) + 
                 (15*((16*r)/E^(r^2/4) - (4*r^3)/E^(r^2/4)))/r^5 - 
                 (6*(16/E^(r^2/4) - (16*r^2)/E^(r^2/4) + 8*r^2*
                     (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^4 + 
                 ((-40*r)/E^(r^2/4) + (8*r^3)/E^(r^2/4) + 16*r*
                    (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 8*r^2*
                    (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/
                         (4*E^(r^2/4))))/2))/r^3) + 1.5000000000000002*^-8*
                (168/(E^(r^2/4)*r^3) - (21*((16*r)/E^(r^2/4) - (4*r^3)/
                     E^(r^2/4)))/r^4 + (9*(16/E^(r^2/4) - (16*r^2)/
                     E^(r^2/4) + 8*r^2*(-1/2*1/E^(r^2/4) + r^2/
                       (4*E^(r^2/4)))))/r^3 - (2*((-40*r)/E^(r^2/4) + 
                    (8*r^3)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + 
                      r^2/(4*E^(r^2/4))) + 8*r^2*(r/(2*E^(r^2/4)) - 
                      (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2)))/r^2 + 
                 (-32/E^(r^2/4) + (32*r^2)/E^(r^2/4) + 32*(-1/2*1/E^(r^2/4) + 
                     r^2/(4*E^(r^2/4))) - 16*r^2*(-1/2*1/E^(r^2/4) + 
                     r^2/(4*E^(r^2/4))) + 32*r*(r/(2*E^(r^2/4)) - 
                     (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 
                   8*r^2*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - 
                     (r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/
                          (4*E^(r^2/4))))/2))/2))/r)*Sin[theta]^2 + 
               7.500000000000001*^-9*r*(-840/(E^(r^2/4)*r^4) + 
                 (105*((16*r)/E^(r^2/4) - (4*r^3)/E^(r^2/4)))/r^5 - 
                 (48*(16/E^(r^2/4) - (16*r^2)/E^(r^2/4) + 8*r^2*
                     (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^4 + 
                 (13*((-40*r)/E^(r^2/4) + (8*r^3)/E^(r^2/4) + 16*r*
                     (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 8*r^2*
                     (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/
                          (4*E^(r^2/4))))/2)))/r^3 - (3*(-32/E^(r^2/4) + 
                    (32*r^2)/E^(r^2/4) + 32*(-1/2*1/E^(r^2/4) + r^2/
                       (4*E^(r^2/4))) - 16*r^2*(-1/2*1/E^(r^2/4) + 
                      r^2/(4*E^(r^2/4))) + 32*r*(r/(2*E^(r^2/4)) - 
                      (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 
                    8*r^2*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - 
                      (r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/
                          (4*E^(r^2/4))))/2))/2)))/r^2 + ((80*r)/E^(r^2/4) - 
                   (16*r^3)/E^(r^2/4) - 32*r*(-1/2*1/E^(r^2/4) + 
                     r^2/(4*E^(r^2/4))) + 64*(r/(2*E^(r^2/4)) - 
                     (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) - 
                   16*r^2*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + 
                        r^2/(4*E^(r^2/4))))/2) + 32*r*(1/(2*E^(r^2/4)) - 
                     r^2/(4*E^(r^2/4)) + (1/(2*E^(r^2/4)) - r^2/
                        (4*E^(r^2/4)))/2 - (r*((3*r)/(4*E^(r^2/4)) - 
                        r^3/(8*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - 
                     (3*r^2)/(8*E^(r^2/4)) - (r*(r/(2*E^(r^2/4)) - 
                        (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2))/2) + 
                   8*r^2*(-1/4*r/E^(r^2/4) + (r*(-1/2*1/E^(r^2/4) + 
                        r^2/(4*E^(r^2/4))))/4 + (3*(-1/2*r/E^(r^2/4) + 
                        (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2))/2 - 
                     (r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - 
                        (r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/
                          (4*E^(r^2/4))))/2))/2))/2))/r)*Sin[theta]^2)*
              (-1 + 3.0000000000000004*^-8*(24/(E^(r^2/4)*r^3) - 
                 (3*((16*r)/E^(r^2/4) - (4*r^3)/E^(r^2/4)))/r^4 + 
                 (16/E^(r^2/4) - (16*r^2)/E^(r^2/4) + 8*r^2*
                    (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/r^3)*
                (-2 + 3*Sin[theta]^2)) + 1.35*^-15*r*(24/(E^(r^2/4)*r^3) - 
               (3*((16*r)/E^(r^2/4) - (4*r^3)/E^(r^2/4)))/r^4 + 
               (16/E^(r^2/4) - (16*r^2)/E^(r^2/4) + 8*r^2*(-1/2*1/E^(r^2/4) + 
                   r^2/(4*E^(r^2/4))))/r^3)*(-48/(E^(r^2/4)*r^3) + 
               (6*((16*r)/E^(r^2/4) - (4*r^3)/E^(r^2/4)))/r^4 - 
               (3*(16/E^(r^2/4) - (16*r^2)/E^(r^2/4) + 8*r^2*
                   (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + 
               ((-40*r)/E^(r^2/4) + (8*r^3)/E^(r^2/4) + 16*r*
                  (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 8*r^2*
                  (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/
                       (4*E^(r^2/4))))/2))/r^2)*Sin[2*theta]^2) + 
           r*(9.*^-16*(-48/(E^(r^2/4)*r^3) + (6*((16*r)/E^(r^2/4) - 
                   (4*r^3)/E^(r^2/4)))/r^4 - (3*(16/E^(r^2/4) - (16*r^2)/
                    E^(r^2/4) + 8*r^2*(-1/2*1/E^(r^2/4) + r^2/
                      (4*E^(r^2/4)))))/r^3 + ((-40*r)/E^(r^2/4) + 
                  (8*r^3)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + 
                    r^2/(4*E^(r^2/4))) + 8*r^2*(r/(2*E^(r^2/4)) - 
                    (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2))/r^2)^2*
              Cos[theta]^2*Sin[theta]^2 - (1 - 3.0000000000000004*^-8*
                (24/(E^(r^2/4)*r^3) - (3*((16*r)/E^(r^2/4) - (4*r^3)/
                     E^(r^2/4)))/r^4 + (16/E^(r^2/4) - (16*r^2)/E^(r^2/4) + 
                   8*r^2*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/r^3) + 
               7.500000000000001*^-9*(168/(E^(r^2/4)*r^3) - 
                 (21*((16*r)/E^(r^2/4) - (4*r^3)/E^(r^2/4)))/r^4 + 
                 (9*(16/E^(r^2/4) - (16*r^2)/E^(r^2/4) + 8*r^2*
                     (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 - 
                 (2*((-40*r)/E^(r^2/4) + (8*r^3)/E^(r^2/4) + 16*r*
                     (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 8*r^2*
                     (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/
                          (4*E^(r^2/4))))/2)))/r^2 + (-32/E^(r^2/4) + 
                   (32*r^2)/E^(r^2/4) + 32*(-1/2*1/E^(r^2/4) + r^2/
                      (4*E^(r^2/4))) - 16*r^2*(-1/2*1/E^(r^2/4) + 
                     r^2/(4*E^(r^2/4))) + 32*r*(r/(2*E^(r^2/4)) - 
                     (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 
                   8*r^2*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - 
                     (r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/
                          (4*E^(r^2/4))))/2))/2))/r)*Sin[theta]^2)*
              (1 + 3.0000000000000004*^-8*(24/(E^(r^2/4)*r^3) - 
                 (3*((16*r)/E^(r^2/4) - (4*r^3)/E^(r^2/4)))/r^4 + 
                 (16/E^(r^2/4) - (16*r^2)/E^(r^2/4) + 8*r^2*
                    (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/r^3)*
                (2 - 3*Sin[theta]^2)))*(3.0000000000000004*^-8*r*
              (-120/(E^(r^2/4)*r^4) + (15*((16*r)/E^(r^2/4) - (4*r^3)/
                   E^(r^2/4)))/r^5 - (6*(16/E^(r^2/4) - (16*r^2)/E^(r^2/4) + 
                  8*r^2*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^4 + 
               ((-40*r)/E^(r^2/4) + (8*r^3)/E^(r^2/4) + 16*r*
                  (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 8*r^2*
                  (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/
                       (4*E^(r^2/4))))/2))/r^3)*(-2 + 3*Sin[theta]^2)*
              (2 - 6.000000000000001*^-8*(24/(E^(r^2/4)*r^3) - 
                 (3*((16*r)/E^(r^2/4) - (4*r^3)/E^(r^2/4)))/r^4 + 
                 (16/E^(r^2/4) - (16*r^2)/E^(r^2/4) + 8*r^2*
                    (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/r^3) - 
               3.0000000000000004*^-8*r*(-120/(E^(r^2/4)*r^4) + 
                 (15*((16*r)/E^(r^2/4) - (4*r^3)/E^(r^2/4)))/r^5 - 
                 (6*(16/E^(r^2/4) - (16*r^2)/E^(r^2/4) + 8*r^2*
                     (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^4 + 
                 ((-40*r)/E^(r^2/4) + (8*r^3)/E^(r^2/4) + 16*r*
                    (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 8*r^2*
                    (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/
                         (4*E^(r^2/4))))/2))/r^3) + 1.5000000000000002*^-8*
                (168/(E^(r^2/4)*r^3) - (21*((16*r)/E^(r^2/4) - (4*r^3)/
                     E^(r^2/4)))/r^4 + (9*(16/E^(r^2/4) - (16*r^2)/
                     E^(r^2/4) + 8*r^2*(-1/2*1/E^(r^2/4) + r^2/
                       (4*E^(r^2/4)))))/r^3 - (2*((-40*r)/E^(r^2/4) + 
                    (8*r^3)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + 
                      r^2/(4*E^(r^2/4))) + 8*r^2*(r/(2*E^(r^2/4)) - 
                      (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2)))/r^2 + 
                 (-32/E^(r^2/4) + (32*r^2)/E^(r^2/4) + 32*(-1/2*1/E^(r^2/4) + 
                     r^2/(4*E^(r^2/4))) - 16*r^2*(-1/2*1/E^(r^2/4) + 
                     r^2/(4*E^(r^2/4))) + 32*r*(r/(2*E^(r^2/4)) - 
                     (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 
                   8*r^2*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - 
                     (r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/
                          (4*E^(r^2/4))))/2))/2))/r)*Sin[theta]^2 + 
               7.500000000000001*^-9*r*(-840/(E^(r^2/4)*r^4) + 
                 (105*((16*r)/E^(r^2/4) - (4*r^3)/E^(r^2/4)))/r^5 - 
                 (48*(16/E^(r^2/4) - (16*r^2)/E^(r^2/4) + 8*r^2*
                     (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^4 + 
                 (13*((-40*r)/E^(r^2/4) + (8*r^3)/E^(r^2/4) + 16*r*
                     (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 8*r^2*
                     (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/
                          (4*E^(r^2/4))))/2)))/r^3 - (3*(-32/E^(r^2/4) + 
                    (32*r^2)/E^(r^2/4) + 32*(-1/2*1/E^(r^2/4) + r^2/
                       (4*E^(r^2/4))) - 16*r^2*(-1/2*1/E^(r^2/4) + 
                      r^2/(4*E^(r^2/4))) + 32*r*(r/(2*E^(r^2/4)) - 
                      (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 
                    8*r^2*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - 
                      (r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/
                          (4*E^(r^2/4))))/2))/2)))/r^2 + ((80*r)/E^(r^2/4) - 
                   (16*r^3)/E^(r^2/4) - 32*r*(-1/2*1/E^(r^2/4) + 
                     r^2/(4*E^(r^2/4))) + 64*(r/(2*E^(r^2/4)) - 
                     (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) - 
                   16*r^2*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + 
                        r^2/(4*E^(r^2/4))))/2) + 32*r*(1/(2*E^(r^2/4)) - 
                     r^2/(4*E^(r^2/4)) + (1/(2*E^(r^2/4)) - r^2/
                        (4*E^(r^2/4)))/2 - (r*((3*r)/(4*E^(r^2/4)) - 
                        r^3/(8*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - 
                     (3*r^2)/(8*E^(r^2/4)) - (r*(r/(2*E^(r^2/4)) - 
                        (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2))/2) + 
                   8*r^2*(-1/4*r/E^(r^2/4) + (r*(-1/2*1/E^(r^2/4) + 
                        r^2/(4*E^(r^2/4))))/4 + (3*(-1/2*r/E^(r^2/4) + 
                        (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2))/2 - 
                     (r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - 
                        (r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/
                          (4*E^(r^2/4))))/2))/2))/2))/r)*Sin[theta]^2) + 
             (2 - 6.000000000000001*^-8*(24/(E^(r^2/4)*r^3) - 
                 (3*((16*r)/E^(r^2/4) - (4*r^3)/E^(r^2/4)))/r^4 + 
                 (16/E^(r^2/4) - (16*r^2)/E^(r^2/4) + 8*r^2*
                    (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/r^3) - 
               3.0000000000000004*^-8*r*(-120/(E^(r^2/4)*r^4) + 
                 (15*((16*r)/E^(r^2/4) - (4*r^3)/E^(r^2/4)))/r^5 - 
                 (6*(16/E^(r^2/4) - (16*r^2)/E^(r^2/4) + 8*r^2*
                     (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^4 + 
                 ((-40*r)/E^(r^2/4) + (8*r^3)/E^(r^2/4) + 16*r*
                    (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 8*r^2*
                    (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/
                         (4*E^(r^2/4))))/2))/r^3) + 1.5000000000000002*^-8*
                (168/(E^(r^2/4)*r^3) - (21*((16*r)/E^(r^2/4) - (4*r^3)/
                     E^(r^2/4)))/r^4 + (9*(16/E^(r^2/4) - (16*r^2)/
                     E^(r^2/4) + 8*r^2*(-1/2*1/E^(r^2/4) + r^2/
                       (4*E^(r^2/4)))))/r^3 - (2*((-40*r)/E^(r^2/4) + 
                    (8*r^3)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + 
                      r^2/(4*E^(r^2/4))) + 8*r^2*(r/(2*E^(r^2/4)) - 
                      (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2)))/r^2 + 
                 (-32/E^(r^2/4) + (32*r^2)/E^(r^2/4) + 32*(-1/2*1/E^(r^2/4) + 
                     r^2/(4*E^(r^2/4))) - 16*r^2*(-1/2*1/E^(r^2/4) + 
                     r^2/(4*E^(r^2/4))) + 32*r*(r/(2*E^(r^2/4)) - 
                     (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 
                   8*r^2*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - 
                     (r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/
                          (4*E^(r^2/4))))/2))/2))/r)*Sin[theta]^2 + 
               7.500000000000001*^-9*r*(-840/(E^(r^2/4)*r^4) + 
                 (105*((16*r)/E^(r^2/4) - (4*r^3)/E^(r^2/4)))/r^5 - 
                 (48*(16/E^(r^2/4) - (16*r^2)/E^(r^2/4) + 8*r^2*
                     (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^4 + 
                 (13*((-40*r)/E^(r^2/4) + (8*r^3)/E^(r^2/4) + 16*r*
                     (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 8*r^2*
                     (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/
                          (4*E^(r^2/4))))/2)))/r^3 - (3*(-32/E^(r^2/4) + 
                    (32*r^2)/E^(r^2/4) + 32*(-1/2*1/E^(r^2/4) + r^2/
                       (4*E^(r^2/4))) - 16*r^2*(-1/2*1/E^(r^2/4) + 
                      r^2/(4*E^(r^2/4))) + 32*r*(r/(2*E^(r^2/4)) - 
                      (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 
                    8*r^2*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - 
                      (r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/
                          (4*E^(r^2/4))))/2))/2)))/r^2 + ((80*r)/E^(r^2/4) - 
                   (16*r^3)/E^(r^2/4) - 32*r*(-1/2*1/E^(r^2/4) + 
                     r^2/(4*E^(r^2/4))) + 64*(r/(2*E^(r^2/4)) - 
                     (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) - 
                   16*r^2*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + 
                        r^2/(4*E^(r^2/4))))/2) + 32*r*(1/(2*E^(r^2/4)) - 
                     r^2/(4*E^(r^2/4)) + (1/(2*E^(r^2/4)) - r^2/
                        (4*E^(r^2/4)))/2 - (r*((3*r)/(4*E^(r^2/4)) - 
                        r^3/(8*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - 
                     (3*r^2)/(8*E^(r^2/4)) - (r*(r/(2*E^(r^2/4)) - 
                        (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2))/2) + 
                   8*r^2*(-1/4*r/E^(r^2/4) + (r*(-1/2*1/E^(r^2/4) + 
                        r^2/(4*E^(r^2/4))))/4 + (3*(-1/2*r/E^(r^2/4) + 
                        (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2))/2 - 
                     (r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - 
                        (r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/
                          (4*E^(r^2/4))))/2))/2))/2))/r)*Sin[theta]^2)*
              (-1 + 3.0000000000000004*^-8*(24/(E^(r^2/4)*r^3) - 
                 (3*((16*r)/E^(r^2/4) - (4*r^3)/E^(r^2/4)))/r^4 + 
                 (16/E^(r^2/4) - (16*r^2)/E^(r^2/4) + 8*r^2*
                    (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/r^3)*
                (-2 + 3*Sin[theta]^2)) + 1.*^-8*r*(-9*(-120/(E^(r^2/4)*r^4) + 
                 (15*((16*r)/E^(r^2/4) - (4*r^3)/E^(r^2/4)))/r^5 - 
                 (6*(16/E^(r^2/4) - (16*r^2)/E^(r^2/4) + 8*r^2*
                     (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^4 + 
                 ((-40*r)/E^(r^2/4) + (8*r^3)/E^(r^2/4) + 16*r*
                    (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 8*r^2*
                    (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/
                         (4*E^(r^2/4))))/2))/r^3) - 3*r*
                (720/(E^(r^2/4)*r^5) - (90*((16*r)/E^(r^2/4) - (4*r^3)/
                     E^(r^2/4)))/r^6 + (39*(16/E^(r^2/4) - (16*r^2)/
                     E^(r^2/4) + 8*r^2*(-1/2*1/E^(r^2/4) + r^2/
                       (4*E^(r^2/4)))))/r^5 - (9*((-40*r)/E^(r^2/4) + 
                    (8*r^3)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + 
                      r^2/(4*E^(r^2/4))) + 8*r^2*(r/(2*E^(r^2/4)) - 
                      (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2)))/r^4 + 
                 (-32/E^(r^2/4) + (32*r^2)/E^(r^2/4) + 32*(-1/2*1/E^(r^2/4) + 
                     r^2/(4*E^(r^2/4))) - 16*r^2*(-1/2*1/E^(r^2/4) + 
                     r^2/(4*E^(r^2/4))) + 32*r*(r/(2*E^(r^2/4)) - 
                     (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 
                   8*r^2*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - 
                     (r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/
                          (4*E^(r^2/4))))/2))/2))/r^3) + 
               (9*(-840/(E^(r^2/4)*r^4) + (105*((16*r)/E^(r^2/4) - (4*r^3)/
                      E^(r^2/4)))/r^5 - (48*(16/E^(r^2/4) - (16*r^2)/
                      E^(r^2/4) + 8*r^2*(-1/2*1/E^(r^2/4) + r^2/
                        (4*E^(r^2/4)))))/r^4 + (13*((-40*r)/E^(r^2/4) + 
                     (8*r^3)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + 
                       r^2/(4*E^(r^2/4))) + 8*r^2*(r/(2*E^(r^2/4)) - 
                       (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2)))/r^3 - 
                  (3*(-32/E^(r^2/4) + (32*r^2)/E^(r^2/4) + 32*
                      (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) - 16*r^2*
                      (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*r*
                      (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/
                          (4*E^(r^2/4))))/2) + 8*r^2*(3/(4*E^(r^2/4)) - 
                       (3*r^2)/(8*E^(r^2/4)) - (r*(r/(2*E^(r^2/4)) - 
                          (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2))/2)))/
                   r^2 + ((80*r)/E^(r^2/4) - (16*r^3)/E^(r^2/4) - 
                    32*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 
                    64*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/
                          (4*E^(r^2/4))))/2) - 16*r^2*(r/(2*E^(r^2/4)) - 
                      (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 
                    32*r*(1/(2*E^(r^2/4)) - r^2/(4*E^(r^2/4)) + 
                      (1/(2*E^(r^2/4)) - r^2/(4*E^(r^2/4)))/2 - 
                      (r*((3*r)/(4*E^(r^2/4)) - r^3/(8*E^(r^2/4))))/2) + 
                    16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - 
                      (r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/
                          (4*E^(r^2/4))))/2))/2) + 8*r^2*(-1/4*r/E^(r^2/4) + 
                      (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/4 + 
                      (3*(-1/2*r/E^(r^2/4) + (r*(-1/2*1/E^(r^2/4) + r^2/
                          (4*E^(r^2/4))))/2))/2 - (r*(3/(4*E^(r^2/4)) - 
                         (3*r^2)/(8*E^(r^2/4)) - (r*(r/(2*E^(r^2/4)) - 
                          (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2))/2))/
                       2))/r)*Sin[theta]^2)/4 + (3*r*(5040/(E^(r^2/4)*r^5) - 
                  (630*((16*r)/E^(r^2/4) - (4*r^3)/E^(r^2/4)))/r^6 + 
                  (297*(16/E^(r^2/4) - (16*r^2)/E^(r^2/4) + 8*r^2*
                      (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^5 - 
                  (87*((-40*r)/E^(r^2/4) + (8*r^3)/E^(r^2/4) + 16*r*
                      (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 8*r^2*
                      (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*(-32/E^(r^2/4) + 
                     (32*r^2)/E^(r^2/4) + 32*(-1/2*1/E^(r^2/4) + r^2/
                        (4*E^(r^2/4))) - 16*r^2*(-1/2*1/E^(r^2/4) + 
                       r^2/(4*E^(r^2/4))) + 32*r*(r/(2*E^(r^2/4)) - 
                       (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 
                     8*r^2*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - 
                       (r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/
                          (4*E^(r^2/4))))/2))/2)))/r^3 - 
                  (4*((80*r)/E^(r^2/4) - (16*r^3)/E^(r^2/4) - 32*r*
                      (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 
                     64*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/
                          (4*E^(r^2/4))))/2) - 16*r^2*(r/(2*E^(r^2/4)) - 
                       (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 
                     32*r*(1/(2*E^(r^2/4)) - r^2/(4*E^(r^2/4)) + 
                       (1/(2*E^(r^2/4)) - r^2/(4*E^(r^2/4)))/2 - 
                       (r*((3*r)/(4*E^(r^2/4)) - r^3/(8*E^(r^2/4))))/2) + 
                     16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - 
                       (r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/
                          (4*E^(r^2/4))))/2))/2) + 8*r^2*(-1/4*r/E^(r^2/4) + 
                       (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/4 + 
                       (3*(-1/2*r/E^(r^2/4) + (r*(-1/2*1/E^(r^2/4) + r^2/
                          (4*E^(r^2/4))))/2))/2 - (r*(3/(4*E^(r^2/4)) - 
                          (3*r^2)/(8*E^(r^2/4)) - (r*(r/(2*E^(r^2/4)) - 
                          (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2))/2))/
                        2)))/r^2 + (64/E^(r^2/4) - (64*r^2)/E^(r^2/4) - 
                    64*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*r^2*
                     (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) - 64*r*
                     (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/
                          (4*E^(r^2/4))))/2) + 64*(1/(2*E^(r^2/4)) - 
                      r^2/(4*E^(r^2/4)) + (1/(2*E^(r^2/4)) - r^2/
                         (4*E^(r^2/4)))/2 - (r*((3*r)/(4*E^(r^2/4)) - 
                         r^3/(8*E^(r^2/4))))/2) + 48*(3/(4*E^(r^2/4)) - 
                      (3*r^2)/(8*E^(r^2/4)) - (r*(r/(2*E^(r^2/4)) - 
                         (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2))/2) - 
                    16*r^2*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - 
                      (r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/
                          (4*E^(r^2/4))))/2))/2) + 32*r*((-5*r)/
                       (4*E^(r^2/4)) + r^3/(8*E^(r^2/4)) + 
                      (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2 - 
                      (r*(3/(4*E^(r^2/4)) - (5*r^2)/(8*E^(r^2/4)) + 
                         (r^2*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/4))/
                       2) + 32*r*(-1/4*r/E^(r^2/4) + (r*(-1/2*1/E^(r^2/4) + 
                         r^2/(4*E^(r^2/4))))/4 + (3*(-1/2*r/E^(r^2/4) + 
                         (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2))/2 - 
                      (r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - 
                         (r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/
                          (4*E^(r^2/4))))/2))/2))/2) + 8*r^2*
                     (-1/8*1/E^(r^2/4) + r^2/(16*E^(r^2/4)) + 
                      (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))/2 + 
                      (r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/
                          (4*E^(r^2/4))))/2))/4 + 2*(-3/(4*E^(r^2/4)) + 
                        (3*r^2)/(8*E^(r^2/4)) + (r*(r/(2*E^(r^2/4)) - 
                          (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2))/2) - 
                      (r*(-1/4*r/E^(r^2/4) + (r*(-1/2*1/E^(r^2/4) + r^2/
                          (4*E^(r^2/4))))/4 + (3*(-1/2*r/E^(r^2/4) + 
                          (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2))/2 - 
                         (r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - 
                          (r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/
                          (4*E^(r^2/4))))/2))/2))/2))/2))/r)*Sin[theta]^2)/4)*
              (-1 + 3.0000000000000004*^-8*(24/(E^(r^2/4)*r^3) - 
                 (3*((16*r)/E^(r^2/4) - (4*r^3)/E^(r^2/4)))/r^4 + 
                 (16/E^(r^2/4) - (16*r^2)/E^(r^2/4) + 8*r^2*
                    (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/r^3)*
                (-2 + 3*Sin[theta]^2)) + 1.35*^-15*(24/(E^(r^2/4)*r^3) - 
               (3*((16*r)/E^(r^2/4) - (4*r^3)/E^(r^2/4)))/r^4 + 
               (16/E^(r^2/4) - (16*r^2)/E^(r^2/4) + 8*r^2*(-1/2*1/E^(r^2/4) + 
                   r^2/(4*E^(r^2/4))))/r^3)*(-48/(E^(r^2/4)*r^3) + 
               (6*((16*r)/E^(r^2/4) - (4*r^3)/E^(r^2/4)))/r^4 - 
               (3*(16/E^(r^2/4) - (16*r^2)/E^(r^2/4) + 8*r^2*
                   (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + 
               ((-40*r)/E^(r^2/4) + (8*r^3)/E^(r^2/4) + 16*r*
                  (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 8*r^2*
                  (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/
                       (4*E^(r^2/4))))/2))/r^2)*Sin[2*theta]^2 + 
             1.35*^-15*r*(-120/(E^(r^2/4)*r^4) + (15*((16*r)/E^(r^2/4) - 
                  (4*r^3)/E^(r^2/4)))/r^5 - (6*(16/E^(r^2/4) - (16*r^2)/
                   E^(r^2/4) + 8*r^2*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/
                r^4 + ((-40*r)/E^(r^2/4) + (8*r^3)/E^(r^2/4) + 
                 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 
                 8*r^2*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + 
                      r^2/(4*E^(r^2/4))))/2))/r^3)*(-48/(E^(r^2/4)*r^3) + 
               (6*((16*r)/E^(r^2/4) - (4*r^3)/E^(r^2/4)))/r^4 - 
               (3*(16/E^(r^2/4) - (16*r^2)/E^(r^2/4) + 8*r^2*
                   (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + 
               ((-40*r)/E^(r^2/4) + (8*r^3)/E^(r^2/4) + 16*r*
                  (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 8*r^2*
                  (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/
                       (4*E^(r^2/4))))/2))/r^2)*Sin[2*theta]^2 + 
             1.35*^-15*r*(24/(E^(r^2/4)*r^3) - (3*((16*r)/E^(r^2/4) - 
                  (4*r^3)/E^(r^2/4)))/r^4 + (16/E^(r^2/4) - (16*r^2)/
                  E^(r^2/4) + 8*r^2*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/
                r^3)*(240/(E^(r^2/4)*r^4) - (30*((16*r)/E^(r^2/4) - 
                  (4*r^3)/E^(r^2/4)))/r^5 + (15*(16/E^(r^2/4) - (16*r^2)/
                   E^(r^2/4) + 8*r^2*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/
                r^4 - (5*((-40*r)/E^(r^2/4) + (8*r^3)/E^(r^2/4) + 
                  16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 
                  8*r^2*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + 
                       r^2/(4*E^(r^2/4))))/2)))/r^3 + (-32/E^(r^2/4) + 
                 (32*r^2)/E^(r^2/4) + 32*(-1/2*1/E^(r^2/4) + 
                   r^2/(4*E^(r^2/4))) - 16*r^2*(-1/2*1/E^(r^2/4) + 
                   r^2/(4*E^(r^2/4))) + 32*r*(r/(2*E^(r^2/4)) - 
                   (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 
                 8*r^2*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - 
                   (r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/
                          (4*E^(r^2/4))))/2))/2))/r^2)*Sin[2*theta]^2) - 
           r*(r*(2 - 6.000000000000001*^-8*(24/(E^(r^2/4)*r^3) - 
                 (3*((16*r)/E^(r^2/4) - (4*r^3)/E^(r^2/4)))/r^4 + 
                 (16/E^(r^2/4) - (16*r^2)/E^(r^2/4) + 8*r^2*
                    (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/r^3) - 
               3.0000000000000004*^-8*r*(-120/(E^(r^2/4)*r^4) + 
                 (15*((16*r)/E^(r^2/4) - (4*r^3)/E^(r^2/4)))/r^5 - 
                 (6*(16/E^(r^2/4) - (16*r^2)/E^(r^2/4) + 8*r^2*
                     (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^4 + 
                 ((-40*r)/E^(r^2/4) + (8*r^3)/E^(r^2/4) + 16*r*
                    (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 8*r^2*
                    (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/
                         (4*E^(r^2/4))))/2))/r^3) + 1.5000000000000002*^-8*
                (168/(E^(r^2/4)*r^3) - (21*((16*r)/E^(r^2/4) - (4*r^3)/
                     E^(r^2/4)))/r^4 + (9*(16/E^(r^2/4) - (16*r^2)/
                     E^(r^2/4) + 8*r^2*(-1/2*1/E^(r^2/4) + r^2/
                       (4*E^(r^2/4)))))/r^3 - (2*((-40*r)/E^(r^2/4) + 
                    (8*r^3)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + 
                      r^2/(4*E^(r^2/4))) + 8*r^2*(r/(2*E^(r^2/4)) - 
                      (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2)))/r^2 + 
                 (-32/E^(r^2/4) + (32*r^2)/E^(r^2/4) + 32*(-1/2*1/E^(r^2/4) + 
                     r^2/(4*E^(r^2/4))) - 16*r^2*(-1/2*1/E^(r^2/4) + 
                     r^2/(4*E^(r^2/4))) + 32*r*(r/(2*E^(r^2/4)) - 
                     (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 
                   8*r^2*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - 
                     (r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/
                          (4*E^(r^2/4))))/2))/2))/r)*Sin[theta]^2 + 
               7.500000000000001*^-9*r*(-840/(E^(r^2/4)*r^4) + 
                 (105*((16*r)/E^(r^2/4) - (4*r^3)/E^(r^2/4)))/r^5 - 
                 (48*(16/E^(r^2/4) - (16*r^2)/E^(r^2/4) + 8*r^2*
                     (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^4 + 
                 (13*((-40*r)/E^(r^2/4) + (8*r^3)/E^(r^2/4) + 16*r*
                     (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 8*r^2*
                     (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/
                          (4*E^(r^2/4))))/2)))/r^3 - (3*(-32/E^(r^2/4) + 
                    (32*r^2)/E^(r^2/4) + 32*(-1/2*1/E^(r^2/4) + r^2/
                       (4*E^(r^2/4))) - 16*r^2*(-1/2*1/E^(r^2/4) + 
                      r^2/(4*E^(r^2/4))) + 32*r*(r/(2*E^(r^2/4)) - 
                      (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 
                    8*r^2*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - 
                      (r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/
                          (4*E^(r^2/4))))/2))/2)))/r^2 + ((80*r)/E^(r^2/4) - 
                   (16*r^3)/E^(r^2/4) - 32*r*(-1/2*1/E^(r^2/4) + 
                     r^2/(4*E^(r^2/4))) + 64*(r/(2*E^(r^2/4)) - 
                     (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) - 
                   16*r^2*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + 
                        r^2/(4*E^(r^2/4))))/2) + 32*r*(1/(2*E^(r^2/4)) - 
                     r^2/(4*E^(r^2/4)) + (1/(2*E^(r^2/4)) - r^2/
                        (4*E^(r^2/4)))/2 - (r*((3*r)/(4*E^(r^2/4)) - 
                        r^3/(8*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - 
                     (3*r^2)/(8*E^(r^2/4)) - (r*(r/(2*E^(r^2/4)) - 
                        (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2))/2) + 
                   8*r^2*(-1/4*r/E^(r^2/4) + (r*(-1/2*1/E^(r^2/4) + 
                        r^2/(4*E^(r^2/4))))/4 + (3*(-1/2*r/E^(r^2/4) + 
                        (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2))/2 - 
                     (r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - 
                        (r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/
                          (4*E^(r^2/4))))/2))/2))/2))/r)*Sin[theta]^2)*
              (-1 + 3.0000000000000004*^-8*(24/(E^(r^2/4)*r^3) - 
                 (3*((16*r)/E^(r^2/4) - (4*r^3)/E^(r^2/4)))/r^4 + 
                 (16/E^(r^2/4) - (16*r^2)/E^(r^2/4) + 8*r^2*
                    (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/r^3)*
                (-2 + 3*Sin[theta]^2)) + 1.35*^-15*r*(24/(E^(r^2/4)*r^3) - 
               (3*((16*r)/E^(r^2/4) - (4*r^3)/E^(r^2/4)))/r^4 + 
               (16/E^(r^2/4) - (16*r^2)/E^(r^2/4) + 8*r^2*(-1/2*1/E^(r^2/4) + 
                   r^2/(4*E^(r^2/4))))/r^3)*(-48/(E^(r^2/4)*r^3) + 
               (6*((16*r)/E^(r^2/4) - (4*r^3)/E^(r^2/4)))/r^4 - 
               (3*(16/E^(r^2/4) - (16*r^2)/E^(r^2/4) + 8*r^2*
                   (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + 
               ((-40*r)/E^(r^2/4) + (8*r^3)/E^(r^2/4) + 16*r*
                  (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 8*r^2*
                  (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/
                       (4*E^(r^2/4))))/2))/r^2)*Sin[2*theta]^2)*
            (3.0000000000000004*^-8*(-120/(E^(r^2/4)*r^4) + 
               (15*((16*r)/E^(r^2/4) - (4*r^3)/E^(r^2/4)))/r^5 - 
               (6*(16/E^(r^2/4) - (16*r^2)/E^(r^2/4) + 8*r^2*
                   (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^4 + 
               ((-40*r)/E^(r^2/4) + (8*r^3)/E^(r^2/4) + 16*r*
                  (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 8*r^2*
                  (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/
                       (4*E^(r^2/4))))/2))/r^3)*(-2 + 3*Sin[theta]^2)*
              (1 - 3.0000000000000004*^-8*(24/(E^(r^2/4)*r^3) - 
                 (3*((16*r)/E^(r^2/4) - (4*r^3)/E^(r^2/4)))/r^4 + 
                 (16/E^(r^2/4) - (16*r^2)/E^(r^2/4) + 8*r^2*
                    (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/r^3) + 
               7.500000000000001*^-9*(168/(E^(r^2/4)*r^3) - 
                 (21*((16*r)/E^(r^2/4) - (4*r^3)/E^(r^2/4)))/r^4 + 
                 (9*(16/E^(r^2/4) - (16*r^2)/E^(r^2/4) + 8*r^2*
                     (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 - 
                 (2*((-40*r)/E^(r^2/4) + (8*r^3)/E^(r^2/4) + 16*r*
                     (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 8*r^2*
                     (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/
                          (4*E^(r^2/4))))/2)))/r^2 + (-32/E^(r^2/4) + 
                   (32*r^2)/E^(r^2/4) + 32*(-1/2*1/E^(r^2/4) + r^2/
                      (4*E^(r^2/4))) - 16*r^2*(-1/2*1/E^(r^2/4) + 
                     r^2/(4*E^(r^2/4))) + 32*r*(r/(2*E^(r^2/4)) - 
                     (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 
                   8*r^2*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - 
                     (r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/
                          (4*E^(r^2/4))))/2))/2))/r)*Sin[theta]^2) + 
             1.*^-8*(3*(-120/(E^(r^2/4)*r^4) + (15*((16*r)/E^(r^2/4) - 
                    (4*r^3)/E^(r^2/4)))/r^5 - (6*(16/E^(r^2/4) - (16*r^2)/
                     E^(r^2/4) + 8*r^2*(-1/2*1/E^(r^2/4) + r^2/
                       (4*E^(r^2/4)))))/r^4 + ((-40*r)/E^(r^2/4) + 
                   (8*r^3)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + 
                     r^2/(4*E^(r^2/4))) + 8*r^2*(r/(2*E^(r^2/4)) - 
                     (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2))/r^3) - 
               (3*(-840/(E^(r^2/4)*r^4) + (105*((16*r)/E^(r^2/4) - (4*r^3)/
                      E^(r^2/4)))/r^5 - (48*(16/E^(r^2/4) - (16*r^2)/
                      E^(r^2/4) + 8*r^2*(-1/2*1/E^(r^2/4) + r^2/
                        (4*E^(r^2/4)))))/r^4 + (13*((-40*r)/E^(r^2/4) + 
                     (8*r^3)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + 
                       r^2/(4*E^(r^2/4))) + 8*r^2*(r/(2*E^(r^2/4)) - 
                       (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2)))/r^3 - 
                  (3*(-32/E^(r^2/4) + (32*r^2)/E^(r^2/4) + 32*
                      (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) - 16*r^2*
                      (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*r*
                      (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/
                          (4*E^(r^2/4))))/2) + 8*r^2*(3/(4*E^(r^2/4)) - 
                       (3*r^2)/(8*E^(r^2/4)) - (r*(r/(2*E^(r^2/4)) - 
                          (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2))/2)))/
                   r^2 + ((80*r)/E^(r^2/4) - (16*r^3)/E^(r^2/4) - 
                    32*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 
                    64*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/
                          (4*E^(r^2/4))))/2) - 16*r^2*(r/(2*E^(r^2/4)) - 
                      (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 
                    32*r*(1/(2*E^(r^2/4)) - r^2/(4*E^(r^2/4)) + 
                      (1/(2*E^(r^2/4)) - r^2/(4*E^(r^2/4)))/2 - 
                      (r*((3*r)/(4*E^(r^2/4)) - r^3/(8*E^(r^2/4))))/2) + 
                    16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - 
                      (r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/
                          (4*E^(r^2/4))))/2))/2) + 8*r^2*(-1/4*r/E^(r^2/4) + 
                      (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/4 + 
                      (3*(-1/2*r/E^(r^2/4) + (r*(-1/2*1/E^(r^2/4) + r^2/
                          (4*E^(r^2/4))))/2))/2 - (r*(3/(4*E^(r^2/4)) - 
                         (3*r^2)/(8*E^(r^2/4)) - (r*(r/(2*E^(r^2/4)) - 
                          (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2))/2))/
                       2))/r)*Sin[theta]^2)/4)*(1 + 3.0000000000000004*^-8*
                (24/(E^(r^2/4)*r^3) - (3*((16*r)/E^(r^2/4) - (4*r^3)/
                     E^(r^2/4)))/r^4 + (16/E^(r^2/4) - (16*r^2)/E^(r^2/4) + 
                   8*r^2*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/r^3)*
                (2 - 3*Sin[theta]^2)) + 4.5*^-16*(-48/(E^(r^2/4)*r^3) + 
               (6*((16*r)/E^(r^2/4) - (4*r^3)/E^(r^2/4)))/r^4 - 
               (3*(16/E^(r^2/4) - (16*r^2)/E^(r^2/4) + 8*r^2*
                   (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + 
               ((-40*r)/E^(r^2/4) + (8*r^3)/E^(r^2/4) + 16*r*
                  (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 8*r^2*
                  (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/
                       (4*E^(r^2/4))))/2))/r^2)*(240/(E^(r^2/4)*r^4) - 
               (30*((16*r)/E^(r^2/4) - (4*r^3)/E^(r^2/4)))/r^5 + 
               (15*(16/E^(r^2/4) - (16*r^2)/E^(r^2/4) + 8*r^2*
                   (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^4 - 
               (5*((-40*r)/E^(r^2/4) + (8*r^3)/E^(r^2/4) + 16*r*
                   (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 8*r^2*
                   (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/
                        (4*E^(r^2/4))))/2)))/r^3 + (-32/E^(r^2/4) + 
                 (32*r^2)/E^(r^2/4) + 32*(-1/2*1/E^(r^2/4) + 
                   r^2/(4*E^(r^2/4))) - 16*r^2*(-1/2*1/E^(r^2/4) + 
                   r^2/(4*E^(r^2/4))) + 32*r*(r/(2*E^(r^2/4)) - 
                   (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 
                 8*r^2*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - 
                   (r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/
                          (4*E^(r^2/4))))/2))/2))/r^2)*Sin[2*theta]^2))/
          (2*r^3*(-9.*^-16*(-48/(E^(r^2/4)*r^3) + (6*((16*r)/E^(r^2/4) - 
                   (4*r^3)/E^(r^2/4)))/r^4 - (3*(16/E^(r^2/4) - (16*r^2)/
                    E^(r^2/4) + 8*r^2*(-1/2*1/E^(r^2/4) + r^2/
                      (4*E^(r^2/4)))))/r^3 + ((-40*r)/E^(r^2/4) + 
                  (8*r^3)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + 
                    r^2/(4*E^(r^2/4))) + 8*r^2*(r/(2*E^(r^2/4)) - 
                    (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2))/r^2)^2*
              Cos[theta]^2*Sin[theta]^2 + (1 - 3.0000000000000004*^-8*
                (24/(E^(r^2/4)*r^3) - (3*((16*r)/E^(r^2/4) - (4*r^3)/
                     E^(r^2/4)))/r^4 + (16/E^(r^2/4) - (16*r^2)/E^(r^2/4) + 
                   8*r^2*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/r^3) + 
               7.500000000000001*^-9*(168/(E^(r^2/4)*r^3) - 
                 (21*((16*r)/E^(r^2/4) - (4*r^3)/E^(r^2/4)))/r^4 + 
                 (9*(16/E^(r^2/4) - (16*r^2)/E^(r^2/4) + 8*r^2*
                     (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 - 
                 (2*((-40*r)/E^(r^2/4) + (8*r^3)/E^(r^2/4) + 16*r*
                     (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 8*r^2*
                     (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/
                          (4*E^(r^2/4))))/2)))/r^2 + (-32/E^(r^2/4) + 
                   (32*r^2)/E^(r^2/4) + 32*(-1/2*1/E^(r^2/4) + r^2/
                      (4*E^(r^2/4))) - 16*r^2*(-1/2*1/E^(r^2/4) + 
                     r^2/(4*E^(r^2/4))) + 32*r*(r/(2*E^(r^2/4)) - 
                     (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 
                   8*r^2*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - 
                     (r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/
                          (4*E^(r^2/4))))/2))/2))/r)*Sin[theta]^2)*
              (1 + 3.0000000000000004*^-8*(24/(E^(r^2/4)*r^3) - 
                 (3*((16*r)/E^(r^2/4) - (4*r^3)/E^(r^2/4)))/r^4 + 
                 (16/E^(r^2/4) - (16*r^2)/E^(r^2/4) + 8*r^2*
                    (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/r^3)*
                (2 - 3*Sin[theta]^2)))^2)) - 3.0000000000000004*^-8*r*
        (-48/(E^(r^2/4)*r^3) + (6*((16*r)/E^(r^2/4) - (4*r^3)/E^(r^2/4)))/
          r^4 - (3*(16/E^(r^2/4) - (16*r^2)/E^(r^2/4) + 
            8*r^2*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + 
         ((-40*r)/E^(r^2/4) + (8*r^3)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + 
             r^2/(4*E^(r^2/4))) + 8*r^2*(r/(2*E^(r^2/4)) - 
             (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2))/r^2)*Cos[theta]*
        Sin[theta]*((1.5000000000000002*^-16*r*
           ((-6*((16*r)/E^(r^2/4) - (4*r^3)/E^(r^2/4)))/r^5 + 
            (6*(16/E^(r^2/4) - (16*r^2)/E^(r^2/4) + 8*r^2*(-1/2*1/E^(r^2/4) + 
                 r^2/(4*E^(r^2/4)))))/r^4 - (3*((-40*r)/E^(r^2/4) + (8*r^3)/
                E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 8*
                r^2*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/
                     (4*E^(r^2/4))))/2)))/r^3 + (-32/E^(r^2/4) + 
              (32*r^2)/E^(r^2/4) + 32*(-1/2*1/E^(r^2/4) + 
                r^2/(4*E^(r^2/4))) - 16*r^2*(-1/2*1/E^(r^2/4) + 
                r^2/(4*E^(r^2/4))) + 32*r*(r/(2*E^(r^2/4)) - 
                (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 
              8*r^2*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - 
                (r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/
                       (4*E^(r^2/4))))/2))/2))/r^2)*Cos[theta]*Sin[theta]*
           (-9.*^-8*(-48/(E^(r^2/4)*r^3) + (6*((16*r)/E^(r^2/4) - 
                 (4*r^3)/E^(r^2/4)))/r^4 - (3*(16/E^(r^2/4) - (16*r^2)/
                  E^(r^2/4) + 8*r^2*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/
               r^3 + ((-40*r)/E^(r^2/4) + (8*r^3)/E^(r^2/4) + 
                16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 
                8*r^2*(r/(2*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) - 
                 (4*r^3)/E^(r^2/4)))/r^5 + (6*(16/E^(r^2/4) - (16*r^2)/
                  E^(r^2/4) + 8*r^2*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/
               r^4 - (3*((-40*r)/E^(r^2/4) + (8*r^3)/E^(r^2/4) + 
                 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 
                 8*r^2*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + 
                      r^2/(4*E^(r^2/4))))/2)))/r^3 + (-32/E^(r^2/4) + 
                (32*r^2)/E^(r^2/4) + 32*(-1/2*1/E^(r^2/4) + 
                  r^2/(4*E^(r^2/4))) - 16*r^2*(-1/2*1/E^(r^2/4) + 
                  r^2/(4*E^(r^2/4))) + 32*r*(r/(2*E^(r^2/4)) - 
                  (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 
                8*r^2*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - 
                  (r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/
                         (4*E^(r^2/4))))/2))/2))/r^2)*Cos[theta]^2*
             Sin[theta]^2 - (3*((3*((16*r)/E^(r^2/4) - (4*r^3)/E^(r^2/4)))/
                r^5 - (3*(16/E^(r^2/4) - (16*r^2)/E^(r^2/4) + 8*r^2*
                   (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^4 + 
               ((-40*r)/E^(r^2/4) + (8*r^3)/E^(r^2/4) + 16*r*
                  (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 8*r^2*
                  (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/
                       (4*E^(r^2/4))))/2))/r^3)*(1 + 3*Cos[2*theta])*
              (-1 + 3.0000000000000004*^-8*(24/(E^(r^2/4)*r^3) - 
                 (3*((16*r)/E^(r^2/4) - (4*r^3)/E^(r^2/4)))/r^4 + 
                 (16/E^(r^2/4) - (16*r^2)/E^(r^2/4) + 8*r^2*
                    (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/r^3) - 
               7.500000000000001*^-9*(168/(E^(r^2/4)*r^3) - 
                 (21*((16*r)/E^(r^2/4) - (4*r^3)/E^(r^2/4)))/r^4 + 
                 (9*(16/E^(r^2/4) - (16*r^2)/E^(r^2/4) + 8*r^2*
                     (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 - 
                 (2*((-40*r)/E^(r^2/4) + (8*r^3)/E^(r^2/4) + 16*r*
                     (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 8*r^2*
                     (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/
                          (4*E^(r^2/4))))/2)))/r^2 + (-32/E^(r^2/4) + 
                   (32*r^2)/E^(r^2/4) + 32*(-1/2*1/E^(r^2/4) + r^2/
                      (4*E^(r^2/4))) - 16*r^2*(-1/2*1/E^(r^2/4) + 
                     r^2/(4*E^(r^2/4))) + 32*r*(r/(2*E^(r^2/4)) - 
                     (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 
                   8*r^2*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - 
                     (r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/
                          (4*E^(r^2/4))))/2))/2))/r)*Sin[theta]^2))/2))/
          (2 - 9.*^-16*(24/(E^(r^2/4)*r^3) - (3*((16*r)/E^(r^2/4) - 
                 (4*r^3)/E^(r^2/4)))/r^4 + (16/E^(r^2/4) - (16*r^2)/
                 E^(r^2/4) + 8*r^2*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/r^
                3)^2*(1 + 3*Cos[2*theta]) + 1.5000000000000002*^-8*
            (168/(E^(r^2/4)*r^3) - (21*((16*r)/E^(r^2/4) - (4*r^3)/
                 E^(r^2/4)))/r^4 + (9*(16/E^(r^2/4) - (16*r^2)/E^(r^2/4) + 
                8*r^2*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 - 
             (2*((-40*r)/E^(r^2/4) + (8*r^3)/E^(r^2/4) + 16*r*
                 (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 8*r^2*
                 (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/
                      (4*E^(r^2/4))))/2)))/r^2 + (-32/E^(r^2/4) + (32*r^2)/
                E^(r^2/4) + 32*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) - 16*
                r^2*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*r*
                (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/
                  2) + 8*r^2*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - 
                 (r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/
                        (4*E^(r^2/4))))/2))/2))/r)*Sin[theta]^2 + 
           3.0000000000000004*^-8*(24/(E^(r^2/4)*r^3) - 
             (3*((16*r)/E^(r^2/4) - (4*r^3)/E^(r^2/4)))/r^4 + 
             (16/E^(r^2/4) - (16*r^2)/E^(r^2/4) + 8*r^2*(-1/2*1/E^(r^2/4) + 
                 r^2/(4*E^(r^2/4))))/r^3)*(-1 + 3*Cos[2*theta] + 
             7.500000000000001*^-9*(168/(E^(r^2/4)*r^3) - 
               (21*((16*r)/E^(r^2/4) - (4*r^3)/E^(r^2/4)))/r^4 + 
               (9*(16/E^(r^2/4) - (16*r^2)/E^(r^2/4) + 8*r^2*
                   (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 - 
               (2*((-40*r)/E^(r^2/4) + (8*r^3)/E^(r^2/4) + 16*r*
                   (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 8*r^2*
                   (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/
                        (4*E^(r^2/4))))/2)))/r^2 + (-32/E^(r^2/4) + 
                 (32*r^2)/E^(r^2/4) + 32*(-1/2*1/E^(r^2/4) + 
                   r^2/(4*E^(r^2/4))) - 16*r^2*(-1/2*1/E^(r^2/4) + 
                   r^2/(4*E^(r^2/4))) + 32*r*(r/(2*E^(r^2/4)) - 
                   (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 
                 8*r^2*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - 
                   (r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/
                          (4*E^(r^2/4))))/2))/2))/r)*(1 + 3*Cos[2*theta])*
              Sin[theta]^2) - 4.5*^-16*(-48/(E^(r^2/4)*r^3) + 
              (6*((16*r)/E^(r^2/4) - (4*r^3)/E^(r^2/4)))/r^4 - 
              (3*(16/E^(r^2/4) - (16*r^2)/E^(r^2/4) + 8*r^2*
                  (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + 
              ((-40*r)/E^(r^2/4) + (8*r^3)/E^(r^2/4) + 16*r*
                 (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 8*r^2*
                 (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/
                      (4*E^(r^2/4))))/2))/r^2)^2*Sin[2*theta]^2) - 
         (2.25*^-16*r*((3*((16*r)/E^(r^2/4) - (4*r^3)/E^(r^2/4)))/r^5 - 
            (3*(16/E^(r^2/4) - (16*r^2)/E^(r^2/4) + 8*r^2*(-1/2*1/E^(r^2/4) + 
                 r^2/(4*E^(r^2/4)))))/r^4 + ((-40*r)/E^(r^2/4) + 
              (8*r^3)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + 
                r^2/(4*E^(r^2/4))) + 8*r^2*(r/(2*E^(r^2/4)) - 
                (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2))/r^3)*
           Cos[theta]*(1 + 3*Cos[2*theta])*Sin[theta]*
           (((-6*((16*r)/E^(r^2/4) - (4*r^3)/E^(r^2/4)))/r^5 + 
              (6*(16/E^(r^2/4) - (16*r^2)/E^(r^2/4) + 8*r^2*
                  (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^4 - 
              (3*((-40*r)/E^(r^2/4) + (8*r^3)/E^(r^2/4) + 16*r*
                  (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 8*r^2*
                  (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/
                       (4*E^(r^2/4))))/2)))/r^3 + (-32/E^(r^2/4) + 
                (32*r^2)/E^(r^2/4) + 32*(-1/2*1/E^(r^2/4) + 
                  r^2/(4*E^(r^2/4))) - 16*r^2*(-1/2*1/E^(r^2/4) + 
                  r^2/(4*E^(r^2/4))) + 32*r*(r/(2*E^(r^2/4)) - 
                  (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 
                8*r^2*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - 
                  (r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/
                         (4*E^(r^2/4))))/2))/2))/r^2)*
             (1 - 3.0000000000000004*^-8*(24/(E^(r^2/4)*r^3) - 
                (3*((16*r)/E^(r^2/4) - (4*r^3)/E^(r^2/4)))/r^4 + 
                (16/E^(r^2/4) - (16*r^2)/E^(r^2/4) + 8*r^2*
                   (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/r^3) + 
              7.500000000000001*^-9*(168/(E^(r^2/4)*r^3) - 
                (21*((16*r)/E^(r^2/4) - (4*r^3)/E^(r^2/4)))/r^4 + 
                (9*(16/E^(r^2/4) - (16*r^2)/E^(r^2/4) + 8*r^2*
                    (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 - 
                (2*((-40*r)/E^(r^2/4) + (8*r^3)/E^(r^2/4) + 16*r*
                    (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 8*r^2*
                    (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/
                         (4*E^(r^2/4))))/2)))/r^2 + (-32/E^(r^2/4) + 
                  (32*r^2)/E^(r^2/4) + 32*(-1/2*1/E^(r^2/4) + r^2/
                     (4*E^(r^2/4))) - 16*r^2*(-1/2*1/E^(r^2/4) + 
                    r^2/(4*E^(r^2/4))) + 32*r*(r/(2*E^(r^2/4)) - 
                    (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 
                  8*r^2*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - 
                    (r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/
                          (4*E^(r^2/4))))/2))/2))/r)*Sin[theta]^2) + 
            1.*^-8*(-48/(E^(r^2/4)*r^3) + (6*((16*r)/E^(r^2/4) - 
                 (4*r^3)/E^(r^2/4)))/r^4 - (3*(16/E^(r^2/4) - (16*r^2)/
                  E^(r^2/4) + 8*r^2*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/
               r^3 + ((-40*r)/E^(r^2/4) + (8*r^3)/E^(r^2/4) + 
                16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 
                8*r^2*(r/(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) - (4*r^3)/E^(r^2/4)))/r^5 - 
                (3*(16/E^(r^2/4) - (16*r^2)/E^(r^2/4) + 8*r^2*
                    (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^4 + 
                ((-40*r)/E^(r^2/4) + (8*r^3)/E^(r^2/4) + 16*r*
                   (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 8*r^2*
                   (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/
                        (4*E^(r^2/4))))/2))/r^3) - 
              (3*((21*((16*r)/E^(r^2/4) - (4*r^3)/E^(r^2/4)))/r^5 - 
                 (21*(16/E^(r^2/4) - (16*r^2)/E^(r^2/4) + 8*r^2*
                     (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^4 + 
                 (9*((-40*r)/E^(r^2/4) + (8*r^3)/E^(r^2/4) + 16*r*
                     (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 8*r^2*
                     (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/
                          (4*E^(r^2/4))))/2)))/r^3 - (2*(-32/E^(r^2/4) + 
                    (32*r^2)/E^(r^2/4) + 32*(-1/2*1/E^(r^2/4) + r^2/
                       (4*E^(r^2/4))) - 16*r^2*(-1/2*1/E^(r^2/4) + 
                      r^2/(4*E^(r^2/4))) + 32*r*(r/(2*E^(r^2/4)) - 
                      (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 
                    8*r^2*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - 
                      (r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/
                          (4*E^(r^2/4))))/2))/2)))/r^2 + ((80*r)/E^(r^2/4) - 
                   (16*r^3)/E^(r^2/4) - 32*r*(-1/2*1/E^(r^2/4) + 
                     r^2/(4*E^(r^2/4))) + 64*(r/(2*E^(r^2/4)) - 
                     (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) - 
                   16*r^2*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + 
                        r^2/(4*E^(r^2/4))))/2) + 32*r*(1/(2*E^(r^2/4)) - 
                     r^2/(4*E^(r^2/4)) + (1/(2*E^(r^2/4)) - r^2/
                        (4*E^(r^2/4)))/2 - (r*((3*r)/(4*E^(r^2/4)) - 
                        r^3/(8*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - 
                     (3*r^2)/(8*E^(r^2/4)) - (r*(r/(2*E^(r^2/4)) - 
                        (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2))/2) + 
                   8*r^2*(-1/4*r/E^(r^2/4) + (r*(-1/2*1/E^(r^2/4) + 
                        r^2/(4*E^(r^2/4))))/4 + (3*(-1/2*r/E^(r^2/4) + 
                        (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2))/2 - 
                     (r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - 
                        (r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/
                          (4*E^(r^2/4))))/2))/2))/2))/r)*Sin[theta]^2)/4)))/
          (2 - 9.*^-16*(24/(E^(r^2/4)*r^3) - (3*((16*r)/E^(r^2/4) - 
                 (4*r^3)/E^(r^2/4)))/r^4 + (16/E^(r^2/4) - (16*r^2)/
                 E^(r^2/4) + 8*r^2*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/r^
                3)^2*(1 + 3*Cos[2*theta]) + 1.5000000000000002*^-8*
            (168/(E^(r^2/4)*r^3) - (21*((16*r)/E^(r^2/4) - (4*r^3)/
                 E^(r^2/4)))/r^4 + (9*(16/E^(r^2/4) - (16*r^2)/E^(r^2/4) + 
                8*r^2*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 - 
             (2*((-40*r)/E^(r^2/4) + (8*r^3)/E^(r^2/4) + 16*r*
                 (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 8*r^2*
                 (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/
                      (4*E^(r^2/4))))/2)))/r^2 + (-32/E^(r^2/4) + (32*r^2)/
                E^(r^2/4) + 32*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) - 16*
                r^2*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*r*
                (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/
                  2) + 8*r^2*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - 
                 (r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/
                        (4*E^(r^2/4))))/2))/2))/r)*Sin[theta]^2 + 
           3.0000000000000004*^-8*(24/(E^(r^2/4)*r^3) - 
             (3*((16*r)/E^(r^2/4) - (4*r^3)/E^(r^2/4)))/r^4 + 
             (16/E^(r^2/4) - (16*r^2)/E^(r^2/4) + 8*r^2*(-1/2*1/E^(r^2/4) + 
                 r^2/(4*E^(r^2/4))))/r^3)*(-1 + 3*Cos[2*theta] + 
             7.500000000000001*^-9*(168/(E^(r^2/4)*r^3) - 
               (21*((16*r)/E^(r^2/4) - (4*r^3)/E^(r^2/4)))/r^4 + 
               (9*(16/E^(r^2/4) - (16*r^2)/E^(r^2/4) + 8*r^2*
                   (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 - 
               (2*((-40*r)/E^(r^2/4) + (8*r^3)/E^(r^2/4) + 16*r*
                   (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 8*r^2*
                   (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/
                        (4*E^(r^2/4))))/2)))/r^2 + (-32/E^(r^2/4) + 
                 (32*r^2)/E^(r^2/4) + 32*(-1/2*1/E^(r^2/4) + 
                   r^2/(4*E^(r^2/4))) - 16*r^2*(-1/2*1/E^(r^2/4) + 
                   r^2/(4*E^(r^2/4))) + 32*r*(r/(2*E^(r^2/4)) - 
                   (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 
                 8*r^2*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - 
                   (r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/
                          (4*E^(r^2/4))))/2))/2))/r)*(1 + 3*Cos[2*theta])*
              Sin[theta]^2) - 4.5*^-16*(-48/(E^(r^2/4)*r^3) + 
              (6*((16*r)/E^(r^2/4) - (4*r^3)/E^(r^2/4)))/r^4 - 
              (3*(16/E^(r^2/4) - (16*r^2)/E^(r^2/4) + 8*r^2*
                  (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + 
              ((-40*r)/E^(r^2/4) + (8*r^3)/E^(r^2/4) + 16*r*
                 (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 8*r^2*
                 (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/
                      (4*E^(r^2/4))))/2))/r^2)^2*Sin[2*theta]^2) + 
         (1.5000000000000002*^-8*Cos[theta]*Sin[theta]*
           (-1.8*^-7*(24/(E^(r^2/4)*r^3) - (3*((16*r)/E^(r^2/4) - 
                  (4*r^3)/E^(r^2/4)))/r^4 + (16/E^(r^2/4) - (16*r^2)/
                  E^(r^2/4) + 8*r^2*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/
                r^3)^2 + 6*(24/(E^(r^2/4)*r^3) - (3*((16*r)/E^(r^2/4) - 
                 (4*r^3)/E^(r^2/4)))/r^4 + (16/E^(r^2/4) - (16*r^2)/
                 E^(r^2/4) + 8*r^2*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/r^
                3)*(1 + 1.*^-8*(-48/(E^(r^2/4)*r^3) + (6*((16*r)/E^(r^2/4) - 
                   (4*r^3)/E^(r^2/4)))/r^4 - (3*(16/E^(r^2/4) - (16*r^2)/
                    E^(r^2/4) + 8*r^2*(-1/2*1/E^(r^2/4) + r^2/
                      (4*E^(r^2/4)))))/r^3 + ((-40*r)/E^(r^2/4) + 
                  (8*r^3)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + 
                    r^2/(4*E^(r^2/4))) + 8*r^2*(r/(2*E^(r^2/4)) - 
                    (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2))/r^2) + 
              7.500000000000001*^-9*(168/(E^(r^2/4)*r^3) - 
                (21*((16*r)/E^(r^2/4) - (4*r^3)/E^(r^2/4)))/r^4 + 
                (9*(16/E^(r^2/4) - (16*r^2)/E^(r^2/4) + 8*r^2*
                    (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 - 
                (2*((-40*r)/E^(r^2/4) + (8*r^3)/E^(r^2/4) + 16*r*
                    (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 8*r^2*
                    (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/
                         (4*E^(r^2/4))))/2)))/r^2 + (-32/E^(r^2/4) + 
                  (32*r^2)/E^(r^2/4) + 32*(-1/2*1/E^(r^2/4) + r^2/
                     (4*E^(r^2/4))) - 16*r^2*(-1/2*1/E^(r^2/4) + 
                    r^2/(4*E^(r^2/4))) + 32*r*(r/(2*E^(r^2/4)) - 
                    (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 
                  8*r^2*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - 
                    (r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/
                          (4*E^(r^2/4))))/2))/2))/r)*Sin[theta]^2) + 
            (-48/(E^(r^2/4)*r^3) + (6*((16*r)/E^(r^2/4) - (4*r^3)/E^(r^2/4)))/
               r^4 - (3*(16/E^(r^2/4) - (16*r^2)/E^(r^2/4) + 8*r^2*
                  (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + 
              ((-40*r)/E^(r^2/4) + (8*r^3)/E^(r^2/4) + 16*r*
                 (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 8*r^2*
                 (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/
                      (4*E^(r^2/4))))/2))/r^2)*(-2 + 3.0000000000000004*^-8*r*
               (-120/(E^(r^2/4)*r^4) + (15*((16*r)/E^(r^2/4) - (4*r^3)/
                    E^(r^2/4)))/r^5 - (6*(16/E^(r^2/4) - (16*r^2)/E^(r^2/4) + 
                   8*r^2*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^4 + 
                ((-40*r)/E^(r^2/4) + (8*r^3)/E^(r^2/4) + 16*r*
                   (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 8*r^2*
                   (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/
                        (4*E^(r^2/4))))/2))/r^3) - 1.5000000000000002*^-8*(
                168/(E^(r^2/4)*r^3) - (21*((16*r)/E^(r^2/4) - (4*r^3)/
                    E^(r^2/4)))/r^4 + (9*(16/E^(r^2/4) - (16*r^2)/E^(r^2/4) + 
                   8*r^2*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 - 
                (2*((-40*r)/E^(r^2/4) + (8*r^3)/E^(r^2/4) + 16*r*
                    (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 8*r^2*
                    (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/
                         (4*E^(r^2/4))))/2)))/r^2 + (-32/E^(r^2/4) + 
                  (32*r^2)/E^(r^2/4) + 32*(-1/2*1/E^(r^2/4) + r^2/
                     (4*E^(r^2/4))) - 16*r^2*(-1/2*1/E^(r^2/4) + 
                    r^2/(4*E^(r^2/4))) + 32*r*(r/(2*E^(r^2/4)) - 
                    (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 
                  8*r^2*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - 
                    (r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/
                          (4*E^(r^2/4))))/2))/2))/r)*Sin[theta]^2 - 
              7.500000000000001*^-9*r*(-840/(E^(r^2/4)*r^4) + 
                (105*((16*r)/E^(r^2/4) - (4*r^3)/E^(r^2/4)))/r^5 - 
                (48*(16/E^(r^2/4) - (16*r^2)/E^(r^2/4) + 8*r^2*
                    (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^4 + 
                (13*((-40*r)/E^(r^2/4) + (8*r^3)/E^(r^2/4) + 16*r*
                    (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 8*r^2*
                    (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/
                         (4*E^(r^2/4))))/2)))/r^3 - (3*(-32/E^(r^2/4) + 
                   (32*r^2)/E^(r^2/4) + 32*(-1/2*1/E^(r^2/4) + r^2/
                      (4*E^(r^2/4))) - 16*r^2*(-1/2*1/E^(r^2/4) + 
                     r^2/(4*E^(r^2/4))) + 32*r*(r/(2*E^(r^2/4)) - 
                     (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 
                   8*r^2*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - 
                     (r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/
                          (4*E^(r^2/4))))/2))/2)))/r^2 + ((80*r)/E^(r^2/4) - 
                  (16*r^3)/E^(r^2/4) - 32*r*(-1/2*1/E^(r^2/4) + 
                    r^2/(4*E^(r^2/4))) + 64*(r/(2*E^(r^2/4)) - 
                    (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) - 
                  16*r^2*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + 
                       r^2/(4*E^(r^2/4))))/2) + 32*r*(1/(2*E^(r^2/4)) - 
                    r^2/(4*E^(r^2/4)) + (1/(2*E^(r^2/4)) - r^2/(4*E^(r^2/4)))/
                     2 - (r*((3*r)/(4*E^(r^2/4)) - r^3/(8*E^(r^2/4))))/2) + 
                  16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - 
                    (r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/
                          (4*E^(r^2/4))))/2))/2) + 8*r^2*(-1/4*r/E^(r^2/4) + 
                    (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/4 + 
                    (3*(-1/2*r/E^(r^2/4) + (r*(-1/2*1/E^(r^2/4) + r^2/
                          (4*E^(r^2/4))))/2))/2 - (r*(3/(4*E^(r^2/4)) - 
                       (3*r^2)/(8*E^(r^2/4)) - (r*(r/(2*E^(r^2/4)) - 
                          (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2))/2))/
                     2))/r)*Sin[theta]^2))*
           (r*(2 - 6.000000000000001*^-8*(24/(E^(r^2/4)*r^3) - 
                (3*((16*r)/E^(r^2/4) - (4*r^3)/E^(r^2/4)))/r^4 + 
                (16/E^(r^2/4) - (16*r^2)/E^(r^2/4) + 8*r^2*
                   (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/r^3) - 
              3.0000000000000004*^-8*r*(-120/(E^(r^2/4)*r^4) + 
                (15*((16*r)/E^(r^2/4) - (4*r^3)/E^(r^2/4)))/r^5 - 
                (6*(16/E^(r^2/4) - (16*r^2)/E^(r^2/4) + 8*r^2*
                    (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^4 + 
                ((-40*r)/E^(r^2/4) + (8*r^3)/E^(r^2/4) + 16*r*
                   (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 8*r^2*
                   (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/
                        (4*E^(r^2/4))))/2))/r^3) + 1.5000000000000002*^-8*(
                168/(E^(r^2/4)*r^3) - (21*((16*r)/E^(r^2/4) - (4*r^3)/
                    E^(r^2/4)))/r^4 + (9*(16/E^(r^2/4) - (16*r^2)/E^(r^2/4) + 
                   8*r^2*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 - 
                (2*((-40*r)/E^(r^2/4) + (8*r^3)/E^(r^2/4) + 16*r*
                    (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 8*r^2*
                    (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/
                         (4*E^(r^2/4))))/2)))/r^2 + (-32/E^(r^2/4) + 
                  (32*r^2)/E^(r^2/4) + 32*(-1/2*1/E^(r^2/4) + r^2/
                     (4*E^(r^2/4))) - 16*r^2*(-1/2*1/E^(r^2/4) + 
                    r^2/(4*E^(r^2/4))) + 32*r*(r/(2*E^(r^2/4)) - 
                    (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 
                  8*r^2*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - 
                    (r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/
                          (4*E^(r^2/4))))/2))/2))/r)*Sin[theta]^2 + 
              7.500000000000001*^-9*r*(-840/(E^(r^2/4)*r^4) + 
                (105*((16*r)/E^(r^2/4) - (4*r^3)/E^(r^2/4)))/r^5 - 
                (48*(16/E^(r^2/4) - (16*r^2)/E^(r^2/4) + 8*r^2*
                    (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^4 + 
                (13*((-40*r)/E^(r^2/4) + (8*r^3)/E^(r^2/4) + 16*r*
                    (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 8*r^2*
                    (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/
                         (4*E^(r^2/4))))/2)))/r^3 - (3*(-32/E^(r^2/4) + 
                   (32*r^2)/E^(r^2/4) + 32*(-1/2*1/E^(r^2/4) + r^2/
                      (4*E^(r^2/4))) - 16*r^2*(-1/2*1/E^(r^2/4) + 
                     r^2/(4*E^(r^2/4))) + 32*r*(r/(2*E^(r^2/4)) - 
                     (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 
                   8*r^2*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - 
                     (r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/
                          (4*E^(r^2/4))))/2))/2)))/r^2 + ((80*r)/E^(r^2/4) - 
                  (16*r^3)/E^(r^2/4) - 32*r*(-1/2*1/E^(r^2/4) + 
                    r^2/(4*E^(r^2/4))) + 64*(r/(2*E^(r^2/4)) - 
                    (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) - 
                  16*r^2*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + 
                       r^2/(4*E^(r^2/4))))/2) + 32*r*(1/(2*E^(r^2/4)) - 
                    r^2/(4*E^(r^2/4)) + (1/(2*E^(r^2/4)) - r^2/(4*E^(r^2/4)))/
                     2 - (r*((3*r)/(4*E^(r^2/4)) - r^3/(8*E^(r^2/4))))/2) + 
                  16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - 
                    (r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/
                          (4*E^(r^2/4))))/2))/2) + 8*r^2*(-1/4*r/E^(r^2/4) + 
                    (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/4 + 
                    (3*(-1/2*r/E^(r^2/4) + (r*(-1/2*1/E^(r^2/4) + r^2/
                          (4*E^(r^2/4))))/2))/2 - (r*(3/(4*E^(r^2/4)) - 
                       (3*r^2)/(8*E^(r^2/4)) - (r*(r/(2*E^(r^2/4)) - 
                          (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2))/2))/
                     2))/r)*Sin[theta]^2)*(-1 + 3.0000000000000004*^-8*(
                24/(E^(r^2/4)*r^3) - (3*((16*r)/E^(r^2/4) - (4*r^3)/
                    E^(r^2/4)))/r^4 + (16/E^(r^2/4) - (16*r^2)/E^(r^2/4) + 
                  8*r^2*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/r^3)*(-2 + 
                3*Sin[theta]^2)) + 1.35*^-15*r*(24/(E^(r^2/4)*r^3) - 
              (3*((16*r)/E^(r^2/4) - (4*r^3)/E^(r^2/4)))/r^4 + 
              (16/E^(r^2/4) - (16*r^2)/E^(r^2/4) + 8*r^2*(-1/2*1/E^(r^2/4) + 
                  r^2/(4*E^(r^2/4))))/r^3)*(-48/(E^(r^2/4)*r^3) + 
              (6*((16*r)/E^(r^2/4) - (4*r^3)/E^(r^2/4)))/r^4 - 
              (3*(16/E^(r^2/4) - (16*r^2)/E^(r^2/4) + 8*r^2*
                  (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + 
              ((-40*r)/E^(r^2/4) + (8*r^3)/E^(r^2/4) + 16*r*
                 (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 8*r^2*
                 (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/
                      (4*E^(r^2/4))))/2))/r^2)*Sin[2*theta]^2))/
          (r^2*(9.*^-16*(-48/(E^(r^2/4)*r^3) + (6*((16*r)/E^(r^2/4) - 
                  (4*r^3)/E^(r^2/4)))/r^4 - (3*(16/E^(r^2/4) - (16*r^2)/
                   E^(r^2/4) + 8*r^2*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/
                r^3 + ((-40*r)/E^(r^2/4) + (8*r^3)/E^(r^2/4) + 
                 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 
                 8*r^2*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + 
                      r^2/(4*E^(r^2/4))))/2))/r^2)^2*Cos[theta]^2*
             Sin[theta]^2 - (1 - 3.0000000000000004*^-8*(24/(E^(r^2/4)*r^3) - 
                (3*((16*r)/E^(r^2/4) - (4*r^3)/E^(r^2/4)))/r^4 + 
                (16/E^(r^2/4) - (16*r^2)/E^(r^2/4) + 8*r^2*
                   (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/r^3) + 
              7.500000000000001*^-9*(168/(E^(r^2/4)*r^3) - 
                (21*((16*r)/E^(r^2/4) - (4*r^3)/E^(r^2/4)))/r^4 + 
                (9*(16/E^(r^2/4) - (16*r^2)/E^(r^2/4) + 8*r^2*
                    (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 - 
                (2*((-40*r)/E^(r^2/4) + (8*r^3)/E^(r^2/4) + 16*r*
                    (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 8*r^2*
                    (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/
                         (4*E^(r^2/4))))/2)))/r^2 + (-32/E^(r^2/4) + 
                  (32*r^2)/E^(r^2/4) + 32*(-1/2*1/E^(r^2/4) + r^2/
                     (4*E^(r^2/4))) - 16*r^2*(-1/2*1/E^(r^2/4) + 
                    r^2/(4*E^(r^2/4))) + 32*r*(r/(2*E^(r^2/4)) - 
                    (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 
                  8*r^2*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - 
                    (r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/
                          (4*E^(r^2/4))))/2))/2))/r)*Sin[theta]^2)*
             (1 + 3.0000000000000004*^-8*(24/(E^(r^2/4)*r^3) - 
                (3*((16*r)/E^(r^2/4) - (4*r^3)/E^(r^2/4)))/r^4 + 
                (16/E^(r^2/4) - (16*r^2)/E^(r^2/4) + 8*r^2*
                   (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/r^3)*(2 - 
                3*Sin[theta]^2)))*(2 - 9.*^-16*(24/(E^(r^2/4)*r^3) - 
               (3*((16*r)/E^(r^2/4) - (4*r^3)/E^(r^2/4)))/r^4 + 
               (16/E^(r^2/4) - (16*r^2)/E^(r^2/4) + 8*r^2*(-1/2*1/E^(r^2/4) + 
                   r^2/(4*E^(r^2/4))))/r^3)^2*(1 + 3*Cos[2*theta]) + 
            1.5000000000000002*^-8*(168/(E^(r^2/4)*r^3) - 
              (21*((16*r)/E^(r^2/4) - (4*r^3)/E^(r^2/4)))/r^4 + 
              (9*(16/E^(r^2/4) - (16*r^2)/E^(r^2/4) + 8*r^2*
                  (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 - 
              (2*((-40*r)/E^(r^2/4) + (8*r^3)/E^(r^2/4) + 16*r*
                  (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 8*r^2*
                  (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/
                       (4*E^(r^2/4))))/2)))/r^2 + (-32/E^(r^2/4) + 
                (32*r^2)/E^(r^2/4) + 32*(-1/2*1/E^(r^2/4) + 
                  r^2/(4*E^(r^2/4))) - 16*r^2*(-1/2*1/E^(r^2/4) + 
                  r^2/(4*E^(r^2/4))) + 32*r*(r/(2*E^(r^2/4)) - 
                  (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 
                8*r^2*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - 
                  (r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/
                         (4*E^(r^2/4))))/2))/2))/r)*Sin[theta]^2 + 
            3.0000000000000004*^-8*(24/(E^(r^2/4)*r^3) - 
              (3*((16*r)/E^(r^2/4) - (4*r^3)/E^(r^2/4)))/r^4 + 
              (16/E^(r^2/4) - (16*r^2)/E^(r^2/4) + 8*r^2*(-1/2*1/E^(r^2/4) + 
                  r^2/(4*E^(r^2/4))))/r^3)*(-1 + 3*Cos[2*theta] + 
              7.500000000000001*^-9*(168/(E^(r^2/4)*r^3) - 
                (21*((16*r)/E^(r^2/4) - (4*r^3)/E^(r^2/4)))/r^4 + 
                (9*(16/E^(r^2/4) - (16*r^2)/E^(r^2/4) + 8*r^2*
                    (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 - 
                (2*((-40*r)/E^(r^2/4) + (8*r^3)/E^(r^2/4) + 16*r*
                    (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 8*r^2*
                    (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/
                         (4*E^(r^2/4))))/2)))/r^2 + (-32/E^(r^2/4) + 
                  (32*r^2)/E^(r^2/4) + 32*(-1/2*1/E^(r^2/4) + r^2/
                     (4*E^(r^2/4))) - 16*r^2*(-1/2*1/E^(r^2/4) + 
                    r^2/(4*E^(r^2/4))) + 32*r*(r/(2*E^(r^2/4)) - 
                    (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 
                  8*r^2*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - 
                    (r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/
                          (4*E^(r^2/4))))/2))/2))/r)*(1 + 3*Cos[2*theta])*
               Sin[theta]^2) - 4.5*^-16*(-48/(E^(r^2/4)*r^3) + 
               (6*((16*r)/E^(r^2/4) - (4*r^3)/E^(r^2/4)))/r^4 - 
               (3*(16/E^(r^2/4) - (16*r^2)/E^(r^2/4) + 8*r^2*
                   (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + 
               ((-40*r)/E^(r^2/4) + (8*r^3)/E^(r^2/4) + 16*r*
                  (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 8*r^2*
                  (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/
                       (4*E^(r^2/4))))/2))/r^2)^2*Sin[2*theta]^2)) + 
         (7.500000000000001*^-9*(4*r*(240/(E^(r^2/4)*r^4) - 
              (30*((16*r)/E^(r^2/4) - (4*r^3)/E^(r^2/4)))/r^5 + 
              (15*(16/E^(r^2/4) - (16*r^2)/E^(r^2/4) + 8*r^2*
                  (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^4 - 
              (5*((-40*r)/E^(r^2/4) + (8*r^3)/E^(r^2/4) + 16*r*
                  (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 8*r^2*
                  (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/
                       (4*E^(r^2/4))))/2)))/r^3 + (-32/E^(r^2/4) + 
                (32*r^2)/E^(r^2/4) + 32*(-1/2*1/E^(r^2/4) + 
                  r^2/(4*E^(r^2/4))) - 16*r^2*(-1/2*1/E^(r^2/4) + 
                  r^2/(4*E^(r^2/4))) + 32*r*(r/(2*E^(r^2/4)) - 
                  (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 
                8*r^2*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - 
                  (r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/
                         (4*E^(r^2/4))))/2))/2))/r^2) - 
            1.8*^-7*(24/(E^(r^2/4)*r^3) - (3*((16*r)/E^(r^2/4) - (4*r^3)/
                   E^(r^2/4)))/r^4 + (16/E^(r^2/4) - (16*r^2)/E^(r^2/4) + 
                 8*r^2*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/r^3)^2*
             (1 + 3*Cos[2*theta]) - (-48/(E^(r^2/4)*r^3) + 
              (6*((16*r)/E^(r^2/4) - (4*r^3)/E^(r^2/4)))/r^4 - 
              (3*(16/E^(r^2/4) - (16*r^2)/E^(r^2/4) + 8*r^2*
                  (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + 
              ((-40*r)/E^(r^2/4) + (8*r^3)/E^(r^2/4) + 16*r*
                 (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 8*r^2*
                 (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/
                      (4*E^(r^2/4))))/2))/r^2)*(-4 + 3.0000000000000004*^-8*r*
               (-120/(E^(r^2/4)*r^4) + (15*((16*r)/E^(r^2/4) - (4*r^3)/
                    E^(r^2/4)))/r^5 - (6*(16/E^(r^2/4) - (16*r^2)/E^(r^2/4) + 
                   8*r^2*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^4 + 
                ((-40*r)/E^(r^2/4) + (8*r^3)/E^(r^2/4) + 16*r*
                   (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 8*r^2*
                   (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/
                        (4*E^(r^2/4))))/2))/r^3)*(1 + 3*Cos[2*theta])) + 
            6*(24/(E^(r^2/4)*r^3) - (3*((16*r)/E^(r^2/4) - (4*r^3)/
                  E^(r^2/4)))/r^4 + (16/E^(r^2/4) - (16*r^2)/E^(r^2/4) + 
                8*r^2*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/r^3)*
             (-2 + 1.*^-8*(-48/(E^(r^2/4)*r^3) + (6*((16*r)/E^(r^2/4) - 
                   (4*r^3)/E^(r^2/4)))/r^4 - (3*(16/E^(r^2/4) - (16*r^2)/
                    E^(r^2/4) + 8*r^2*(-1/2*1/E^(r^2/4) + r^2/
                      (4*E^(r^2/4)))))/r^3 + ((-40*r)/E^(r^2/4) + 
                  (8*r^3)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + 
                    r^2/(4*E^(r^2/4))) + 8*r^2*(r/(2*E^(r^2/4)) - 
                    (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2))/r^2)*(1 + 
                3*Cos[2*theta]) + 1.*^-8*r*(240/(E^(r^2/4)*r^4) - 
                (30*((16*r)/E^(r^2/4) - (4*r^3)/E^(r^2/4)))/r^5 + 
                (15*(16/E^(r^2/4) - (16*r^2)/E^(r^2/4) + 8*r^2*
                    (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^4 - 
                (5*((-40*r)/E^(r^2/4) + (8*r^3)/E^(r^2/4) + 16*r*
                    (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 8*r^2*
                    (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/
                         (4*E^(r^2/4))))/2)))/r^3 + (-32/E^(r^2/4) + 
                  (32*r^2)/E^(r^2/4) + 32*(-1/2*1/E^(r^2/4) + r^2/
                     (4*E^(r^2/4))) - 16*r^2*(-1/2*1/E^(r^2/4) + 
                    r^2/(4*E^(r^2/4))) + 32*r*(r/(2*E^(r^2/4)) - 
                    (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 
                  8*r^2*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - 
                    (r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/
                          (4*E^(r^2/4))))/2))/2))/r^2)*(1 + 3*Cos[2*theta])))*
           (1.8*^-15*(24/(E^(r^2/4)*r^3) - (3*((16*r)/E^(r^2/4) - 
                  (4*r^3)/E^(r^2/4)))/r^4 + (16/E^(r^2/4) - (16*r^2)/
                  E^(r^2/4) + 8*r^2*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/
                r^3)^2 + (1 + 7.500000000000001*^-9*(168/(E^(r^2/4)*r^3) - 
                (21*((16*r)/E^(r^2/4) - (4*r^3)/E^(r^2/4)))/r^4 + 
                (9*(16/E^(r^2/4) - (16*r^2)/E^(r^2/4) + 8*r^2*
                    (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 - 
                (2*((-40*r)/E^(r^2/4) + (8*r^3)/E^(r^2/4) + 16*r*
                    (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 8*r^2*
                    (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/
                         (4*E^(r^2/4))))/2)))/r^2 + (-32/E^(r^2/4) + 
                  (32*r^2)/E^(r^2/4) + 32*(-1/2*1/E^(r^2/4) + r^2/
                     (4*E^(r^2/4))) - 16*r^2*(-1/2*1/E^(r^2/4) + 
                    r^2/(4*E^(r^2/4))) + 32*r*(r/(2*E^(r^2/4)) - 
                    (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 
                  8*r^2*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - 
                    (r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/
                          (4*E^(r^2/4))))/2))/2))/r)*Sin[theta]^2)*
             (2 - 3.0000000000000004*^-8*r*(-120/(E^(r^2/4)*r^4) + 
                (15*((16*r)/E^(r^2/4) - (4*r^3)/E^(r^2/4)))/r^5 - 
                (6*(16/E^(r^2/4) - (16*r^2)/E^(r^2/4) + 8*r^2*
                    (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^4 + 
                ((-40*r)/E^(r^2/4) + (8*r^3)/E^(r^2/4) + 16*r*
                   (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 8*r^2*
                   (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/
                        (4*E^(r^2/4))))/2))/r^3) + 1.5000000000000002*^-8*(
                168/(E^(r^2/4)*r^3) - (21*((16*r)/E^(r^2/4) - (4*r^3)/
                    E^(r^2/4)))/r^4 + (9*(16/E^(r^2/4) - (16*r^2)/E^(r^2/4) + 
                   8*r^2*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 - 
                (2*((-40*r)/E^(r^2/4) + (8*r^3)/E^(r^2/4) + 16*r*
                    (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 8*r^2*
                    (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/
                         (4*E^(r^2/4))))/2)))/r^2 + (-32/E^(r^2/4) + 
                  (32*r^2)/E^(r^2/4) + 32*(-1/2*1/E^(r^2/4) + r^2/
                     (4*E^(r^2/4))) - 16*r^2*(-1/2*1/E^(r^2/4) + 
                    r^2/(4*E^(r^2/4))) + 32*r*(r/(2*E^(r^2/4)) - 
                    (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 
                  8*r^2*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - 
                    (r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/
                          (4*E^(r^2/4))))/2))/2))/r)*Sin[theta]^2 + 
              7.500000000000001*^-9*r*(-840/(E^(r^2/4)*r^4) + 
                (105*((16*r)/E^(r^2/4) - (4*r^3)/E^(r^2/4)))/r^5 - 
                (48*(16/E^(r^2/4) - (16*r^2)/E^(r^2/4) + 8*r^2*
                    (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^4 + 
                (13*((-40*r)/E^(r^2/4) + (8*r^3)/E^(r^2/4) + 16*r*
                    (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 8*r^2*
                    (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/
                         (4*E^(r^2/4))))/2)))/r^3 - (3*(-32/E^(r^2/4) + 
                   (32*r^2)/E^(r^2/4) + 32*(-1/2*1/E^(r^2/4) + r^2/
                      (4*E^(r^2/4))) - 16*r^2*(-1/2*1/E^(r^2/4) + 
                     r^2/(4*E^(r^2/4))) + 32*r*(r/(2*E^(r^2/4)) - 
                     (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 
                   8*r^2*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - 
                     (r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/
                          (4*E^(r^2/4))))/2))/2)))/r^2 + ((80*r)/E^(r^2/4) - 
                  (16*r^3)/E^(r^2/4) - 32*r*(-1/2*1/E^(r^2/4) + 
                    r^2/(4*E^(r^2/4))) + 64*(r/(2*E^(r^2/4)) - 
                    (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) - 
                  16*r^2*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + 
                       r^2/(4*E^(r^2/4))))/2) + 32*r*(1/(2*E^(r^2/4)) - 
                    r^2/(4*E^(r^2/4)) + (1/(2*E^(r^2/4)) - r^2/(4*E^(r^2/4)))/
                     2 - (r*((3*r)/(4*E^(r^2/4)) - r^3/(8*E^(r^2/4))))/2) + 
                  16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - 
                    (r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/
                          (4*E^(r^2/4))))/2))/2) + 8*r^2*(-1/4*r/E^(r^2/4) + 
                    (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/4 + 
                    (3*(-1/2*r/E^(r^2/4) + (r*(-1/2*1/E^(r^2/4) + r^2/
                          (4*E^(r^2/4))))/2))/2 - (r*(3/(4*E^(r^2/4)) - 
                       (3*r^2)/(8*E^(r^2/4)) - (r*(r/(2*E^(r^2/4)) - 
                          (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2))/2))/
                     2))/r)*Sin[theta]^2) - 3.0000000000000004*^-8*
             (24/(E^(r^2/4)*r^3) - (3*((16*r)/E^(r^2/4) - (4*r^3)/E^(r^2/4)))/
               r^4 + (16/E^(r^2/4) - (16*r^2)/E^(r^2/4) + 8*r^2*
                 (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/r^3)*
             (4 - 3.0000000000000004*^-8*r*(-120/(E^(r^2/4)*r^4) + 
                (15*((16*r)/E^(r^2/4) - (4*r^3)/E^(r^2/4)))/r^5 - 
                (6*(16/E^(r^2/4) - (16*r^2)/E^(r^2/4) + 8*r^2*
                    (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^4 + 
                ((-40*r)/E^(r^2/4) + (8*r^3)/E^(r^2/4) + 16*r*
                   (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 8*r^2*
                   (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/
                        (4*E^(r^2/4))))/2))/r^3) + 6.000000000000001*^-8*(
                -48/(E^(r^2/4)*r^3) + (6*((16*r)/E^(r^2/4) - (4*r^3)/
                    E^(r^2/4)))/r^4 - (3*(16/E^(r^2/4) - (16*r^2)/E^(r^2/4) + 
                   8*r^2*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + 
                ((-40*r)/E^(r^2/4) + (8*r^3)/E^(r^2/4) + 16*r*
                   (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 8*r^2*
                   (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/
                        (4*E^(r^2/4))))/2))/r^2)*Cos[2*theta] + 
              3.0000000000000004*^-8*(168/(E^(r^2/4)*r^3) - 
                (21*((16*r)/E^(r^2/4) - (4*r^3)/E^(r^2/4)))/r^4 + 
                (9*(16/E^(r^2/4) - (16*r^2)/E^(r^2/4) + 8*r^2*
                    (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 - 
                (2*((-40*r)/E^(r^2/4) + (8*r^3)/E^(r^2/4) + 16*r*
                    (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 8*r^2*
                    (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/
                         (4*E^(r^2/4))))/2)))/r^2 + (-32/E^(r^2/4) + 
                  (32*r^2)/E^(r^2/4) + 32*(-1/2*1/E^(r^2/4) + r^2/
                     (4*E^(r^2/4))) - 16*r^2*(-1/2*1/E^(r^2/4) + 
                    r^2/(4*E^(r^2/4))) + 32*r*(r/(2*E^(r^2/4)) - 
                    (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 
                  8*r^2*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - 
                    (r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/
                          (4*E^(r^2/4))))/2))/2))/r)*Sin[theta]^2 + 
              7.500000000000001*^-9*r*(-840/(E^(r^2/4)*r^4) + 
                (105*((16*r)/E^(r^2/4) - (4*r^3)/E^(r^2/4)))/r^5 - 
                (48*(16/E^(r^2/4) - (16*r^2)/E^(r^2/4) + 8*r^2*
                    (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^4 + 
                (13*((-40*r)/E^(r^2/4) + (8*r^3)/E^(r^2/4) + 16*r*
                    (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 8*r^2*
                    (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/
                         (4*E^(r^2/4))))/2)))/r^3 - (3*(-32/E^(r^2/4) + 
                   (32*r^2)/E^(r^2/4) + 32*(-1/2*1/E^(r^2/4) + r^2/
                      (4*E^(r^2/4))) - 16*r^2*(-1/2*1/E^(r^2/4) + 
                     r^2/(4*E^(r^2/4))) + 32*r*(r/(2*E^(r^2/4)) - 
                     (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 
                   8*r^2*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - 
                     (r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/
                          (4*E^(r^2/4))))/2))/2)))/r^2 + ((80*r)/E^(r^2/4) - 
                  (16*r^3)/E^(r^2/4) - 32*r*(-1/2*1/E^(r^2/4) + 
                    r^2/(4*E^(r^2/4))) + 64*(r/(2*E^(r^2/4)) - 
                    (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) - 
                  16*r^2*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + 
                       r^2/(4*E^(r^2/4))))/2) + 32*r*(1/(2*E^(r^2/4)) - 
                    r^2/(4*E^(r^2/4)) + (1/(2*E^(r^2/4)) - r^2/(4*E^(r^2/4)))/
                     2 - (r*((3*r)/(4*E^(r^2/4)) - r^3/(8*E^(r^2/4))))/2) + 
                  16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - 
                    (r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/
                          (4*E^(r^2/4))))/2))/2) + 8*r^2*(-1/4*r/E^(r^2/4) + 
                    (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/4 + 
                    (3*(-1/2*r/E^(r^2/4) + (r*(-1/2*1/E^(r^2/4) + r^2/
                          (4*E^(r^2/4))))/2))/2 - (r*(3/(4*E^(r^2/4)) - 
                       (3*r^2)/(8*E^(r^2/4)) - (r*(r/(2*E^(r^2/4)) - 
                          (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2))/2))/
                     2))/r)*Sin[theta]^2) + 6.000000000000001*^-8*
             (-48/(E^(r^2/4)*r^3) + (6*((16*r)/E^(r^2/4) - (4*r^3)/
                  E^(r^2/4)))/r^4 - (3*(16/E^(r^2/4) - (16*r^2)/E^(r^2/4) + 
                 8*r^2*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + 
              ((-40*r)/E^(r^2/4) + (8*r^3)/E^(r^2/4) + 16*r*
                 (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 8*r^2*
                 (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/
                      (4*E^(r^2/4))))/2))/r^2)*(Cos[2*theta] - 
              7.500000000000001*^-9*(168/(E^(r^2/4)*r^3) - 
                (21*((16*r)/E^(r^2/4) - (4*r^3)/E^(r^2/4)))/r^4 + 
                (9*(16/E^(r^2/4) - (16*r^2)/E^(r^2/4) + 8*r^2*
                    (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 - 
                (2*((-40*r)/E^(r^2/4) + (8*r^3)/E^(r^2/4) + 16*r*
                    (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 8*r^2*
                    (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/
                         (4*E^(r^2/4))))/2)))/r^2 + (-32/E^(r^2/4) + 
                  (32*r^2)/E^(r^2/4) + 32*(-1/2*1/E^(r^2/4) + r^2/
                     (4*E^(r^2/4))) - 16*r^2*(-1/2*1/E^(r^2/4) + 
                    r^2/(4*E^(r^2/4))) + 32*r*(r/(2*E^(r^2/4)) - 
                    (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 
                  8*r^2*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - 
                    (r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/
                          (4*E^(r^2/4))))/2))/2))/r)*Sin[theta]^4))*
           Sin[2*theta])/(r*(-2 + 9.*^-16*(24/(E^(r^2/4)*r^3) - 
               (3*((16*r)/E^(r^2/4) - (4*r^3)/E^(r^2/4)))/r^4 + 
               (16/E^(r^2/4) - (16*r^2)/E^(r^2/4) + 8*r^2*(-1/2*1/E^(r^2/4) + 
                   r^2/(4*E^(r^2/4))))/r^3)^2*(1 + 3*Cos[2*theta]) - 
            1.5000000000000002*^-8*(168/(E^(r^2/4)*r^3) - 
              (21*((16*r)/E^(r^2/4) - (4*r^3)/E^(r^2/4)))/r^4 + 
              (9*(16/E^(r^2/4) - (16*r^2)/E^(r^2/4) + 8*r^2*
                  (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 - 
              (2*((-40*r)/E^(r^2/4) + (8*r^3)/E^(r^2/4) + 16*r*
                  (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 8*r^2*
                  (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/
                       (4*E^(r^2/4))))/2)))/r^2 + (-32/E^(r^2/4) + 
                (32*r^2)/E^(r^2/4) + 32*(-1/2*1/E^(r^2/4) + 
                  r^2/(4*E^(r^2/4))) - 16*r^2*(-1/2*1/E^(r^2/4) + 
                  r^2/(4*E^(r^2/4))) + 32*r*(r/(2*E^(r^2/4)) - 
                  (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 
                8*r^2*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - 
                  (r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/
                         (4*E^(r^2/4))))/2))/2))/r)*Sin[theta]^2 - 
            6.000000000000001*^-8*(24/(E^(r^2/4)*r^3) - 
              (3*((16*r)/E^(r^2/4) - (4*r^3)/E^(r^2/4)))/r^4 + 
              (16/E^(r^2/4) - (16*r^2)/E^(r^2/4) + 8*r^2*(-1/2*1/E^(r^2/4) + 
                  r^2/(4*E^(r^2/4))))/r^3)*(1 - 3*Sin[theta]^2 + 
              3.7500000000000005*^-9*(168/(E^(r^2/4)*r^3) - 
                (21*((16*r)/E^(r^2/4) - (4*r^3)/E^(r^2/4)))/r^4 + 
                (9*(16/E^(r^2/4) - (16*r^2)/E^(r^2/4) + 8*r^2*
                    (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 - 
                (2*((-40*r)/E^(r^2/4) + (8*r^3)/E^(r^2/4) + 16*r*
                    (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 8*r^2*
                    (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/
                         (4*E^(r^2/4))))/2)))/r^2 + (-32/E^(r^2/4) + 
                  (32*r^2)/E^(r^2/4) + 32*(-1/2*1/E^(r^2/4) + r^2/
                     (4*E^(r^2/4))) - 16*r^2*(-1/2*1/E^(r^2/4) + 
                    r^2/(4*E^(r^2/4))) + 32*r*(r/(2*E^(r^2/4)) - 
                    (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 
                  8*r^2*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - 
                    (r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/
                          (4*E^(r^2/4))))/2))/2))/r)*(1 + 3*Cos[2*theta])*
               Sin[theta]^2) + 4.5*^-16*(-48/(E^(r^2/4)*r^3) + 
               (6*((16*r)/E^(r^2/4) - (4*r^3)/E^(r^2/4)))/r^4 - 
               (3*(16/E^(r^2/4) - (16*r^2)/E^(r^2/4) + 8*r^2*
                   (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + 
               ((-40*r)/E^(r^2/4) + (8*r^3)/E^(r^2/4) + 16*r*
                  (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 8*r^2*
                  (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/
                       (4*E^(r^2/4))))/2))/r^2)^2*Sin[2*theta]^2)*
           (-2 + 9.*^-16*(24/(E^(r^2/4)*r^3) - (3*((16*r)/E^(r^2/4) - 
                  (4*r^3)/E^(r^2/4)))/r^4 + (16/E^(r^2/4) - (16*r^2)/
                  E^(r^2/4) + 8*r^2*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/
                r^3)^2*(1 + 3*Cos[2*theta]) - 1.5000000000000002*^-8*
             (168/(E^(r^2/4)*r^3) - (21*((16*r)/E^(r^2/4) - (4*r^3)/
                  E^(r^2/4)))/r^4 + (9*(16/E^(r^2/4) - (16*r^2)/E^(r^2/4) + 
                 8*r^2*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 - 
              (2*((-40*r)/E^(r^2/4) + (8*r^3)/E^(r^2/4) + 16*r*
                  (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 8*r^2*
                  (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/
                       (4*E^(r^2/4))))/2)))/r^2 + (-32/E^(r^2/4) + 
                (32*r^2)/E^(r^2/4) + 32*(-1/2*1/E^(r^2/4) + 
                  r^2/(4*E^(r^2/4))) - 16*r^2*(-1/2*1/E^(r^2/4) + 
                  r^2/(4*E^(r^2/4))) + 32*r*(r/(2*E^(r^2/4)) - 
                  (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 
                8*r^2*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - 
                  (r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/
                         (4*E^(r^2/4))))/2))/2))/r)*Sin[theta]^2 - 
            3.0000000000000004*^-8*(24/(E^(r^2/4)*r^3) - 
              (3*((16*r)/E^(r^2/4) - (4*r^3)/E^(r^2/4)))/r^4 + 
              (16/E^(r^2/4) - (16*r^2)/E^(r^2/4) + 8*r^2*(-1/2*1/E^(r^2/4) + 
                  r^2/(4*E^(r^2/4))))/r^3)*(-1 + 3*Cos[2*theta] + 
              7.500000000000001*^-9*(168/(E^(r^2/4)*r^3) - 
                (21*((16*r)/E^(r^2/4) - (4*r^3)/E^(r^2/4)))/r^4 + 
                (9*(16/E^(r^2/4) - (16*r^2)/E^(r^2/4) + 8*r^2*
                    (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 - 
                (2*((-40*r)/E^(r^2/4) + (8*r^3)/E^(r^2/4) + 16*r*
                    (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 8*r^2*
                    (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/
                         (4*E^(r^2/4))))/2)))/r^2 + (-32/E^(r^2/4) + 
                  (32*r^2)/E^(r^2/4) + 32*(-1/2*1/E^(r^2/4) + r^2/
                     (4*E^(r^2/4))) - 16*r^2*(-1/2*1/E^(r^2/4) + 
                    r^2/(4*E^(r^2/4))) + 32*r*(r/(2*E^(r^2/4)) - 
                    (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 
                  8*r^2*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - 
                    (r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/
                          (4*E^(r^2/4))))/2))/2))/r)*(1 + 3*Cos[2*theta])*
               Sin[theta]^2) + 4.5*^-16*(-48/(E^(r^2/4)*r^3) + 
               (6*((16*r)/E^(r^2/4) - (4*r^3)/E^(r^2/4)))/r^4 - 
               (3*(16/E^(r^2/4) - (16*r^2)/E^(r^2/4) + 8*r^2*
                   (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + 
               ((-40*r)/E^(r^2/4) + (8*r^3)/E^(r^2/4) + 16*r*
                  (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 8*r^2*
                  (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/
                       (4*E^(r^2/4))))/2))/r^2)^2*Sin[2*theta]^2)) - 
         (3.0000000000000004*^-8*Cos[theta]*Sin[theta]*
           (((4.5000000000000006*^-8*(24/(E^(r^2/4)*r^3) - 
                 (3*((16*r)/E^(r^2/4) - (4*r^3)/E^(r^2/4)))/r^4 + 
                 (16/E^(r^2/4) - (16*r^2)/E^(r^2/4) + 8*r^2*
                    (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/r^3)*
                (-840/(E^(r^2/4)*r^4) + (105*((16*r)/E^(r^2/4) - (4*r^3)/
                     E^(r^2/4)))/r^5 - (48*(16/E^(r^2/4) - (16*r^2)/
                     E^(r^2/4) + 8*r^2*(-1/2*1/E^(r^2/4) + r^2/
                       (4*E^(r^2/4)))))/r^4 + (13*((-40*r)/E^(r^2/4) + 
                    (8*r^3)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + 
                      r^2/(4*E^(r^2/4))) + 8*r^2*(r/(2*E^(r^2/4)) - 
                      (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2)))/r^3 - 
                 (3*(-32/E^(r^2/4) + (32*r^2)/E^(r^2/4) + 
                    32*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) - 16*r^2*
                     (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*r*
                     (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/
                          (4*E^(r^2/4))))/2) + 8*r^2*(3/(4*E^(r^2/4)) - 
                      (3*r^2)/(8*E^(r^2/4)) - (r*(r/(2*E^(r^2/4)) - 
                         (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2))/2)))/
                  r^2 + ((80*r)/E^(r^2/4) - (16*r^3)/E^(r^2/4) - 
                   32*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 
                   64*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/
                         (4*E^(r^2/4))))/2) - 16*r^2*(r/(2*E^(r^2/4)) - 
                     (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 
                   32*r*(1/(2*E^(r^2/4)) - r^2/(4*E^(r^2/4)) + 
                     (1/(2*E^(r^2/4)) - r^2/(4*E^(r^2/4)))/2 - 
                     (r*((3*r)/(4*E^(r^2/4)) - r^3/(8*E^(r^2/4))))/2) + 
                   16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - 
                     (r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/
                          (4*E^(r^2/4))))/2))/2) + 8*r^2*(-1/4*r/E^(r^2/4) + 
                     (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/4 + 
                     (3*(-1/2*r/E^(r^2/4) + (r*(-1/2*1/E^(r^2/4) + r^2/
                          (4*E^(r^2/4))))/2))/2 - (r*(3/(4*E^(r^2/4)) - 
                        (3*r^2)/(8*E^(r^2/4)) - (r*(r/(2*E^(r^2/4)) - 
                          (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2))/2))/
                      2))/r)*Sin[theta]^2 + 3*(-120/(E^(r^2/4)*r^4) + 
                 (15*((16*r)/E^(r^2/4) - (4*r^3)/E^(r^2/4)))/r^5 - 
                 (6*(16/E^(r^2/4) - (16*r^2)/E^(r^2/4) + 8*r^2*
                     (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^4 + 
                 ((-40*r)/E^(r^2/4) + (8*r^3)/E^(r^2/4) + 16*r*
                    (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 8*r^2*
                    (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/
                         (4*E^(r^2/4))))/2))/r^3)*(2 - 1.2000000000000002*^-7*
                  (24/(E^(r^2/4)*r^3) - (3*((16*r)/E^(r^2/4) - (4*r^3)/
                       E^(r^2/4)))/r^4 + (16/E^(r^2/4) - (16*r^2)/E^(r^2/4) + 
                     8*r^2*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/r^3) + 
                 3.0000000000000004*^-8*(-48/(E^(r^2/4)*r^3) + 
                   (6*((16*r)/E^(r^2/4) - (4*r^3)/E^(r^2/4)))/r^4 - 
                   (3*(16/E^(r^2/4) - (16*r^2)/E^(r^2/4) + 8*r^2*
                       (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + 
                   ((-40*r)/E^(r^2/4) + (8*r^3)/E^(r^2/4) + 16*r*
                      (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 8*r^2*
                      (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/
                          (4*E^(r^2/4))))/2))/r^2) + 1.*^-8*r*
                  (240/(E^(r^2/4)*r^4) - (30*((16*r)/E^(r^2/4) - (4*r^3)/
                       E^(r^2/4)))/r^5 + (15*(16/E^(r^2/4) - (16*r^2)/
                       E^(r^2/4) + 8*r^2*(-1/2*1/E^(r^2/4) + r^2/
                         (4*E^(r^2/4)))))/r^4 - (5*((-40*r)/E^(r^2/4) + 
                      (8*r^3)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + 
                        r^2/(4*E^(r^2/4))) + 8*r^2*(r/(2*E^(r^2/4)) - 
                        (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2)))/r^3 + 
                   (-32/E^(r^2/4) + (32*r^2)/E^(r^2/4) + 32*(-1/2*
                        1/E^(r^2/4) + r^2/(4*E^(r^2/4))) - 16*r^2*
                      (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*r*
                      (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/
                          (4*E^(r^2/4))))/2) + 8*r^2*(3/(4*E^(r^2/4)) - 
                       (3*r^2)/(8*E^(r^2/4)) - (r*(r/(2*E^(r^2/4)) - 
                          (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2))/2))/
                    r^2) + 1.5000000000000002*^-8*(168/(E^(r^2/4)*r^3) - 
                   (21*((16*r)/E^(r^2/4) - (4*r^3)/E^(r^2/4)))/r^4 + 
                   (9*(16/E^(r^2/4) - (16*r^2)/E^(r^2/4) + 8*r^2*
                       (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 - 
                   (2*((-40*r)/E^(r^2/4) + (8*r^3)/E^(r^2/4) + 16*r*
                       (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 8*r^2*
                       (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/
                          (4*E^(r^2/4))))/2)))/r^2 + (-32/E^(r^2/4) + 
                     (32*r^2)/E^(r^2/4) + 32*(-1/2*1/E^(r^2/4) + r^2/
                        (4*E^(r^2/4))) - 16*r^2*(-1/2*1/E^(r^2/4) + 
                       r^2/(4*E^(r^2/4))) + 32*r*(r/(2*E^(r^2/4)) - 
                       (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 
                     8*r^2*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - 
                       (r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/
                          (4*E^(r^2/4))))/2))/2))/r)*Sin[theta]^2) + 
               (240/(E^(r^2/4)*r^4) - (30*((16*r)/E^(r^2/4) - (4*r^3)/
                     E^(r^2/4)))/r^5 + (15*(16/E^(r^2/4) - (16*r^2)/
                     E^(r^2/4) + 8*r^2*(-1/2*1/E^(r^2/4) + r^2/
                       (4*E^(r^2/4)))))/r^4 - (5*((-40*r)/E^(r^2/4) + 
                    (8*r^3)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + 
                      r^2/(4*E^(r^2/4))) + 8*r^2*(r/(2*E^(r^2/4)) - 
                      (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2)))/r^3 + 
                 (-32/E^(r^2/4) + (32*r^2)/E^(r^2/4) + 32*(-1/2*1/E^(r^2/4) + 
                     r^2/(4*E^(r^2/4))) - 16*r^2*(-1/2*1/E^(r^2/4) + 
                     r^2/(4*E^(r^2/4))) + 32*r*(r/(2*E^(r^2/4)) - 
                     (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 
                   8*r^2*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - 
                     (r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/
                          (4*E^(r^2/4))))/2))/2))/r^2)*(-2 + 
                 6.000000000000001*^-8*(24/(E^(r^2/4)*r^3) - 
                   (3*((16*r)/E^(r^2/4) - (4*r^3)/E^(r^2/4)))/r^4 + 
                   (16/E^(r^2/4) - (16*r^2)/E^(r^2/4) + 8*r^2*
                      (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/r^3) - 
                 1.5000000000000002*^-8*(168/(E^(r^2/4)*r^3) - 
                   (21*((16*r)/E^(r^2/4) - (4*r^3)/E^(r^2/4)))/r^4 + 
                   (9*(16/E^(r^2/4) - (16*r^2)/E^(r^2/4) + 8*r^2*
                       (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 - 
                   (2*((-40*r)/E^(r^2/4) + (8*r^3)/E^(r^2/4) + 16*r*
                       (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 8*r^2*
                       (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/
                          (4*E^(r^2/4))))/2)))/r^2 + (-32/E^(r^2/4) + 
                     (32*r^2)/E^(r^2/4) + 32*(-1/2*1/E^(r^2/4) + r^2/
                        (4*E^(r^2/4))) - 16*r^2*(-1/2*1/E^(r^2/4) + 
                       r^2/(4*E^(r^2/4))) + 32*r*(r/(2*E^(r^2/4)) - 
                       (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 
                     8*r^2*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - 
                       (r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/
                          (4*E^(r^2/4))))/2))/2))/r)*Sin[theta]^2 - 
                 7.500000000000001*^-9*r*(-840/(E^(r^2/4)*r^4) + 
                   (105*((16*r)/E^(r^2/4) - (4*r^3)/E^(r^2/4)))/r^5 - 
                   (48*(16/E^(r^2/4) - (16*r^2)/E^(r^2/4) + 8*r^2*
                       (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^4 + 
                   (13*((-40*r)/E^(r^2/4) + (8*r^3)/E^(r^2/4) + 16*r*
                       (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 8*r^2*
                       (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/
                          (4*E^(r^2/4))))/2)))/r^3 - (3*(-32/E^(r^2/4) + 
                      (32*r^2)/E^(r^2/4) + 32*(-1/2*1/E^(r^2/4) + r^2/
                         (4*E^(r^2/4))) - 16*r^2*(-1/2*1/E^(r^2/4) + 
                        r^2/(4*E^(r^2/4))) + 32*r*(r/(2*E^(r^2/4)) - 
                        (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 
                      8*r^2*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - 
                        (r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/
                          (4*E^(r^2/4))))/2))/2)))/r^2 + ((80*r)/E^(r^2/4) - 
                     (16*r^3)/E^(r^2/4) - 32*r*(-1/2*1/E^(r^2/4) + 
                       r^2/(4*E^(r^2/4))) + 64*(r/(2*E^(r^2/4)) - 
                       (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) - 
                     16*r^2*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + 
                          r^2/(4*E^(r^2/4))))/2) + 32*r*(1/(2*E^(r^2/4)) - 
                       r^2/(4*E^(r^2/4)) + (1/(2*E^(r^2/4)) - r^2/
                          (4*E^(r^2/4)))/2 - (r*((3*r)/(4*E^(r^2/4)) - 
                          r^3/(8*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - 
                       (3*r^2)/(8*E^(r^2/4)) - (r*(r/(2*E^(r^2/4)) - 
                          (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2))/2) + 
                     8*r^2*(-1/4*r/E^(r^2/4) + (r*(-1/2*1/E^(r^2/4) + 
                          r^2/(4*E^(r^2/4))))/4 + (3*(-1/2*r/E^(r^2/4) + 
                          (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2))/2 - 
                       (r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - 
                          (r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + 
                          r^2/(4*E^(r^2/4))))/2))/2))/2))/r)*Sin[theta]^2) + 
               1.*^-8*(-48/(E^(r^2/4)*r^3) + (6*((16*r)/E^(r^2/4) - 
                    (4*r^3)/E^(r^2/4)))/r^4 - (3*(16/E^(r^2/4) - (16*r^2)/
                     E^(r^2/4) + 8*r^2*(-1/2*1/E^(r^2/4) + r^2/
                       (4*E^(r^2/4)))))/r^3 + ((-40*r)/E^(r^2/4) + 
                   (8*r^3)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + 
                     r^2/(4*E^(r^2/4))) + 8*r^2*(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*(-840/(E^(r^2/4)*r^4) + (105*((16*r)/E^(r^2/4) - 
                       (4*r^3)/E^(r^2/4)))/r^5 - (48*(16/E^(r^2/4) - 
                       (16*r^2)/E^(r^2/4) + 8*r^2*(-1/2*1/E^(r^2/4) + 
                         r^2/(4*E^(r^2/4)))))/r^4 + (13*((-40*r)/E^(r^2/4) + 
                       (8*r^3)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + 
                         r^2/(4*E^(r^2/4))) + 8*r^2*(r/(2*E^(r^2/4)) - 
                         (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2)))/
                     r^3 - (3*(-32/E^(r^2/4) + (32*r^2)/E^(r^2/4) + 
                       32*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) - 16*r^2*
                        (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*r*
                        (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/
                          (4*E^(r^2/4))))/2) + 8*r^2*(3/(4*E^(r^2/4)) - 
                         (3*r^2)/(8*E^(r^2/4)) - (r*(r/(2*E^(r^2/4)) - 
                          (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2))/2)))/
                     r^2 + ((80*r)/E^(r^2/4) - (16*r^3)/E^(r^2/4) - 
                      32*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 
                      64*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/
                          (4*E^(r^2/4))))/2) - 16*r^2*(r/(2*E^(r^2/4)) - 
                        (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 
                      32*r*(1/(2*E^(r^2/4)) - r^2/(4*E^(r^2/4)) + 
                        (1/(2*E^(r^2/4)) - r^2/(4*E^(r^2/4)))/2 - 
                        (r*((3*r)/(4*E^(r^2/4)) - r^3/(8*E^(r^2/4))))/2) + 
                      16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - 
                        (r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/
                          (4*E^(r^2/4))))/2))/2) + 8*r^2*(-1/4*r/E^(r^2/4) + 
                        (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/4 + 
                        (3*(-1/2*r/E^(r^2/4) + (r*(-1/2*1/E^(r^2/4) + 
                          r^2/(4*E^(r^2/4))))/2))/2 - (r*(3/(4*E^(r^2/4)) - 
                          (3*r^2)/(8*E^(r^2/4)) - (r*(r/(2*E^(r^2/4)) - 
                          (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2))/2))/
                         2))/r)*Sin[theta]^2)/4 + r*(3*(720/(E^(r^2/4)*r^5) - 
                     (90*((16*r)/E^(r^2/4) - (4*r^3)/E^(r^2/4)))/r^6 + 
                     (39*(16/E^(r^2/4) - (16*r^2)/E^(r^2/4) + 8*r^2*
                         (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^5 - 
                     (9*((-40*r)/E^(r^2/4) + (8*r^3)/E^(r^2/4) + 16*r*
                         (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 8*r^2*
                         (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/
                          (4*E^(r^2/4))))/2)))/r^4 + (-32/E^(r^2/4) + 
                       (32*r^2)/E^(r^2/4) + 32*(-1/2*1/E^(r^2/4) + 
                         r^2/(4*E^(r^2/4))) - 16*r^2*(-1/2*1/E^(r^2/4) + 
                         r^2/(4*E^(r^2/4))) + 32*r*(r/(2*E^(r^2/4)) - 
                         (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 
                       8*r^2*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - 
                         (r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/
                          (4*E^(r^2/4))))/2))/2))/r^3) - 
                   (3*(5040/(E^(r^2/4)*r^5) - (630*((16*r)/E^(r^2/4) - 
                         (4*r^3)/E^(r^2/4)))/r^6 + (297*(16/E^(r^2/4) - 
                         (16*r^2)/E^(r^2/4) + 8*r^2*(-1/2*1/E^(r^2/4) + 
                          r^2/(4*E^(r^2/4)))))/r^5 - (87*((-40*r)/E^(r^2/4) + 
                         (8*r^3)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + 
                          r^2/(4*E^(r^2/4))) + 8*r^2*(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*(-32/E^(r^2/4) + (32*r^2)/E^(r^2/4) + 
                         32*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) - 16*r^2*
                          (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*r*
                          (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/
                          (4*E^(r^2/4))))/2) + 8*r^2*(3/(4*E^(r^2/4)) - 
                          (3*r^2)/(8*E^(r^2/4)) - (r*(r/(2*E^(r^2/4)) - 
                          (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2))/2)))/
                       r^3 - (4*((80*r)/E^(r^2/4) - (16*r^3)/E^(r^2/4) - 
                         32*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 
                         64*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + 
                          r^2/(4*E^(r^2/4))))/2) - 16*r^2*(r/(2*E^(r^2/4)) - 
                          (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 
                         32*r*(1/(2*E^(r^2/4)) - r^2/(4*E^(r^2/4)) + 
                          (1/(2*E^(r^2/4)) - r^2/(4*E^(r^2/4)))/2 - 
                          (r*((3*r)/(4*E^(r^2/4)) - r^3/(8*E^(r^2/4))))/2) + 
                         16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - 
                          (r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + 
                          r^2/(4*E^(r^2/4))))/2))/2) + 8*r^2*(-1/4*
                          r/E^(r^2/4) + (r*(-1/2*1/E^(r^2/4) + r^2/(4*
                          E^(r^2/4))))/4 + (3*(-1/2*r/E^(r^2/4) + 
                          (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2))/2 - 
                          (r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - 
                          (r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/
                          (4*E^(r^2/4))))/2))/2))/2)))/r^2 + (64/E^(r^2/4) - 
                        (64*r^2)/E^(r^2/4) - 64*(-1/2*1/E^(r^2/4) + 
                          r^2/(4*E^(r^2/4))) + 32*r^2*(-1/2*1/E^(r^2/4) + 
                          r^2/(4*E^(r^2/4))) - 64*r*(r/(2*E^(r^2/4)) - 
                          (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 
                        64*(1/(2*E^(r^2/4)) - r^2/(4*E^(r^2/4)) + 
                          (1/(2*E^(r^2/4)) - r^2/(4*E^(r^2/4)))/2 - 
                          (r*((3*r)/(4*E^(r^2/4)) - r^3/(8*E^(r^2/4))))/2) + 
                        48*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - 
                          (r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + 
                          r^2/(4*E^(r^2/4))))/2))/2) - 16*r^2*
                         (3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - 
                          (r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + 
                          r^2/(4*E^(r^2/4))))/2))/2) + 32*r*((-5*r)/
                          (4*E^(r^2/4)) + r^3/(8*E^(r^2/4)) + 
                          (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2 - 
                          (r*(3/(4*E^(r^2/4)) - (5*r^2)/(8*E^(r^2/4)) + 
                          (r^2*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/4))/
                          2) + 32*r*(-1/4*r/E^(r^2/4) + (r*(-1/2*1/E^(r^2/
                          4) + r^2/(4*E^(r^2/4))))/4 + (3*(-1/2*r/E^(r^2/4) + 
                          (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2))/2 - 
                          (r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - 
                          (r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/
                          (4*E^(r^2/4))))/2))/2))/2) + 8*r^2*(-1/8*
                          1/E^(r^2/4) + r^2/(16*E^(r^2/4)) + 
                          (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))/2 + 
                          (r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + 
                          r^2/(4*E^(r^2/4))))/2))/4 + 2*(-3/(4*E^(r^2/4)) + 
                          (3*r^2)/(8*E^(r^2/4)) + (r*(r/(2*E^(r^2/4)) - 
                          (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2))/2) - 
                          (r*(-1/4*r/E^(r^2/4) + (r*(-1/2*1/E^(r^2/4) + 
                          r^2/(4*E^(r^2/4))))/4 + (3*(-1/2*r/E^(r^2/4) + 
                          (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2))/2 - 
                          (r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - 
                          (r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/
                          (4*E^(r^2/4))))/2))/2))/2))/2))/r)*Sin[theta]^2)/
                    4)))*(-4 + 1.8*^-15*(24/(E^(r^2/4)*r^3) - 
                  (3*((16*r)/E^(r^2/4) - (4*r^3)/E^(r^2/4)))/r^4 + 
                  (16/E^(r^2/4) - (16*r^2)/E^(r^2/4) + 8*r^2*
                     (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/r^3)^2*
                (1 + 3*Cos[2*theta]) - 3.0000000000000004*^-8*
                (168/(E^(r^2/4)*r^3) - (21*((16*r)/E^(r^2/4) - (4*r^3)/
                     E^(r^2/4)))/r^4 + (9*(16/E^(r^2/4) - (16*r^2)/
                     E^(r^2/4) + 8*r^2*(-1/2*1/E^(r^2/4) + r^2/
                       (4*E^(r^2/4)))))/r^3 - (2*((-40*r)/E^(r^2/4) + 
                    (8*r^3)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + 
                      r^2/(4*E^(r^2/4))) + 8*r^2*(r/(2*E^(r^2/4)) - 
                      (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2)))/r^2 + 
                 (-32/E^(r^2/4) + (32*r^2)/E^(r^2/4) + 32*(-1/2*1/E^(r^2/4) + 
                     r^2/(4*E^(r^2/4))) - 16*r^2*(-1/2*1/E^(r^2/4) + 
                     r^2/(4*E^(r^2/4))) + 32*r*(r/(2*E^(r^2/4)) - 
                     (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 
                   8*r^2*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - 
                     (r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/
                          (4*E^(r^2/4))))/2))/2))/r)*Sin[theta]^2 + 
               1.5000000000000002*^-8*(24/(E^(r^2/4)*r^3) - 
                 (3*((16*r)/E^(r^2/4) - (4*r^3)/E^(r^2/4)))/r^4 + 
                 (16/E^(r^2/4) - (16*r^2)/E^(r^2/4) + 8*r^2*
                    (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/r^3)*
                (4 - 12*Cos[2*theta] - 3.0000000000000004*^-8*
                  (168/(E^(r^2/4)*r^3) - (21*((16*r)/E^(r^2/4) - (4*r^3)/
                       E^(r^2/4)))/r^4 + (9*(16/E^(r^2/4) - (16*r^2)/
                       E^(r^2/4) + 8*r^2*(-1/2*1/E^(r^2/4) + r^2/
                         (4*E^(r^2/4)))))/r^3 - (2*((-40*r)/E^(r^2/4) + 
                      (8*r^3)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + 
                        r^2/(4*E^(r^2/4))) + 8*r^2*(r/(2*E^(r^2/4)) - 
                        (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2)))/r^2 + 
                   (-32/E^(r^2/4) + (32*r^2)/E^(r^2/4) + 32*(-1/2*
                        1/E^(r^2/4) + r^2/(4*E^(r^2/4))) - 16*r^2*
                      (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*r*
                      (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/
                          (4*E^(r^2/4))))/2) + 8*r^2*(3/(4*E^(r^2/4)) - 
                       (3*r^2)/(8*E^(r^2/4)) - (r*(r/(2*E^(r^2/4)) - 
                          (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2))/2))/
                    r)*(1 + 3*Cos[2*theta])*Sin[theta]^2) + 9.*^-16*
                (-48/(E^(r^2/4)*r^3) + (6*((16*r)/E^(r^2/4) - (4*r^3)/
                      E^(r^2/4)))/r^4 - (3*(16/E^(r^2/4) - (16*r^2)/
                      E^(r^2/4) + 8*r^2*(-1/2*1/E^(r^2/4) + r^2/
                        (4*E^(r^2/4)))))/r^3 + ((-40*r)/E^(r^2/4) + 
                    (8*r^3)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + 
                      r^2/(4*E^(r^2/4))) + 8*r^2*(r/(2*E^(r^2/4)) - 
                      (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2))/r^2)^2*
                Sin[2*theta]^2))/2 + 1.*^-8*(-1.8*^-7*(24/(E^(r^2/4)*r^3) - 
                 (3*((16*r)/E^(r^2/4) - (4*r^3)/E^(r^2/4)))/r^4 + 
                 (16/E^(r^2/4) - (16*r^2)/E^(r^2/4) + 8*r^2*
                    (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/r^3)^2 + 
              6*(24/(E^(r^2/4)*r^3) - (3*((16*r)/E^(r^2/4) - (4*r^3)/
                    E^(r^2/4)))/r^4 + (16/E^(r^2/4) - (16*r^2)/E^(r^2/4) + 
                  8*r^2*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/r^3)*(1 + 
                1.*^-8*(-48/(E^(r^2/4)*r^3) + (6*((16*r)/E^(r^2/4) - 
                     (4*r^3)/E^(r^2/4)))/r^4 - (3*(16/E^(r^2/4) - (16*r^2)/
                      E^(r^2/4) + 8*r^2*(-1/2*1/E^(r^2/4) + r^2/
                        (4*E^(r^2/4)))))/r^3 + ((-40*r)/E^(r^2/4) + 
                    (8*r^3)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + 
                      r^2/(4*E^(r^2/4))) + 8*r^2*(r/(2*E^(r^2/4)) - 
                      (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2))/r^2) + 
                7.500000000000001*^-9*(168/(E^(r^2/4)*r^3) - 
                  (21*((16*r)/E^(r^2/4) - (4*r^3)/E^(r^2/4)))/r^4 + 
                  (9*(16/E^(r^2/4) - (16*r^2)/E^(r^2/4) + 8*r^2*
                      (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 - 
                  (2*((-40*r)/E^(r^2/4) + (8*r^3)/E^(r^2/4) + 16*r*
                      (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 8*r^2*
                      (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/
                          (4*E^(r^2/4))))/2)))/r^2 + (-32/E^(r^2/4) + 
                    (32*r^2)/E^(r^2/4) + 32*(-1/2*1/E^(r^2/4) + r^2/
                       (4*E^(r^2/4))) - 16*r^2*(-1/2*1/E^(r^2/4) + 
                      r^2/(4*E^(r^2/4))) + 32*r*(r/(2*E^(r^2/4)) - 
                      (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 
                    8*r^2*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - 
                      (r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/
                          (4*E^(r^2/4))))/2))/2))/r)*Sin[theta]^2) + 
              (-48/(E^(r^2/4)*r^3) + (6*((16*r)/E^(r^2/4) - (4*r^3)/
                    E^(r^2/4)))/r^4 - (3*(16/E^(r^2/4) - (16*r^2)/E^(r^2/4) + 
                   8*r^2*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + 
                ((-40*r)/E^(r^2/4) + (8*r^3)/E^(r^2/4) + 16*r*
                   (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 8*r^2*
                   (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/
                        (4*E^(r^2/4))))/2))/r^2)*(-2 + 3.0000000000000004*^-8*
                 r*(-120/(E^(r^2/4)*r^4) + (15*((16*r)/E^(r^2/4) - (4*r^3)/
                      E^(r^2/4)))/r^5 - (6*(16/E^(r^2/4) - (16*r^2)/
                      E^(r^2/4) + 8*r^2*(-1/2*1/E^(r^2/4) + r^2/
                        (4*E^(r^2/4)))))/r^4 + ((-40*r)/E^(r^2/4) + 
                    (8*r^3)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + 
                      r^2/(4*E^(r^2/4))) + 8*r^2*(r/(2*E^(r^2/4)) - 
                      (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2))/r^3) - 
                1.5000000000000002*^-8*(168/(E^(r^2/4)*r^3) - 
                  (21*((16*r)/E^(r^2/4) - (4*r^3)/E^(r^2/4)))/r^4 + 
                  (9*(16/E^(r^2/4) - (16*r^2)/E^(r^2/4) + 8*r^2*
                      (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 - 
                  (2*((-40*r)/E^(r^2/4) + (8*r^3)/E^(r^2/4) + 16*r*
                      (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 8*r^2*
                      (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/
                          (4*E^(r^2/4))))/2)))/r^2 + (-32/E^(r^2/4) + 
                    (32*r^2)/E^(r^2/4) + 32*(-1/2*1/E^(r^2/4) + r^2/
                       (4*E^(r^2/4))) - 16*r^2*(-1/2*1/E^(r^2/4) + 
                      r^2/(4*E^(r^2/4))) + 32*r*(r/(2*E^(r^2/4)) - 
                      (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 
                    8*r^2*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - 
                      (r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/
                          (4*E^(r^2/4))))/2))/2))/r)*Sin[theta]^2 - 
                7.500000000000001*^-9*r*(-840/(E^(r^2/4)*r^4) + 
                  (105*((16*r)/E^(r^2/4) - (4*r^3)/E^(r^2/4)))/r^5 - 
                  (48*(16/E^(r^2/4) - (16*r^2)/E^(r^2/4) + 8*r^2*
                      (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^4 + 
                  (13*((-40*r)/E^(r^2/4) + (8*r^3)/E^(r^2/4) + 16*r*
                      (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 8*r^2*
                      (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/
                          (4*E^(r^2/4))))/2)))/r^3 - (3*(-32/E^(r^2/4) + 
                     (32*r^2)/E^(r^2/4) + 32*(-1/2*1/E^(r^2/4) + r^2/
                        (4*E^(r^2/4))) - 16*r^2*(-1/2*1/E^(r^2/4) + 
                       r^2/(4*E^(r^2/4))) + 32*r*(r/(2*E^(r^2/4)) - 
                       (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 
                     8*r^2*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - 
                       (r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/
                          (4*E^(r^2/4))))/2))/2)))/r^2 + ((80*r)/E^(r^2/4) - 
                    (16*r^3)/E^(r^2/4) - 32*r*(-1/2*1/E^(r^2/4) + 
                      r^2/(4*E^(r^2/4))) + 64*(r/(2*E^(r^2/4)) - 
                      (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) - 
                    16*r^2*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + 
                         r^2/(4*E^(r^2/4))))/2) + 32*r*(1/(2*E^(r^2/4)) - 
                      r^2/(4*E^(r^2/4)) + (1/(2*E^(r^2/4)) - r^2/
                         (4*E^(r^2/4)))/2 - (r*((3*r)/(4*E^(r^2/4)) - 
                         r^3/(8*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - 
                      (3*r^2)/(8*E^(r^2/4)) - (r*(r/(2*E^(r^2/4)) - 
                         (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2))/2) + 
                    8*r^2*(-1/4*r/E^(r^2/4) + (r*(-1/2*1/E^(r^2/4) + 
                         r^2/(4*E^(r^2/4))))/4 + (3*(-1/2*r/E^(r^2/4) + 
                         (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2))/2 - 
                      (r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - 
                         (r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/
                          (4*E^(r^2/4))))/2))/2))/2))/r)*Sin[theta]^2))*
             ((3*(-840/(E^(r^2/4)*r^4) + (105*((16*r)/E^(r^2/4) - (4*r^3)/
                     E^(r^2/4)))/r^5 - (48*(16/E^(r^2/4) - (16*r^2)/
                     E^(r^2/4) + 8*r^2*(-1/2*1/E^(r^2/4) + r^2/
                       (4*E^(r^2/4)))))/r^4 + (13*((-40*r)/E^(r^2/4) + 
                    (8*r^3)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + 
                      r^2/(4*E^(r^2/4))) + 8*r^2*(r/(2*E^(r^2/4)) - 
                      (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2)))/r^3 - 
                 (3*(-32/E^(r^2/4) + (32*r^2)/E^(r^2/4) + 
                    32*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) - 16*r^2*
                     (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*r*
                     (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/
                          (4*E^(r^2/4))))/2) + 8*r^2*(3/(4*E^(r^2/4)) - 
                      (3*r^2)/(8*E^(r^2/4)) - (r*(r/(2*E^(r^2/4)) - 
                         (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2))/2)))/
                  r^2 + ((80*r)/E^(r^2/4) - (16*r^3)/E^(r^2/4) - 
                   32*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 
                   64*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/
                         (4*E^(r^2/4))))/2) - 16*r^2*(r/(2*E^(r^2/4)) - 
                     (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 
                   32*r*(1/(2*E^(r^2/4)) - r^2/(4*E^(r^2/4)) + 
                     (1/(2*E^(r^2/4)) - r^2/(4*E^(r^2/4)))/2 - 
                     (r*((3*r)/(4*E^(r^2/4)) - r^3/(8*E^(r^2/4))))/2) + 
                   16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - 
                     (r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/
                          (4*E^(r^2/4))))/2))/2) + 8*r^2*(-1/4*r/E^(r^2/4) + 
                     (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/4 + 
                     (3*(-1/2*r/E^(r^2/4) + (r*(-1/2*1/E^(r^2/4) + r^2/
                          (4*E^(r^2/4))))/2))/2 - (r*(3/(4*E^(r^2/4)) - 
                        (3*r^2)/(8*E^(r^2/4)) - (r*(r/(2*E^(r^2/4)) - 
                          (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2))/2))/
                      2))/r)*(2 + 3.0000000000000004*^-8*(24/(E^(r^2/4)*
                     r^3) - (3*((16*r)/E^(r^2/4) - (4*r^3)/E^(r^2/4)))/r^4 + 
                   (16/E^(r^2/4) - (16*r^2)/E^(r^2/4) + 8*r^2*
                      (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/r^3)*
                  (1 + 3*Cos[2*theta]))*Sin[theta]^2)/4 + 
              3*(-120/(E^(r^2/4)*r^4) + (15*((16*r)/E^(r^2/4) - (4*r^3)/
                    E^(r^2/4)))/r^5 - (6*(16/E^(r^2/4) - (16*r^2)/E^(r^2/4) + 
                   8*r^2*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^4 + 
                ((-40*r)/E^(r^2/4) + (8*r^3)/E^(r^2/4) + 16*r*
                   (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 8*r^2*
                   (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/
                        (4*E^(r^2/4))))/2))/r^3)*(-1 + 3*Cos[2*theta] - 
                6.000000000000001*^-8*(24/(E^(r^2/4)*r^3) - 
                  (3*((16*r)/E^(r^2/4) - (4*r^3)/E^(r^2/4)))/r^4 + 
                  (16/E^(r^2/4) - (16*r^2)/E^(r^2/4) + 8*r^2*
                     (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/r^3)*
                 (1 + 3*Cos[2*theta]) + 7.500000000000001*^-9*
                 (168/(E^(r^2/4)*r^3) - (21*((16*r)/E^(r^2/4) - (4*r^3)/
                      E^(r^2/4)))/r^4 + (9*(16/E^(r^2/4) - (16*r^2)/
                      E^(r^2/4) + 8*r^2*(-1/2*1/E^(r^2/4) + r^2/
                        (4*E^(r^2/4)))))/r^3 - (2*((-40*r)/E^(r^2/4) + 
                     (8*r^3)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + 
                       r^2/(4*E^(r^2/4))) + 8*r^2*(r/(2*E^(r^2/4)) - 
                       (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2)))/r^2 + 
                  (-32/E^(r^2/4) + (32*r^2)/E^(r^2/4) + 32*
                     (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) - 16*r^2*
                     (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*r*
                     (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/
                          (4*E^(r^2/4))))/2) + 8*r^2*(3/(4*E^(r^2/4)) - 
                      (3*r^2)/(8*E^(r^2/4)) - (r*(r/(2*E^(r^2/4)) - 
                         (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2))/2))/
                   r)*(1 + 3*Cos[2*theta])*Sin[theta]^2) - 
              9.*^-8*(-48/(E^(r^2/4)*r^3) + (6*((16*r)/E^(r^2/4) - 
                   (4*r^3)/E^(r^2/4)))/r^4 - (3*(16/E^(r^2/4) - (16*r^2)/
                    E^(r^2/4) + 8*r^2*(-1/2*1/E^(r^2/4) + r^2/
                      (4*E^(r^2/4)))))/r^3 + ((-40*r)/E^(r^2/4) + 
                  (8*r^3)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + 
                    r^2/(4*E^(r^2/4))) + 8*r^2*(r/(2*E^(r^2/4)) - 
                    (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2))/r^2)*(
                240/(E^(r^2/4)*r^4) - (30*((16*r)/E^(r^2/4) - (4*r^3)/
                    E^(r^2/4)))/r^5 + (15*(16/E^(r^2/4) - (16*r^2)/
                    E^(r^2/4) + 8*r^2*(-1/2*1/E^(r^2/4) + r^2/
                      (4*E^(r^2/4)))))/r^4 - (5*((-40*r)/E^(r^2/4) + 
                   (8*r^3)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + 
                     r^2/(4*E^(r^2/4))) + 8*r^2*(r/(2*E^(r^2/4)) - 
                     (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2)))/r^3 + 
                (-32/E^(r^2/4) + (32*r^2)/E^(r^2/4) + 32*(-1/2*1/E^(r^2/4) + 
                    r^2/(4*E^(r^2/4))) - 16*r^2*(-1/2*1/E^(r^2/4) + 
                    r^2/(4*E^(r^2/4))) + 32*r*(r/(2*E^(r^2/4)) - 
                    (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 
                  8*r^2*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - 
                    (r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/
                          (4*E^(r^2/4))))/2))/2))/r^2)*Sin[2*theta]^2)))/
          (2 - 9.*^-16*(24/(E^(r^2/4)*r^3) - (3*((16*r)/E^(r^2/4) - 
                  (4*r^3)/E^(r^2/4)))/r^4 + (16/E^(r^2/4) - (16*r^2)/
                  E^(r^2/4) + 8*r^2*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/
                r^3)^2*(1 + 3*Cos[2*theta]) + 1.5000000000000002*^-8*
             (168/(E^(r^2/4)*r^3) - (21*((16*r)/E^(r^2/4) - (4*r^3)/
                  E^(r^2/4)))/r^4 + (9*(16/E^(r^2/4) - (16*r^2)/E^(r^2/4) + 
                 8*r^2*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 - 
              (2*((-40*r)/E^(r^2/4) + (8*r^3)/E^(r^2/4) + 16*r*
                  (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 8*r^2*
                  (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/
                       (4*E^(r^2/4))))/2)))/r^2 + (-32/E^(r^2/4) + 
                (32*r^2)/E^(r^2/4) + 32*(-1/2*1/E^(r^2/4) + 
                  r^2/(4*E^(r^2/4))) - 16*r^2*(-1/2*1/E^(r^2/4) + 
                  r^2/(4*E^(r^2/4))) + 32*r*(r/(2*E^(r^2/4)) - 
                  (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 
                8*r^2*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - 
                  (r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/
                         (4*E^(r^2/4))))/2))/2))/r)*Sin[theta]^2 + 
            3.0000000000000004*^-8*(24/(E^(r^2/4)*r^3) - 
              (3*((16*r)/E^(r^2/4) - (4*r^3)/E^(r^2/4)))/r^4 + 
              (16/E^(r^2/4) - (16*r^2)/E^(r^2/4) + 8*r^2*(-1/2*1/E^(r^2/4) + 
                  r^2/(4*E^(r^2/4))))/r^3)*(-1 + 3*Cos[2*theta] + 
              7.500000000000001*^-9*(168/(E^(r^2/4)*r^3) - 
                (21*((16*r)/E^(r^2/4) - (4*r^3)/E^(r^2/4)))/r^4 + 
                (9*(16/E^(r^2/4) - (16*r^2)/E^(r^2/4) + 8*r^2*
                    (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 - 
                (2*((-40*r)/E^(r^2/4) + (8*r^3)/E^(r^2/4) + 16*r*
                    (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 8*r^2*
                    (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/
                         (4*E^(r^2/4))))/2)))/r^2 + (-32/E^(r^2/4) + 
                  (32*r^2)/E^(r^2/4) + 32*(-1/2*1/E^(r^2/4) + r^2/
                     (4*E^(r^2/4))) - 16*r^2*(-1/2*1/E^(r^2/4) + 
                    r^2/(4*E^(r^2/4))) + 32*r*(r/(2*E^(r^2/4)) - 
                    (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 
                  8*r^2*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - 
                    (r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/
                          (4*E^(r^2/4))))/2))/2))/r)*(1 + 3*Cos[2*theta])*
               Sin[theta]^2) - 4.5*^-16*(-48/(E^(r^2/4)*r^3) + 
               (6*((16*r)/E^(r^2/4) - (4*r^3)/E^(r^2/4)))/r^4 - 
               (3*(16/E^(r^2/4) - (16*r^2)/E^(r^2/4) + 8*r^2*
                   (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + 
               ((-40*r)/E^(r^2/4) + (8*r^3)/E^(r^2/4) + 16*r*
                  (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 8*r^2*
                  (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/
                       (4*E^(r^2/4))))/2))/r^2)^2*Sin[2*theta]^2)^2 + 
         (3.0000000000000004*^-8*Sin[2*theta]*
           ((3*r*(-120/(E^(r^2/4)*r^4) + (15*((16*r)/E^(r^2/4) - (4*r^3)/
                    E^(r^2/4)))/r^5 - (6*(16/E^(r^2/4) - (16*r^2)/E^(r^2/4) + 
                   8*r^2*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^4 + 
                ((-40*r)/E^(r^2/4) + (8*r^3)/E^(r^2/4) + 16*r*
                   (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 8*r^2*
                   (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/
                        (4*E^(r^2/4))))/2))/r^3)*(1 + ((168/(E^(r^2/4)*r^3) - 
                   (21*((16*r)/E^(r^2/4) - (4*r^3)/E^(r^2/4)))/r^4 + 
                   (9*(16/E^(r^2/4) - (16*r^2)/E^(r^2/4) + 8*r^2*
                       (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 - 
                   (2*((-40*r)/E^(r^2/4) + (8*r^3)/E^(r^2/4) + 16*r*
                       (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 8*r^2*
                       (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/
                          (4*E^(r^2/4))))/2)))/r^2 + (-32/E^(r^2/4) + 
                     (32*r^2)/E^(r^2/4) + 32*(-1/2*1/E^(r^2/4) + r^2/
                        (4*E^(r^2/4))) - 16*r^2*(-1/2*1/E^(r^2/4) + 
                       r^2/(4*E^(r^2/4))) + 32*r*(r/(2*E^(r^2/4)) - 
                       (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 
                     8*r^2*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - 
                       (r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/
                          (4*E^(r^2/4))))/2))/2))/r)*(1.*^-8 - 
                   3.0000000000000004*^-8*Cos[2*theta]))/4) + 
              6.000000000000001*^-8*(-48/(E^(r^2/4)*r^3) + 
                 (6*((16*r)/E^(r^2/4) - (4*r^3)/E^(r^2/4)))/r^4 - 
                 (3*(16/E^(r^2/4) - (16*r^2)/E^(r^2/4) + 8*r^2*
                     (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + 
                 ((-40*r)/E^(r^2/4) + (8*r^3)/E^(r^2/4) + 16*r*
                    (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 8*r^2*
                    (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/
                         (4*E^(r^2/4))))/2))/r^2)^2*Cos[2*theta] + 
              6.000000000000001*^-8*r*(-48/(E^(r^2/4)*r^3) + 
                (6*((16*r)/E^(r^2/4) - (4*r^3)/E^(r^2/4)))/r^4 - 
                (3*(16/E^(r^2/4) - (16*r^2)/E^(r^2/4) + 8*r^2*
                    (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + 
                ((-40*r)/E^(r^2/4) + (8*r^3)/E^(r^2/4) + 16*r*
                   (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 8*r^2*
                   (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/
                        (4*E^(r^2/4))))/2))/r^2)*(240/(E^(r^2/4)*r^4) - 
                (30*((16*r)/E^(r^2/4) - (4*r^3)/E^(r^2/4)))/r^5 + 
                (15*(16/E^(r^2/4) - (16*r^2)/E^(r^2/4) + 8*r^2*
                    (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^4 - 
                (5*((-40*r)/E^(r^2/4) + (8*r^3)/E^(r^2/4) + 16*r*
                    (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 8*r^2*
                    (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/
                         (4*E^(r^2/4))))/2)))/r^3 + (-32/E^(r^2/4) + 
                  (32*r^2)/E^(r^2/4) + 32*(-1/2*1/E^(r^2/4) + r^2/
                     (4*E^(r^2/4))) - 16*r^2*(-1/2*1/E^(r^2/4) + 
                    r^2/(4*E^(r^2/4))) + 32*r*(r/(2*E^(r^2/4)) - 
                    (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 
                  8*r^2*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - 
                    (r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/
                          (4*E^(r^2/4))))/2))/2))/r^2)*Cos[2*theta] - 
              3.0000000000000004*^-8*(24/(E^(r^2/4)*r^3) - 
                (3*((16*r)/E^(r^2/4) - (4*r^3)/E^(r^2/4)))/r^4 + 
                (16/E^(r^2/4) - (16*r^2)/E^(r^2/4) + 8*r^2*
                   (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/r^3)*(
                3*r*(-120/(E^(r^2/4)*r^4) + (15*((16*r)/E^(r^2/4) - 
                     (4*r^3)/E^(r^2/4)))/r^5 - (6*(16/E^(r^2/4) - (16*r^2)/
                      E^(r^2/4) + 8*r^2*(-1/2*1/E^(r^2/4) + r^2/
                        (4*E^(r^2/4)))))/r^4 + ((-40*r)/E^(r^2/4) + 
                    (8*r^3)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + 
                      r^2/(4*E^(r^2/4))) + 8*r^2*(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*(-48/(E^(r^2/4)*r^3) + (6*((16*r)/E^(r^2/4) - (4*r^3)/
                      E^(r^2/4)))/r^4 - (3*(16/E^(r^2/4) - (16*r^2)/
                      E^(r^2/4) + 8*r^2*(-1/2*1/E^(r^2/4) + r^2/
                        (4*E^(r^2/4)))))/r^3 + ((-40*r)/E^(r^2/4) + 
                    (8*r^3)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + 
                      r^2/(4*E^(r^2/4))) + 8*r^2*(r/(2*E^(r^2/4)) - 
                      (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2))/r^2)*
                 Cos[2*theta]))*(-2 + 9.*^-16*(24/(E^(r^2/4)*r^3) - 
                 (3*((16*r)/E^(r^2/4) - (4*r^3)/E^(r^2/4)))/r^4 + 
                 (16/E^(r^2/4) - (16*r^2)/E^(r^2/4) + 8*r^2*
                    (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/r^3)^2*(1 + 
                3*Cos[2*theta]) - 1.5000000000000002*^-8*(168/(E^(r^2/4)*
                  r^3) - (21*((16*r)/E^(r^2/4) - (4*r^3)/E^(r^2/4)))/r^4 + 
                (9*(16/E^(r^2/4) - (16*r^2)/E^(r^2/4) + 8*r^2*
                    (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 - 
                (2*((-40*r)/E^(r^2/4) + (8*r^3)/E^(r^2/4) + 16*r*
                    (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 8*r^2*
                    (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/
                         (4*E^(r^2/4))))/2)))/r^2 + (-32/E^(r^2/4) + 
                  (32*r^2)/E^(r^2/4) + 32*(-1/2*1/E^(r^2/4) + r^2/
                     (4*E^(r^2/4))) - 16*r^2*(-1/2*1/E^(r^2/4) + 
                    r^2/(4*E^(r^2/4))) + 32*r*(r/(2*E^(r^2/4)) - 
                    (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 
                  8*r^2*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - 
                    (r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/
                          (4*E^(r^2/4))))/2))/2))/r)*Sin[theta]^2 - 
              3.0000000000000004*^-8*(24/(E^(r^2/4)*r^3) - 
                (3*((16*r)/E^(r^2/4) - (4*r^3)/E^(r^2/4)))/r^4 + 
                (16/E^(r^2/4) - (16*r^2)/E^(r^2/4) + 8*r^2*
                   (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/r^3)*(-1 + 
                3*Cos[2*theta] + 7.500000000000001*^-9*(168/(E^(r^2/4)*r^3) - 
                  (21*((16*r)/E^(r^2/4) - (4*r^3)/E^(r^2/4)))/r^4 + 
                  (9*(16/E^(r^2/4) - (16*r^2)/E^(r^2/4) + 8*r^2*
                      (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 - 
                  (2*((-40*r)/E^(r^2/4) + (8*r^3)/E^(r^2/4) + 16*r*
                      (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 8*r^2*
                      (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/
                          (4*E^(r^2/4))))/2)))/r^2 + (-32/E^(r^2/4) + 
                    (32*r^2)/E^(r^2/4) + 32*(-1/2*1/E^(r^2/4) + r^2/
                       (4*E^(r^2/4))) - 16*r^2*(-1/2*1/E^(r^2/4) + 
                      r^2/(4*E^(r^2/4))) + 32*r*(r/(2*E^(r^2/4)) - 
                      (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 
                    8*r^2*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - 
                      (r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/
                          (4*E^(r^2/4))))/2))/2))/r)*(1 + 3*Cos[2*theta])*
                 Sin[theta]^2) + 4.5*^-16*(-48/(E^(r^2/4)*r^3) + 
                 (6*((16*r)/E^(r^2/4) - (4*r^3)/E^(r^2/4)))/r^4 - 
                 (3*(16/E^(r^2/4) - (16*r^2)/E^(r^2/4) + 8*r^2*
                     (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + 
                 ((-40*r)/E^(r^2/4) + (8*r^3)/E^(r^2/4) + 16*r*
                    (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 8*r^2*
                    (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/
                         (4*E^(r^2/4))))/2))/r^2)^2*Sin[2*theta]^2) + 
            1.*^-8*(9.*^-8*(24/(E^(r^2/4)*r^3) - (3*((16*r)/E^(r^2/4) - 
                    (4*r^3)/E^(r^2/4)))/r^4 + (16/E^(r^2/4) - (16*r^2)/
                    E^(r^2/4) + 8*r^2*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/
                  r^3)^2 + (168/(E^(r^2/4)*r^3) - (21*((16*r)/E^(r^2/4) - 
                   (4*r^3)/E^(r^2/4)))/r^4 + (9*(16/E^(r^2/4) - (16*r^2)/
                    E^(r^2/4) + 8*r^2*(-1/2*1/E^(r^2/4) + r^2/
                      (4*E^(r^2/4)))))/r^3 - (2*((-40*r)/E^(r^2/4) + 
                   (8*r^3)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + 
                     r^2/(4*E^(r^2/4))) + 8*r^2*(r/(2*E^(r^2/4)) - 
                     (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2)))/r^2 + 
                (-32/E^(r^2/4) + (32*r^2)/E^(r^2/4) + 32*(-1/2*1/E^(r^2/4) + 
                    r^2/(4*E^(r^2/4))) - 16*r^2*(-1/2*1/E^(r^2/4) + 
                    r^2/(4*E^(r^2/4))) + 32*r*(r/(2*E^(r^2/4)) - 
                    (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 
                  8*r^2*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - 
                    (r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/
                          (4*E^(r^2/4))))/2))/2))/r)/4 - 
              3.0000000000000004*^-8*(-48/(E^(r^2/4)*r^3) + 
                 (6*((16*r)/E^(r^2/4) - (4*r^3)/E^(r^2/4)))/r^4 - 
                 (3*(16/E^(r^2/4) - (16*r^2)/E^(r^2/4) + 8*r^2*
                     (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + 
                 ((-40*r)/E^(r^2/4) + (8*r^3)/E^(r^2/4) + 16*r*
                    (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 8*r^2*
                    (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/
                         (4*E^(r^2/4))))/2))/r^2)^2*Cos[2*theta] + 
              3*(24/(E^(r^2/4)*r^3) - (3*((16*r)/E^(r^2/4) - (4*r^3)/
                    E^(r^2/4)))/r^4 + (16/E^(r^2/4) - (16*r^2)/E^(r^2/4) + 
                  8*r^2*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/r^3)*(-1 + 
                2.5*^-9*(168/(E^(r^2/4)*r^3) - (21*((16*r)/E^(r^2/4) - 
                     (4*r^3)/E^(r^2/4)))/r^4 + (9*(16/E^(r^2/4) - (16*r^2)/
                      E^(r^2/4) + 8*r^2*(-1/2*1/E^(r^2/4) + r^2/
                        (4*E^(r^2/4)))))/r^3 - (2*((-40*r)/E^(r^2/4) + 
                     (8*r^3)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + 
                       r^2/(4*E^(r^2/4))) + 8*r^2*(r/(2*E^(r^2/4)) - 
                       (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2)))/r^2 + 
                  (-32/E^(r^2/4) + (32*r^2)/E^(r^2/4) + 32*
                     (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) - 16*r^2*
                     (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*r*
                     (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/
                          (4*E^(r^2/4))))/2) + 8*r^2*(3/(4*E^(r^2/4)) - 
                      (3*r^2)/(8*E^(r^2/4)) - (r*(r/(2*E^(r^2/4)) - 
                         (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2))/2))/
                   r)*(-1 + 3*Cos[2*theta])))*(-3*r*(-120/(E^(r^2/4)*r^4) + 
                (15*((16*r)/E^(r^2/4) - (4*r^3)/E^(r^2/4)))/r^5 - 
                (6*(16/E^(r^2/4) - (16*r^2)/E^(r^2/4) + 8*r^2*
                    (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^4 + 
                ((-40*r)/E^(r^2/4) + (8*r^3)/E^(r^2/4) + 16*r*
                   (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 8*r^2*
                   (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/
                        (4*E^(r^2/4))))/2))/r^3)*(1 + 3*Cos[2*theta])*(1 + 
                7.500000000000001*^-9*(168/(E^(r^2/4)*r^3) - 
                  (21*((16*r)/E^(r^2/4) - (4*r^3)/E^(r^2/4)))/r^4 + 
                  (9*(16/E^(r^2/4) - (16*r^2)/E^(r^2/4) + 8*r^2*
                      (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 - 
                  (2*((-40*r)/E^(r^2/4) + (8*r^3)/E^(r^2/4) + 16*r*
                      (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 8*r^2*
                      (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/
                          (4*E^(r^2/4))))/2)))/r^2 + (-32/E^(r^2/4) + 
                    (32*r^2)/E^(r^2/4) + 32*(-1/2*1/E^(r^2/4) + r^2/
                       (4*E^(r^2/4))) - 16*r^2*(-1/2*1/E^(r^2/4) + 
                      r^2/(4*E^(r^2/4))) + 32*r*(r/(2*E^(r^2/4)) - 
                      (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 
                    8*r^2*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - 
                      (r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/
                          (4*E^(r^2/4))))/2))/2))/r)*Sin[theta]^2) + 
              9.*^-8*(-48/(E^(r^2/4)*r^3) + (6*((16*r)/E^(r^2/4) - (4*r^3)/
                     E^(r^2/4)))/r^4 - (3*(16/E^(r^2/4) - (16*r^2)/
                     E^(r^2/4) + 8*r^2*(-1/2*1/E^(r^2/4) + r^2/
                       (4*E^(r^2/4)))))/r^3 + ((-40*r)/E^(r^2/4) + 
                   (8*r^3)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + 
                     r^2/(4*E^(r^2/4))) + 8*r^2*(r/(2*E^(r^2/4)) - 
                     (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2))/r^2)^
                2*Sin[2*theta]^2 + 9.*^-8*r*(-48/(E^(r^2/4)*r^3) + 
                (6*((16*r)/E^(r^2/4) - (4*r^3)/E^(r^2/4)))/r^4 - 
                (3*(16/E^(r^2/4) - (16*r^2)/E^(r^2/4) + 8*r^2*
                    (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + 
                ((-40*r)/E^(r^2/4) + (8*r^3)/E^(r^2/4) + 16*r*
                   (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 8*r^2*
                   (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/
                        (4*E^(r^2/4))))/2))/r^2)*(240/(E^(r^2/4)*r^4) - 
                (30*((16*r)/E^(r^2/4) - (4*r^3)/E^(r^2/4)))/r^5 + 
                (15*(16/E^(r^2/4) - (16*r^2)/E^(r^2/4) + 8*r^2*
                    (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^4 - 
                (5*((-40*r)/E^(r^2/4) + (8*r^3)/E^(r^2/4) + 16*r*
                    (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 8*r^2*
                    (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/
                         (4*E^(r^2/4))))/2)))/r^3 + (-32/E^(r^2/4) + 
                  (32*r^2)/E^(r^2/4) + 32*(-1/2*1/E^(r^2/4) + r^2/
                     (4*E^(r^2/4))) - 16*r^2*(-1/2*1/E^(r^2/4) + 
                    r^2/(4*E^(r^2/4))) + 32*r*(r/(2*E^(r^2/4)) - 
                    (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 
                  8*r^2*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - 
                    (r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/
                          (4*E^(r^2/4))))/2))/2))/r^2)*Sin[2*theta]^2 + 
              3.0000000000000004*^-8*(24/(E^(r^2/4)*r^3) - 
                (3*((16*r)/E^(r^2/4) - (4*r^3)/E^(r^2/4)))/r^4 + 
                (16/E^(r^2/4) - (16*r^2)/E^(r^2/4) + 8*r^2*
                   (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/r^3)*(
                3*r*(-120/(E^(r^2/4)*r^4) + (15*((16*r)/E^(r^2/4) - 
                     (4*r^3)/E^(r^2/4)))/r^5 - (6*(16/E^(r^2/4) - (16*r^2)/
                      E^(r^2/4) + 8*r^2*(-1/2*1/E^(r^2/4) + r^2/
                        (4*E^(r^2/4)))))/r^4 + ((-40*r)/E^(r^2/4) + 
                    (8*r^3)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + 
                      r^2/(4*E^(r^2/4))) + 8*r^2*(r/(2*E^(r^2/4)) - 
                      (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2))/r^3)*
                 (1 + 3*Cos[2*theta]) - 9*(-48/(E^(r^2/4)*r^3) + 
                  (6*((16*r)/E^(r^2/4) - (4*r^3)/E^(r^2/4)))/r^4 - 
                  (3*(16/E^(r^2/4) - (16*r^2)/E^(r^2/4) + 8*r^2*
                      (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + 
                  ((-40*r)/E^(r^2/4) + (8*r^3)/E^(r^2/4) + 16*r*
                     (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 8*r^2*
                     (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/
                          (4*E^(r^2/4))))/2))/r^2)*Sin[2*theta]^2))))/
          (r*(2 - 9.*^-16*(24/(E^(r^2/4)*r^3) - (3*((16*r)/E^(r^2/4) - 
                   (4*r^3)/E^(r^2/4)))/r^4 + (16/E^(r^2/4) - (16*r^2)/
                   E^(r^2/4) + 8*r^2*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/
                 r^3)^2*(1 + 3*Cos[2*theta]) + 1.5000000000000002*^-8*
              (168/(E^(r^2/4)*r^3) - (21*((16*r)/E^(r^2/4) - (4*r^3)/
                   E^(r^2/4)))/r^4 + (9*(16/E^(r^2/4) - (16*r^2)/E^(r^2/4) + 
                  8*r^2*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 - 
               (2*((-40*r)/E^(r^2/4) + (8*r^3)/E^(r^2/4) + 16*r*
                   (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 8*r^2*
                   (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/
                        (4*E^(r^2/4))))/2)))/r^2 + (-32/E^(r^2/4) + 
                 (32*r^2)/E^(r^2/4) + 32*(-1/2*1/E^(r^2/4) + 
                   r^2/(4*E^(r^2/4))) - 16*r^2*(-1/2*1/E^(r^2/4) + 
                   r^2/(4*E^(r^2/4))) + 32*r*(r/(2*E^(r^2/4)) - 
                   (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 
                 8*r^2*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - 
                   (r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/
                          (4*E^(r^2/4))))/2))/2))/r)*Sin[theta]^2 + 
             3.0000000000000004*^-8*(24/(E^(r^2/4)*r^3) - 
               (3*((16*r)/E^(r^2/4) - (4*r^3)/E^(r^2/4)))/r^4 + 
               (16/E^(r^2/4) - (16*r^2)/E^(r^2/4) + 8*r^2*(-1/2*1/E^(r^2/4) + 
                   r^2/(4*E^(r^2/4))))/r^3)*(-1 + 3*Cos[2*theta] + 
               7.500000000000001*^-9*(168/(E^(r^2/4)*r^3) - 
                 (21*((16*r)/E^(r^2/4) - (4*r^3)/E^(r^2/4)))/r^4 + 
                 (9*(16/E^(r^2/4) - (16*r^2)/E^(r^2/4) + 8*r^2*
                     (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 - 
                 (2*((-40*r)/E^(r^2/4) + (8*r^3)/E^(r^2/4) + 16*r*
                     (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 8*r^2*
                     (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/
                          (4*E^(r^2/4))))/2)))/r^2 + (-32/E^(r^2/4) + 
                   (32*r^2)/E^(r^2/4) + 32*(-1/2*1/E^(r^2/4) + r^2/
                      (4*E^(r^2/4))) - 16*r^2*(-1/2*1/E^(r^2/4) + 
                     r^2/(4*E^(r^2/4))) + 32*r*(r/(2*E^(r^2/4)) - 
                     (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 
                   8*r^2*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - 
                     (r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/
                          (4*E^(r^2/4))))/2))/2))/r)*(1 + 3*Cos[2*theta])*
                Sin[theta]^2) - 4.5*^-16*(-48/(E^(r^2/4)*r^3) + 
                (6*((16*r)/E^(r^2/4) - (4*r^3)/E^(r^2/4)))/r^4 - 
                (3*(16/E^(r^2/4) - (16*r^2)/E^(r^2/4) + 8*r^2*
                    (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + 
                ((-40*r)/E^(r^2/4) + (8*r^3)/E^(r^2/4) + 16*r*
                   (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 8*r^2*
                   (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/
                        (4*E^(r^2/4))))/2))/r^2)^2*Sin[2*theta]^2)^2)))/
      (2*Sqrt[2]*r))/(Sqrt[2]*r))/2
