From 38aa8ef547c2b4d68b6caf2d7cca40a3590f69ed Mon Sep 17 00:00:00 2001
From: Anthony Scemama <scemama@irsamc.ups-tlse.fr>
Date: Thu, 6 Jun 2024 16:36:45 +0200
Subject: [PATCH] Update ccsd_space_orb_sub.irp.f

---
 src/ccsd/ccsd_space_orb_sub.irp.f | 2 ++
 1 file changed, 2 insertions(+)

diff --git a/src/ccsd/ccsd_space_orb_sub.irp.f b/src/ccsd/ccsd_space_orb_sub.irp.f
index b48ca7da..555a2552 100644
--- a/src/ccsd/ccsd_space_orb_sub.irp.f
+++ b/src/ccsd/ccsd_space_orb_sub.irp.f
@@ -18,6 +18,8 @@ subroutine run_ccsd_space_orb
   integer(bit_kind)             :: det(N_int,2)
   integer                       :: nO, nV, nOa, nVa
 
+  call set_multiple_levels_omp(.False.)
+
   if (do_ao_cholesky) then
     PROVIDE cholesky_mo_transp
     FREE cholesky_ao