diff --git a/plugins/MRCC_Utils/mrcc_dummy.irp.f b/plugins/MRCC_Utils/mrcc_dummy.irp.f
deleted file mode 100644
index 8f1deda8..00000000
--- a/plugins/MRCC_Utils/mrcc_dummy.irp.f
+++ /dev/null
@@ -1,4 +0,0 @@
-program pouet
-
-
-end
diff --git a/plugins/MRCC_Utils/mrcc_utils.irp.f b/plugins/MRCC_Utils/mrcc_utils.irp.f
index 0735980d..8ad922cf 100644
--- a/plugins/MRCC_Utils/mrcc_utils.irp.f
+++ b/plugins/MRCC_Utils/mrcc_utils.irp.f
@@ -162,9 +162,9 @@ END_PROVIDER
       CI_eigenvectors_dressed(1:N_det,mrcc_state) = eigenvectors(1:N_det,mrcc_state)
       CI_electronic_energy_dressed(mrcc_state) = eigenvalues(mrcc_state)
       if (mrcc_state == 1) then
-        do mrcc_state=N_states+1,N_states_diag
-          CI_eigenvectors_dressed(1:N_det,mrcc_state) = eigenvectors(1:N_det,mrcc_state)
-          CI_electronic_energy_dressed(mrcc_state) = eigenvalues(mrcc_state)
+        do k=N_states+1,N_states_diag
+          CI_eigenvectors_dressed(1:N_det,k) = eigenvectors(1:N_det,k)
+          CI_electronic_energy_dressed(k) = eigenvalues(k)
         enddo
       endif
      enddo