From bc69ac42b13816b3988142d78a216f97d4014e40 Mon Sep 17 00:00:00 2001 From: v1j4y Date: Fri, 16 Dec 2022 15:01:13 +0100 Subject: [PATCH] restore dimension of alphsIcfg. --- src/csf/configuration_CI_sigma_helpers.irp.f | 2 +- 1 file changed, 1 insertion(+), 1 deletion(-) diff --git a/src/csf/configuration_CI_sigma_helpers.irp.f b/src/csf/configuration_CI_sigma_helpers.irp.f index 4473b1fa..3440c48e 100644 --- a/src/csf/configuration_CI_sigma_helpers.irp.f +++ b/src/csf/configuration_CI_sigma_helpers.irp.f @@ -524,7 +524,7 @@ use bitmasks !!! !!!END_PROVIDER - BEGIN_PROVIDER [ integer(bit_kind), alphasIcfg_list , (N_int,2,N_configuration,mo_num*12)] + BEGIN_PROVIDER [ integer(bit_kind), alphasIcfg_list , (N_int,2,N_configuration,mo_num*mo_num)] &BEGIN_PROVIDER [ integer, NalphaIcfg_list, (N_configuration) ] implicit none !use bitmasks