10
1
mirror of https://github.com/pfloos/quack synced 2024-07-03 18:06:03 +02:00

bug fix excitation_density_from_MO.f90

This commit is contained in:
arjanberger10 2019-03-09 00:02:18 +01:00
parent 609615bd3a
commit 509d96d4bb

View File

@ -25,7 +25,7 @@ subroutine excitation_density_from_MO(nBas,nC,nO,nR,nS,G,XpY,rho)
do j=nC+1,nO
do b=nO+1,nBas-nR
jb = jb + 1
rho(x,y,ia) = rho(x,y,ia) + G(x,y,j,b)*XpY(ia,jb)
rho(x,y,ia) = rho(x,y,ia) + G(x,j,y,b)*XpY(ia,jb)
enddo
enddo
enddo