MESH: Make MPI tag in redistribute_blocks() consistent.
Signed-off-by: Grzegorz Kowal <grzegorz@amuncode.org>
This commit is contained in:
parent
5eecf860ef
commit
557abc5b82
@ -923,7 +923,7 @@ module mesh
|
||||
|
||||
! generate a tag for communication
|
||||
!
|
||||
itag = pmeta%process * nprocs + np + nprocs + 1
|
||||
itag = 16 * (np * nprocs + pmeta%process)
|
||||
|
||||
! sends the block to the right process
|
||||
!
|
||||
|
Loading…
x
Reference in New Issue
Block a user