10
0
mirror of https://github.com/LCPQ/quantum_package synced 2024-06-25 22:52:15 +02:00

Reduced nb of threads

This commit is contained in:
Anthony Scemama 2017-04-08 21:11:24 +02:00
parent 5261a572e7
commit 386b83a2ae
2 changed files with 5 additions and 5 deletions

View File

@ -18,7 +18,7 @@ subroutine run
write(*,'(A)') '============='
write(*,'(A)') ''
do istate=1,N_states
call get_occupation_from_dets(occupation,1)
call get_occupation_from_dets(occupation,istate)
write(*,'(A)') ''
write(*,'(A,I3)'), 'State ', istate
write(*,'(A)') '---------------'

View File

@ -504,10 +504,10 @@ subroutine new_parallel_job(zmq_to_qp_run_socket,name_in)
if (zmq_context == 0_ZMQ_PTR) then
stop 'ZMQ_PTR is null'
endif
rc = f77_zmq_ctx_set(zmq_context, ZMQ_IO_THREADS, nproc)
if (rc /= 0) then
print *, 'Unable to set the number of ZMQ IO threads to', nproc
endif
! rc = f77_zmq_ctx_set(zmq_context, ZMQ_IO_THREADS, nproc)
! if (rc /= 0) then
! print *, 'Unable to set the number of ZMQ IO threads to', nproc
! endif
zmq_to_qp_run_socket = new_zmq_to_qp_run_socket()
name = name_in