integrals.wolfram.com   Use one of Mathematica's 2500+ functions FREE online

Wolfram Mathematica Online Integrator
The world's only full-power integration solver
∫
An image showing the results of your requested integral.

Integrate[((x/s^2)*Exp[-(x^2/(2*s^2))]*Cos[y])/ (Pi*Sqrt[x^2 - Sin[y]^2]), x] ==
(Cos[y]*Sqrt[-1 + 2*x^2 + Cos[2*y]]* (-1 + Erf[Sqrt[(-1 + 2*x^2 + Cos[2*y])/s^2]/2]))/ (E^(Sin[y]^2/(2*s^2))*Sqrt[2*Pi]*s^2* Sqrt[(-1 + 2*x^2 + Cos[2*y])/s^2]) 

                     2
          x         x
          -- Exp[-(----)] Cos[y]
           2          2
          s        2 s
Integrate[----------------------, x] == 
                   2         2
          Pi Sqrt[x  - Sin[y] ]

                     2
(Cos[y] Sqrt[-1 + 2 x  + Cos[2 y]] 
 
                           2
                   -1 + 2 x  + Cos[2 y]
              Sqrt[--------------------]
                             2
                            s
    (-1 + Erf[--------------------------])) / 
                          2
 
          2     2
    Sin[y] /(2 s )             2
  (E               Sqrt[2 Pi] s  
 
                 2
         -1 + 2 x  + Cos[2 y]
    Sqrt[--------------------])
                   2
                  s
Time to compute: 0.29 second
Spread the word: