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

always deinit mo map 2

This commit is contained in:
Kevin Gasperich 2020-05-28 14:44:27 -05:00 committed by GitHub
parent 9043ec7eae
commit 1ecf741b17
No known key found for this signature in database
GPG Key ID: 4AEE18F83AFDEB23

View File

@ -1462,9 +1462,9 @@ subroutine clear_mo_map
! Frees the memory of the MO map ! Frees the memory of the MO map
END_DOC END_DOC
call map_deinit(mo_integrals_map) call map_deinit(mo_integrals_map)
if (is_complex) then !if (is_complex) then
call map_deinit(mo_integrals_map_2) call map_deinit(mo_integrals_map_2)
endif !endif
FREE mo_integrals_map mo_two_e_integrals_jj mo_two_e_integrals_jj_anti FREE mo_integrals_map mo_two_e_integrals_jj mo_two_e_integrals_jj_anti
FREE mo_two_e_integrals_jj_exchange mo_two_e_integrals_in_map FREE mo_two_e_integrals_jj_exchange mo_two_e_integrals_in_map
end end