30
30
! Used to hold the "input" H when mixing the Hamiltonian
31
31
real(dp), dimension(:,:), public, pointer :: Hold => null()
33
real(dp), dimension(:,:), public, pointer :: Hprev => null()
35
33
! Pieces of H that do not depend on the SCF density matrix
36
34
! Formerly there was a single array H0 for this