itjyb Subroutine

public subroutine itjyb(x, Tj, Ty)

Integrate Bessel functions J0(t) and Y0(t) with respect to t from 0 to x ( x ≥ 0 )

Arguments

Type IntentOptional Attributes Name
real(kind=wp) :: x
real(kind=wp) :: Tj
real(kind=wp) :: Ty