mirror of
https://github.com/QuantumPackage/qp2.git
synced 2024-09-01 05:33:40 +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…
Reference in New Issue
Block a user