Skip to content

GitLab

fleur
fleur
Commit ac54512c authored by Daniel Wortmann's avatar Daniel Wortmann
Browse files
Options

Update cdnval.F90 to fix MPI deadlock

parent 12fb707b
Hide whitespace changes
Inline Side-by-side
Showing with 1 addition and 1 deletion
cdn/cdnval.F90
View file @ ac54512c
...@@ -565,7 +565,7 @@ CONTAINS ...@@ -565,7 +565,7 @@ CONTAINS
wk,nbands,eig,zMat) wk,nbands,eig,zMat)
#ifdef CPP_MPI #ifdef CPP_MPI
! Sinchronizes the RMA operations ! Sinchronizes the RMA operations
if (l_evp) CALL MPI_BARRIER(mpi%mpi_comm,ie) CALL MPI_BARRIER(mpi%mpi_comm,ie)
#endif #endif
!IF (l_evp.AND.(isize.GT.1)) THEN !IF (l_evp.AND.(isize.GT.1)) THEN
! eig(1:noccbd) = eig(n_start:n_end) ! eig(1:noccbd) = eig(n_start:n_end)
......
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