10
0
mirror of https://github.com/LCPQ/quantum_package synced 2024-12-24 13:23:41 +01:00

restored relative_error

This commit is contained in:
Yann Garniron 2018-09-04 20:50:09 +02:00
parent bccad69c77
commit cfa8e1dc34

View File

@ -473,7 +473,7 @@ subroutine dress_collector(zmq_socket_pull, E, relative_error, delta, delta_s2,
error = eqt error = eqt
endif endif
m += 1 m += 1
if(eqt <=0d0* relative_error) then if(eqt <= relative_error) then
integer, external :: zmq_put_dvector integer, external :: zmq_put_dvector
i= zmq_put_dvector(zmq_to_qp_run_socket, worker_id, "ending", dble(m-1), 1) i= zmq_put_dvector(zmq_to_qp_run_socket, worker_id, "ending", dble(m-1), 1)
found = .true. found = .true.