timflow.bessel.besselnumba.besselk0near

timflow.bessel.besselnumba.besselk0near(z, Nt)

besselk0near.

implicit none complex(kind=8), intent(in) :: z integer, intent(in) :: Nt complex(kind=8) :: omega complex(kind=8) :: rsq, log1, term integer :: n