cleanup and add FREE mo_integrals_map_2

This commit is contained in:
Kevin Gasperich 2020-05-28 17:57:34 -05:00 committed by GitHub
parent 1ecf741b17
commit 20eb52b2b0
No known key found for this signature in database
GPG Key ID: 4AEE18F83AFDEB23
1 changed files with 2 additions and 4 deletions

View File

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