From 4c69fa20104bbd4700709d883d87871a8b47e6d0 Mon Sep 17 00:00:00 2001 From: Anthony Scemama Date: Sat, 31 Dec 2022 12:50:08 +0100 Subject: [PATCH] Fix csf --- 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 b69cd17e..76761d53 100644 --- a/src/csf/configuration_CI_sigma_helpers.irp.f +++ b/src/csf/configuration_CI_sigma_helpers.irp.f @@ -978,7 +978,7 @@ END_PROVIDER !call debug_spindet(Isomo,1) !call debug_spindet(Idomo,1) - alphasIcfg = 0_bit_kind + alphasIcfg(:,:,1) = 0_bit_kind ! find out all pq holes possible nholes = 0