public function BESSJ1(X)
This subroutine calculates the First Kind Bessel Function of
order 1, for any real number X. The polynomial approximation by
series of Chebyshev polynomials is used for 0<X<8 and 0<8/X<1. References:
M.Abramowitz, I.A.Stegun, Handbook of Mathematical Functions, 1965. C.W.Clenshaw, Chebyshev Series for Mathematical Functions, Mathematical Tables, Vol. 5, 1962.

Arguments
Type
Intent Optional Attributes
Name
double precision,
intent(in)
::
X
Argument of the Bessel function.

Return Value
doubleprecision
proc~~bessj1~~CalledByGraph
proc~bessj1
BESSJ1
proc~bessj
BESSJ
proc~bessj->proc~bessj1
proc~determine_bessel_array
determine_bessel_array
proc~determine_bessel_array->proc~bessj
proc~determine_nmax
determine_nmax
proc~determine_nmax->proc~bessj
proc~int_t_rel
int_T_rel
proc~int_t_rel->proc~bessj
proc~funct_g_rel
funct_g_rel
proc~funct_g_rel->proc~int_t_rel
proc~integrate_resu_rel
integrate_resU_rel
proc~integrate_resu_rel->proc~int_t_rel
proc~principal_integral_rel
principal_integral_rel
proc~integrate_resu_rel->proc~principal_integral_rel
proc~om_double_scan
om_double_scan
proc~om_double_scan->proc~determine_bessel_array
proc~om_double_scan->proc~determine_nmax
proc~disp
disp
proc~om_double_scan->proc~disp
proc~calc_eigen
calc_eigen
proc~om_double_scan->proc~calc_eigen
proc~secant
secant
proc~om_double_scan->proc~secant
proc~om_scan
om_scan
proc~om_scan->proc~determine_bessel_array
proc~om_scan->proc~determine_nmax
proc~om_scan->proc~disp
proc~om_scan->proc~calc_eigen
proc~om_scan->proc~secant
program~alps
alps
program~alps->proc~determine_bessel_array
program~alps->proc~determine_nmax
program~alps->proc~om_double_scan
program~alps->proc~om_scan
proc~map_search
map_search
program~alps->proc~map_search
proc~refine_guess
refine_guess
program~alps->proc~refine_guess
proc~integrate_res_rel
integrate_res_rel
proc~integrate_res_rel->proc~integrate_resu_rel
proc~principal_integral_rel->proc~funct_g_rel
proc~full_integrate
full_integrate
proc~full_integrate->proc~integrate_res_rel
proc~disp->proc~full_integrate
proc~calc_eigen->proc~disp
proc~map_search->proc~disp
proc~map_search->proc~refine_guess
proc~refine_guess->proc~disp
proc~refine_guess->proc~secant
proc~secant->proc~disp
Nodes of different colours represent the following:

Graph Key
Subroutine
Subroutine
Function
Function
Interface
Interface
Type Bound Procedure
Type Bound Procedure
Unknown Procedure Type
Unknown Procedure Type
Program
Program
This Page's Entity
This Page's Entity
Solid arrows point from a procedure to one which it calls. Dashed
arrows point from an interface to procedures which implement that interface.
This could include the module procedures in a generic interface or the
implementation in a submodule of an interface in a parent module.