/[escript]/trunk/paso/src/Coupler.c
ViewVC logotype

Diff of /trunk/paso/src/Coupler.c

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

revision 3641 by gross, Mon Sep 12 03:25:25 2011 UTC revision 3642 by caltinay, Thu Oct 27 03:41:51 2011 UTC
# Line 28  Paso_Connector* Paso_Connector_alloc(Pas Line 28  Paso_Connector* Paso_Connector_alloc(Pas
28    Esys_resetError();    Esys_resetError();
29    out=MEMALLOC(1,Paso_Connector);    out=MEMALLOC(1,Paso_Connector);
30    if ( send->mpi_info != recv->mpi_info ) {    if ( send->mpi_info != recv->mpi_info ) {
31       Esys_setError(SYSTEM_ERROR,"Paso_Coupler_alloc: send and recv mpi communicator don't match.");       Esys_setError(SYSTEM_ERROR,"Paso_Coupler_alloc: send and recv mpi communicators don't match.");
32       return NULL;       return NULL;
33    }    }
34    if ( send->local_length != recv->local_length ) {    if ( send->local_length != recv->local_length ) {
# Line 208  void Paso_Coupler_startCollect(Paso_Coup Line 208  void Paso_Coupler_startCollect(Paso_Coup
208       if (coupler->in_use) {       if (coupler->in_use) {
209      Esys_setError(SYSTEM_ERROR,"Paso_Coupler_startCollect: Coupler in use.");      Esys_setError(SYSTEM_ERROR,"Paso_Coupler_startCollect: Coupler in use.");
210       }       }
211       /* start reveiving input */       /* start receiving input */
212       {       {
213          for (i=0; i< coupler->connector->recv->numNeighbors; ++i) {          for (i=0; i< coupler->connector->recv->numNeighbors; ++i) {
214              #ifdef ESYS_MPI              #ifdef ESYS_MPI
# Line 324  void Paso_Coupler_max(const dim_t n, dou Line 324  void Paso_Coupler_max(const dim_t n, dou
324     #pragma omp parallel for private(i)     #pragma omp parallel for private(i)
325     for (i=0;i<overlap_n; ++i) x[my_n+i]=MAX(x[my_n+i], remote_values[i]);     for (i=0;i<overlap_n; ++i) x[my_n+i]=MAX(x[my_n+i], remote_values[i]);
326  }  }
327    

Legend:
Removed from v.3641  
changed lines
  Added in v.3642

  ViewVC Help
Powered by ViewVC 1.1.26