I'm experiencing troubles in obtaining the result of an ordinary differential equation with a boundary condition at infinity. I write down
Limit[DSolve[{\[Psi]''[r]ψ''[r] + 2/r*\[Psi]'[r]r*ψ'[r] - \[Kappa]^2*\[Psi][r]κ^2*ψ[r] ==
0, \[Psi][aψ[a/2] == Subscript[Psi, 0], \[Psi][M]ψ[M] == 0}, \[Psi][r]ψ[r],
r], M -> Infinity]
And obtain
\!\(\*UnderscriptBox[\(\[Limit]\), \(M \[Rule] \[Infinity]\∞\)]\) {{\
\[Psi][r]ψ[r] -> (
a E^((a \[Kappa]κ)/2 -
r \[Kappa]κ) (-E^(2 M \[Kappa]κ) + E^(2 r \[Kappa]κ)) Subscript[
Psi, 0])/(2 (E^(a \[Kappa]κ) - E^(2 M \[Kappa]κ)) r)}}
Which is correct, but is not evaluated for the limit. How can I force Mathematica to evaluate this limit?