From dd8ff9854aa620b5fb2039d140b0e6b1c1984fee Mon Sep 17 00:00:00 2001 From: Anthony Scemama Date: Tue, 27 Apr 2021 00:37:09 +0200 Subject: [PATCH] Removed debug print --- src/cipsi/run_pt2_slave.irp.f | 3 --- 1 file changed, 3 deletions(-) diff --git a/src/cipsi/run_pt2_slave.irp.f b/src/cipsi/run_pt2_slave.irp.f index 5f7d5073..3725b32d 100644 --- a/src/cipsi/run_pt2_slave.irp.f +++ b/src/cipsi/run_pt2_slave.irp.f @@ -221,9 +221,6 @@ subroutine run_pt2_slave_large(thread,iproc,energy) if (n_tasks == 0) exit call sscanf_ddd(task, subset, i_generator, N) -!$OMP CRITICAL -print *, ':task:', subset, i_generator, N, pt2_F(i_generator) -!$OMP END CRITICAL if( pt2_F(i_generator) <= 0 .or. pt2_F(i_generator) > N_det ) then print *, irp_here stop 'bug in selection'