Could you advise me on how to calculate the following integral, perhaps by using Residue?
Integrate[(1.4142*Sqrt[s*(0.1*s + Sqrt[4 + 0.01*s^2])])/
(s^3 Sqrt[4 + 0.01*s^2] (-78.9568 + s*(0.1*s + Sqrt[4 + 0.01*s^2])))
(1 - s*Sqrt[4 + 0.01*s^2]) Cos[(Pi + t) s]*
Sin[0.707*x*Sqrt[s*(0.1*s + Sqrt[4 + 0.01*s^2])]],
{s, 0., Infinity},
PrincipalValue -> True,
Assumptions -> t + Pi > 0]
Residueto calculate improper integrals. – swish Dec 24 '12 at 18:05Total[2 \[Pi] I Residue[f[x], {x,x /. #}] & /@ Solve[Denominator[f[x]] == 0 && Im[x] > 0, x]– swish Dec 24 '12 at 18:27