57
57
real(dp), dimension(:,:), allocatable, save :: dxa
58
58
real(dp), dimension(:,:), allocatable, save :: xdop
59
real(dp), dimension(:,:), allocatable, save :: xdsp
59
real(dp), dimension(:,:), pointer, save :: xdsp ! Allocated in dhscf
62
62
integer, dimension(3), save :: ne