10
0
mirror of https://github.com/QuantumPackage/qp2.git synced 2024-12-23 04:43:45 +01:00

fixed bug in cpx overlap

This commit is contained in:
AbdAmmar 2024-10-19 23:20:37 +02:00
parent 60c406a659
commit a38bf1bcb2

View File

@ -92,7 +92,7 @@ subroutine overlap_cgaussian_xyz(Ae_center, Be_center, alpha, beta, power_A, pow
F_integral_tab(i) = Fc_integral(i, inv_sq_p) F_integral_tab(i) = Fc_integral(i, inv_sq_p)
enddo enddo
ab = alpha * beta * inv_sq_p ab = alpha * beta * inv_sq_p * inv_sq_p
arg = ab * (Ae_center(1) - Be_center(1)) & arg = ab * (Ae_center(1) - Be_center(1)) &
* (Ae_center(1) - Be_center(1)) * (Ae_center(1) - Be_center(1))