bessel_j1(x) computes the Bessel function of the first kind of order 1 of
Fortran 2008 and later
result = bessel_j1(x)
x- The type shall be
real, and it shall be scalar.
The return value is of type
real and it lies in the range . It has the same kind as
program test_besj1 real(8) :: x = 1.0_8 x = bessel_j1(x) end program test_besj1