stardis-solver

Solve coupled heat transfers
git clone git://git.meso-star.fr/stardis-solver.git
Log | Files | Refs | README | LICENSE

commit d3d51d135d9701b75f20ac724a6b9124e1c8ecb0
parent a28a544b6e37143f42110276fd6669accd6de583
Author: Vincent Forest <vincent.forest@meso-star.com>
Date:   Wed,  8 Dec 2021 16:38:07 +0100

Small adjustment of the function gather_accumulators

Diffstat:
Msrc/sdis.c | 2+-
1 file changed, 1 insertion(+), 1 deletion(-)

diff --git a/src/sdis.c b/src/sdis.c @@ -496,7 +496,7 @@ gather_accumulators goto exit; } - nprocs = (size_t)dev->mpi_nprocs; + nprocs = dev->mpi_rank == 0 ? (size_t)dev->mpi_nprocs : 1; per_proc_acc = MEM_CALLOC(dev->allocator, nprocs, sizeof(struct accum)); if(!per_proc_acc) { res = RES_MEM_ERR; goto error; }