Module Cheby_Module USE Numeric_Kinds_Module ! Eigenvalue variables INTEGER :: ncheby REAL(dp) :: bessarg, eigmin, eigmax, e_range, vcut REAL(dp) :: shift,norm REAL(dp),ALLOCATABLE :: bessel_func(:) End Module Cheby_Module