mirror of
https://github.com/QuantumPackage/qp2.git
synced 2024-08-24 21:21:47 +02:00
always deinit mo map 2
This commit is contained in:
parent
9043ec7eae
commit
1ecf741b17
@ -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
|
||||||
|
Loading…
Reference in New Issue
Block a user