diff options
author | tradke <tradke@d60812e6-3970-4df4-986e-c251b06effeb> | 2002-08-13 08:12:09 +0000 |
---|---|---|
committer | tradke <tradke@d60812e6-3970-4df4-986e-c251b06effeb> | 2002-08-13 08:12:09 +0000 |
commit | af5e7205d1a00a23cd9e58cf611b589272868229 (patch) | |
tree | d52eff25b08516203522b8c8fa039201064579a4 | |
parent | 1d524cc564ffa5c8c82ec067393abbc4dc34a769 (diff) |
NormInf needs a MAX MPI reduction (and not a SUM).
This closes PR CactusPUGH/1197.
git-svn-id: http://svn.cactuscode.org/arrangements/CactusPUGH/PUGHReduce/trunk@33 d60812e6-3970-4df4-986e-c251b06effeb
-rw-r--r-- | src/ReductionNormInf.c | 4 |
1 files changed, 2 insertions, 2 deletions
diff --git a/src/ReductionNormInf.c b/src/ReductionNormInf.c index e4ee2e3..0feb79a 100644 --- a/src/ReductionNormInf.c +++ b/src/ReductionNormInf.c @@ -340,12 +340,12 @@ static int PUGH_ReductionNormInf (cGH *GH, if (proc < 0) { CACTUS_MPI_ERROR (MPI_Allreduce (local_outvals, outvals, total_outvals, - PUGH_MPI_REAL, MPI_SUM, pughGH->PUGH_COMM_WORLD)); + PUGH_MPI_REAL, MPI_MAX, pughGH->PUGH_COMM_WORLD)); } else { CACTUS_MPI_ERROR (MPI_Reduce (local_outvals, outvals, total_outvals, - PUGH_MPI_REAL, MPI_SUM, proc, pughGH->PUGH_COMM_WORLD)); + PUGH_MPI_REAL, MPI_MAX, proc, pughGH->PUGH_COMM_WORLD)); } free (local_outvals); } |