MODULE Jacobi_Module
USE Numeric_Kinds_Module
IMPLICIT NONE
SAVE

REAL(kind=dp),ALLOCATABLE :: smalls(:), larges(:), thetacap(:), betaqf(:)

END MODULE Jacobi_Module