10
0
mirror of https://github.com/LCPQ/quantum_package synced 2024-07-23 11:17:33 +02:00

removed print

This commit is contained in:
Yann Garniron 2018-08-31 18:57:03 +02:00
parent fee31d4e3e
commit de4a0d0caf

View File

@ -385,9 +385,6 @@ subroutine dress_collector(zmq_socket_pull, E, relative_error, delta, delta_s2,
end do
cp(:,:,m_task,1) += breve_delta_m(:,:,1)
cp(:,:,m_task,2) += breve_delta_m(:,:,2)
if(m_task == 1) then
print *, "M1", f
end if
dot_f(m_task) -= f
end if
end do