add missing MPI call

This commit is contained in:
Axel Kohlmeyer
2020-07-07 21:37:33 -04:00
parent 8fbc8a7148
commit 5cef86d7b7

View File

@ -612,6 +612,7 @@ void WriteData::impropers()
int ncol = 5;
int sendrow = static_cast<int> (nimpropers_local);
int maxrow;
MPI_Allreduce(&sendrow,&maxrow,1,MPI_INT,MPI_MAX,world);
tagint **buf;
if (me == 0) memory->create(buf,MAX(1,maxrow),ncol,"write_data:buf");