mirror/hdf5
2
0
Fork 0
mirror of https://github.com/HDFGroup/hdf5.git synced 2024-11-27 02:10:55 +08:00
Code Issues Packages Projects Releases Wiki Activity

[svn-r4818]

Browse Source 
Purpose:
	Small Fix
Description:
	Fixed the Min/Max/Average accumlation stuff...
Solution:
	Actually thought about the code and made it accumulate the
	information in the correct way.
Platforms tested:
	Linux
This commit is contained in:
Bill Wendling 2002-01-11 15:30:02 -05:00
parent 52bf29ae4a
commit 0d069736a7
1 changed files with 6 additions and 8 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

14
perform/pio_perf.c
View File

@ -561,17 +561,15 @@ run_test(FILE *output, iotype iot, parameters parms)
static void
get_minmax(minmax *mm, double val)
{
double sum;
int myrank, nproc;
double min, max, sum;
int myrank;
MPI_Comm_rank(pio_comm_g, &myrank);
MPI_Comm_size(pio_comm_g, &nproc);
MPI_Comm_size(pio_comm_g, &mm->num);
MPI_Allreduce(&val, &(mm->max), 1, MPI_DOUBLE, MPI_MAX, pio_comm_g);
MPI_Allreduce(&val, &(mm->min), 1, MPI_DOUBLE, MPI_MIN, pio_comm_g);
MPI_Allreduce(&val, &sum, 1, MPI_DOUBLE, MPI_SUM, pio_comm_g);
mm->sum += sum;
mm->num += nproc;
MPI_Allreduce(&val, &mm->max, 1, MPI_DOUBLE, MPI_MAX, pio_comm_g);
MPI_Allreduce(&val, &mm->min, 1, MPI_DOUBLE, MPI_MIN, pio_comm_g);
MPI_Allreduce(&val, &mm->sum, 1, MPI_DOUBLE, MPI_SUM, pio_comm_g);
}
/*