timflow.bessel.besselnumba.bessells_gauss_ho

timflow.bessel.besselnumba.bessells_gauss_ho(x, y, z1, z2, lab, order)

bessells_gauss_ho.

implicit none integer, intent(in) :: order real(kind=8), intent(in) :: x,y complex(kind=8), intent(in) :: z1,z2 complex(kind=8), intent(in) :: lab complex(kind=8), dimension(0:order) :: omega integer :: n, p real(kind=8) :: L, x0 complex(kind=8) :: bigz, biglab complex(kind=8), dimension(8) :: k0