From 263b724e1a25e76525f31706e3342bc50887dbc2 Mon Sep 17 00:00:00 2001 From: Anthony Scemama Date: Sat, 26 Jan 2019 10:34:22 +0100 Subject: [PATCH] Fixing large parallel runs --- src/davidson/davidson_parallel.irp.f | 7 ------- 1 file changed, 7 deletions(-) diff --git a/src/davidson/davidson_parallel.irp.f b/src/davidson/davidson_parallel.irp.f index a1f69841..9a0844c6 100644 --- a/src/davidson/davidson_parallel.irp.f +++ b/src/davidson/davidson_parallel.irp.f @@ -72,13 +72,6 @@ subroutine davidson_run_slave(thread,iproc) endif enddo - do - if (zmq_get_N_states_diag(zmq_to_qp_run_socket, 1) /= -1) then - exit - endif - print *, irp_here, ': Waiting for N_states_diag' - call sleep(1) - enddo call davidson_slave_work(zmq_to_qp_run_socket, zmq_socket_push, N_states_diag, N_det, worker_id) integer, external :: disconnect_from_taskserver