Returns the Bessel function of the first kind, J_n(x).
See http://mathworld.wolfram.com/BesselFunctionoftheFirstKind.html for more details.
function besselJ extends TRANSFORM.Icons.Function; import gamma = TRANSFORM.Math.gamma_Lanczos; import TRANSFORM.Math.factorial; input Real k "Bessel order"; input Real x "Value in Jk(x)"; input Real tolerance = 1e-6 "tolerance for infinite sum termination"; output Real Jk "Bessel function Jk(x) (order k) value"; end besselJ;