diff --git a/src/csf/configuration_CI_sigma_helpers.irp.f b/src/csf/configuration_CI_sigma_helpers.irp.f
index 76761d53..e6e6a0d7 100644
--- a/src/csf/configuration_CI_sigma_helpers.irp.f
+++ b/src/csf/configuration_CI_sigma_helpers.irp.f
@@ -1155,7 +1155,7 @@ END_PROVIDER
         !end do
 
         if(.NOT. pqExistsQ) then
-           tableUniqueAlphas(p,q) = .TRUE.
+           tableUniqueAlphas(pp,qq) = .TRUE.
            !print *,p,q
            !call debug_spindet(Jsomo,1)
            !call debug_spindet(Jdomo,1)