From 92c954143cf069e595ca2556cf0117d8066f09ab Mon Sep 17 00:00:00 2001 From: Anthony Scemama Date: Sun, 20 Nov 2016 22:14:06 +0100 Subject: [PATCH] Bug in MRSC2 --- plugins/mrcepa0/dressing_slave.irp.f | 1 + 1 file changed, 1 insertion(+) diff --git a/plugins/mrcepa0/dressing_slave.irp.f b/plugins/mrcepa0/dressing_slave.irp.f index ae76597c..9e9fa65a 100644 --- a/plugins/mrcepa0/dressing_slave.irp.f +++ b/plugins/mrcepa0/dressing_slave.irp.f @@ -455,6 +455,7 @@ subroutine mrsc2_dressing_collector(delta_ii_,delta_ij_,delta_ii_s2_,delta_ij_s2 do l=1, n(2) do i_state=1,N_states + delta_ij_(i_state,idx(l,2),J) += delta(i_state,l,2) delta_ij_s2_(i_state,idx(l,2),J) += delta_s2(i_state,l,2) end do end do