moebiusband/NuSiF-Solver
2
0
Fork 0
Code Issues Pull Requests Packages Projects Releases Wiki Activity

Fix bug in domain decomposition with MPI Cart

Browse Source
This commit is contained in:
Jan Eitzinger 2023-06-18 07:53:01 +02:00
parent a49a31f281
commit 1d99310b2e
1 changed files with 2 additions and 2 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

4
BasicSolver/2D-mpi-v3/src/solver.c
View File

@ -333,8 +333,8 @@ void initSolver(Solver* solver, Parameter* params)
&solver->jNeighbours[1]); &solver->jNeighbours[1]);
MPI_Cart_get(solver->comm, NDIMS, solver->dims, periods, solver->coords); MPI_Cart_get(solver->comm, NDIMS, solver->dims, periods, solver->coords);
solver->imaxLocal = sizeOfRank(solver->rank, dims[IDIM], solver->imax); solver->imaxLocal = sizeOfRank(solver->coords[IDIM], dims[IDIM], solver->imax);
solver->jmaxLocal = sizeOfRank(solver->rank, dims[JDIM], solver->jmax); solver->jmaxLocal = sizeOfRank(solver->coords[JDIM], dims[JDIM], solver->jmax);
MPI_Datatype jBufferType; MPI_Datatype jBufferType;
MPI_Type_contiguous(solver->imaxLocal, MPI_DOUBLE, &jBufferType); MPI_Type_contiguous(solver->imaxLocal, MPI_DOUBLE, &jBufferType);