Commit 8cdb3813 authored by Daniel Wortmann's avatar Daniel Wortmann

Bugfix in parallelization of force calculations

parent 865b3e15
......@@ -107,7 +107,7 @@ CONTAINS
END IF
ENDIF
#ifdef CPP_MPI
CALL MPI_BCAST(l_relax,1,MPI_LOGICAL,0,ierr)
CALL MPI_BCAST(l_relax,1,MPI_LOGICAL,0,mpi%mpi_comm,ierr)
#endif
IF (l_relax.AND.input%l_f) CALL relaxation(mpi,input,atoms,cell,sym,forcetot,results%tote)
......
Markdown is supported
0% or .
You are about to add 0 people to the discussion. Proceed with caution.
Finish editing this message first!
Please register or to comment