timflow.bessel.besselnumba.besselldqxqy

timflow.bessel.besselnumba.besselldqxqy(x, y, z1, z2, lab, order, d1in, d2in)

Besselldqxqy.

implicit none integer, intent(in) :: order real(kind=8), intent(in) :: x,y,d1in,d2in complex(kind=8), intent(in) :: z1,z2 complex(kind=8), intent(in) :: lab complex(kind=8), dimension(0:2*order+1) :: qxqy

integer :: Nls, n real(kind=8) :: Lnear, L, d1, d2, delta complex(kind=8) :: z, delz, za, zb