bug in Integrate
- To: mathgroup at smc.vnet.net
- Subject: [mg74756] bug in Integrate
- From: "dimitris" <dimmechan at yahoo.com>
- Date: Wed, 4 Apr 2007 04:01:43 -0400 (EDT)
The following integral is evaluated wrong by Mathematica
f = HoldForm[Integrate[x*BesselJ[0, x]*Cos[x], {x, 0, Infinity}]]
ReleaseHold[f]
0
The integral is divergent.
The same holds true for the following integral
g = HoldForm[Integrate[x*BesselJ[0, x]*Sin[x], {x, 0, Infinity}]]
ReleaseHold[g]
Integrate::gener: Unable to check convergence.
0
but this time we get a warning message that indicates that the result
might be wrong; as it is.