[SCM] Gerris Flow Solver branch, upstream, updated. b3aa46814a06c9cb2912790b23916ffb44f1f203

[Stephane Popinet]

The following commit has been merged in the upstream branch:
commit bb32c8b822562073c2d47af10e88d9ce2a47f0de
Author: Stephane Popinet <popinet at users.sf.net>
Date:   Wed Dec 17 13:02:55 2008 +1100

    Bug fix for OutputScalarSum in parallel
    
    darcs-hash:20081217020255-d4795-07cbea99f3d6fc55d2edc5d35466a31a6491d972.gz

diff --git a/src/output.c b/src/output.c
index add20cd..7ba3707 100644
--- a/src/output.c
+++ b/src/output.c
@@ -1914,6 +1914,7 @@ static gboolean gfs_output_scalar_sum_event (GfsEvent * event,
 			      FTT_TRAVERSE_LEAFS|FTT_TRAVERSE_LEVEL,
 			      output->maxlevel,
 			      (FttCellTraverseFunc) add, data);
+    gfs_all_reduce (GFS_DOMAIN (sim), sum, MPI_DOUBLE, MPI_SUM);
     fprintf (GFS_OUTPUT (event)->file->fp, 
 	     "%s time: %g sum: % 15.6e\n", output->name, sim->time.t, 
 	     sum*pow (sim->physical_params.L, FTT_DIMENSION));

-- 
Gerris Flow Solver