From 04443346847b75751c329a48a58d8601e993d364 Mon Sep 17 00:00:00 2001 From: Anthony Scemama Date: Wed, 17 Mar 2021 14:00:56 +0100 Subject: [PATCH] Bug fix --- devel/import_integrals/export_integrals_mo.irp.f | 2 ++ 1 file changed, 2 insertions(+) diff --git a/devel/import_integrals/export_integrals_mo.irp.f b/devel/import_integrals/export_integrals_mo.irp.f index 292a2bc..5e47145 100644 --- a/devel/import_integrals/export_integrals_mo.irp.f +++ b/devel/import_integrals/export_integrals_mo.irp.f @@ -1,4 +1,5 @@ program export_integrals_mo + PROVIDE mo_two_e_integrals_in_map call run end @@ -55,6 +56,7 @@ subroutine run double precision, external :: get_two_e_integral + allocate (A(mo_num,mo_num)) call ezfio_set_nuclei_nuclear_repulsion(nuclear_repulsion)