Commit 5fbb6a4b authored by Daniel Wortmann's avatar Daniel Wortmann
Browse files

Merge branch 'develop' of into develop

parents 5d34c6f7 f5e77dad
......@@ -208,7 +208,7 @@ CONTAINS
ENDDO ! n = 1, atoms%ntype
ENDDO ! k = 2, stars%ng3
#ifdef CPP_MPII
#ifdef CPP_MPI
PRINT *,"mpi",mpi%irank,qlmp(0,0,:)
CALL MPI_REDUCE(qlmp,qlmp_out,SIZE(qlmp),MPI_DOUBLE_COMPLEX,MPI_SUM,0,mpi%mpi_comm,ierr)
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