diff --git a/src/tce/ccsd/icsd_t2.F b/src/tce/ccsd/icsd_t2.F
index 245018543f..1aa9f88d4b 100644
--- a/src/tce/ccsd/icsd_t2.F
+++ b/src/tce/ccsd/icsd_t2.F
@@ -9332,7 +9332,7 @@ SUBROUTINE icsd_t2_8_x(d_a,k_a_offset,
       if (e_a.ne.0) call errquit("MA a",dimhhpp,MA_ERR)
       allocate(f_b(1:dimpppp),stat=e_b)
       if (e_b.ne.0) call errquit("MA b",dimpppp,MA_ERR)
-      allocate(f_c(1:dimhhpp,2),stat=e_c)
+      allocate(f_c(1:dimhhpp,0:1),stat=e_c)
       if (e_c.ne.0) call errquit("MA c",dimhhpp,MA_ERR)
 
       nbh   = 0