BESSEL_J1(3) - [MATHEMATICS] Bessel function of the first kind of order 1
result = bessel_j1(x)
elemental real(kind=KIND) function bessel_j1(x)real(kind=KIND),intent(in) :: x
o KIND may be any supported real KIND. o the result is of the same type and kind as X
BESSEL_J1(3) computes the Bessel function of the first kind of order 1 of X.
o X : The type shall be real.
The return value is of type real and lies in the range -0.5818 <= BESSEL(0,X) <= 0.5818 . It has the same kind as X.
Sample program:
program demo_bessel_j1 use, intrinsic :: iso_fortran_env, only : real32, real64, real128 implicit none real(kind=real64) :: x = 1.0_real64 x = bessel_j1(x) write(*,*)x end program demo_bessel_j1Results:
> 0.44005058574493350
Fortran 2008
BESSEL_J0(3), BESSEL_JN(3), BESSEL_Y0(3), BESSEL_Y1(3), BESSEL_YN(3)
Fortran intrinsic descriptions
Nemo Release 3.1 | bessel_j1 (3fortran) | November 02, 2024 |