From faf43331edb20391a10ec6cb85a354d471f1612c Mon Sep 17 00:00:00 2001
From: Anthony Scemama <scemama@irsamc.ups-tlse.fr>
Date: Tue, 4 Jul 2023 01:46:49 +0200
Subject: [PATCH] Fix segfault in CC

---
 src/ccsd/ccsd_t_space_orb_stoch.irp.f | 5 ++++-
 1 file changed, 4 insertions(+), 1 deletion(-)

diff --git a/src/ccsd/ccsd_t_space_orb_stoch.irp.f b/src/ccsd/ccsd_t_space_orb_stoch.irp.f
index 31fe67ce..770d629a 100644
--- a/src/ccsd/ccsd_t_space_orb_stoch.irp.f
+++ b/src/ccsd/ccsd_t_space_orb_stoch.irp.f
@@ -332,7 +332,10 @@ subroutine ccsd_par_t_space_stoch(nO,nV,t1,t2,f_o,f_v,v_vvvo,v_vvoo,v_vooo,energ
   print '(A)', ' +----------------------+--------------+----------+'
   print '(A)', ''
 
-  deallocate(X_vovv,X_ooov,T_voov,T_oovv)
+  deallocate(X_vovv)
+  deallocate(X_ooov)
+  deallocate(T_voov)
+  deallocate(T_oovv)
 end