From 1ecf741b17d380cf23fd42efc64f6d85e00b26fe Mon Sep 17 00:00:00 2001 From: Kevin Gasperich Date: Thu, 28 May 2020 14:44:27 -0500 Subject: [PATCH] always deinit mo map 2 --- src/mo_two_e_ints/mo_bi_integrals.irp.f | 4 ++-- 1 file changed, 2 insertions(+), 2 deletions(-) diff --git a/src/mo_two_e_ints/mo_bi_integrals.irp.f b/src/mo_two_e_ints/mo_bi_integrals.irp.f index aeef6ff6..0aa5a121 100644 --- a/src/mo_two_e_ints/mo_bi_integrals.irp.f +++ b/src/mo_two_e_ints/mo_bi_integrals.irp.f @@ -1462,9 +1462,9 @@ subroutine clear_mo_map ! Frees the memory of the MO map END_DOC call map_deinit(mo_integrals_map) - if (is_complex) then + !if (is_complex) then 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_two_e_integrals_jj_exchange mo_two_e_integrals_in_map end