9
1
mirror of https://github.com/QuantumPackage/qp2.git synced 2025-04-25 17:54:44 +02:00

corrected a bug in qp2/plugins/local/tuto_plugins/tuto_I/traces_one_e.irp.f

This commit is contained in:
eginer 2025-03-12 12:29:29 +01:00
parent ffe7a8485f
commit 2037939abb

View File

@ -30,6 +30,7 @@ BEGIN_PROVIDER [ double precision, trace_ao_one_e_ints]
! have the same number of functions
END_DOC
integer :: i,j
double precision :: accu
double precision, allocatable :: inv_overlap_times_integrals(:,:) ! = h S^{-1}
allocate(inv_overlap_times_integrals(ao_num,ao_num))
! routine that computes the product of two matrices, you can check it with