Question: converting to spherical Bessel


I want to convert BesselJ(n,x) to the spherical version of it.

Is there a defined command in Maple that does this??

For example: 

sqrt(Pi)*sqrt(2)*BesselJ(1/2, x)/(2*sqrt(x))

is equivallent to


Indeed, the latter is the spherical version of the former one.

However, I can define a function that does it, see:

SBesselJ := proc (n,x) options operator, arrow, function_assign; expand(simplify(sqrt(Pi/(2*x))*BesselJ(n+1/2, x),'assume = positive')) end proc;

but is there a command that converts some terms to our defined function?? 

Thanks in advance.

Please Wait...