/[escript]/branches/scons-dev/paso/src/SolverFCT_solve.c
ViewVC logotype

Diff of /branches/scons-dev/paso/src/SolverFCT_solve.c

Parent Directory Parent Directory | Revision Log Revision Log | View Patch Patch

revision 1679 by ksteube, Thu Jul 24 04:46:46 2008 UTC revision 1680 by ksteube, Thu Jul 31 06:06:50 2008 UTC
# Line 342  void Paso_SolverFCT_solve(Paso_FCTranspo Line 342  void Paso_SolverFCT_solve(Paso_FCTranspo
342                         }                         }
343                         Paso_Coupler_startCollect(u_m_coupler,u_m);                         Paso_Coupler_startCollect(u_m_coupler,u_m);
344                         #ifdef PASO_MPI                         #ifdef PASO_MPI
               double local_norm[2], norm[2];  
345                            local_norm[0]=norm_u;                            local_norm[0]=norm_u;
346                            local_norm[1]=norm_du;                            local_norm[1]=norm_du;
347                        MPI_Allreduce(local_norm,norm, 2, MPI_DOUBLE, MPI_MAX, fctp->mpi_info->comm);                        MPI_Allreduce(local_norm,norm, 2, MPI_DOUBLE, MPI_MAX, fctp->mpi_info->comm);
Legend:
Removed from v.1679  
changed lines
  Added in v.1680
  ViewVC Help
Powered by ViewVC 1.1.26