Module SurfaceDelves_Module
USE Numeric_Kinds_Module
Implicit None
Save

!========================================================================
! Delves variables

LOGICAL :: firstcalld
INTEGER :: td_dim
INTEGER,ALLOCATABLE :: ndvib(:)
REAL(KIND=dp) :: delta_td, ss_max, vasyd
REAL(KIND=dp),ALLOCATABLE :: td_vals(:), ss_vals(:), td_eig(:,:), td_energy(:)
REAL(KIND=dp),ALLOCATABLE :: td_pot(:), td_vp(:) , kineticd(:,:)

End Module SurfaceDelves_Module