mirror of
https://github.com/QuantumPackage/qp2.git
synced 2025-04-28 19:24:46 +02:00
remove double counting of nuclear repulsion
This commit is contained in:
parent
2e6df70e03
commit
674635c057
@ -129,9 +129,9 @@ subroutine htilde_mu_mat_opt_bi_ortho(key_j, key_i, Nint, hmono, htwoe, hthree,
|
|||||||
|
|
||||||
endif
|
endif
|
||||||
|
|
||||||
if(degree==0) then
|
! if(degree==0) then
|
||||||
htot += nuclear_repulsion
|
! htot += nuclear_repulsion
|
||||||
endif
|
! endif
|
||||||
|
|
||||||
end
|
end
|
||||||
|
|
||||||
|
Loading…
x
Reference in New Issue
Block a user