9
1
mirror of https://github.com/QuantumPackage/qp2.git synced 2024-10-30 10:18:07 +01:00
This commit is contained in:
eginer 2019-02-11 15:52:59 +01:00
commit bdb1a76855
2 changed files with 3 additions and 1 deletions

View File

@ -86,7 +86,7 @@ def save_new_module(path, l_child):
! TODO : Put the documentation of the program here
END_DOC
print *, 'Hello world'
end
end
""")
def main(arguments):

View File

@ -20,6 +20,8 @@ END_PROVIDER
END_DOC
integer :: i,j
HF_energy = nuclear_repulsion
HF_two_electron_energy = 0.d0
HF_one_electron_energy = 0.d0
do j=1,ao_num
do i=1,ao_num
HF_two_electron_energy += 0.5d0 * ( ao_two_e_integral_alpha(i,j) * SCF_density_matrix_ao_alpha(i,j) &