/[escript]/trunk/escript/src/Data.cpp
ViewVC logotype

Diff of /trunk/escript/src/Data.cpp

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

revision 2080 by phornby, Thu Nov 20 16:10:10 2008 UTC revision 2081 by caltinay, Fri Nov 21 01:28:31 2008 UTC
# Line 1894  Data::calc_minGlobalDataPoint(int& ProcN Line 1894  Data::calc_minGlobalDataPoint(int& ProcN
1894    double next,local_min;    double next,local_min;
1895    int local_lowi=0,local_lowj=0;        int local_lowi=0,local_lowj=0;    
1896    
1897    #pragma omp parallel private(next,local_min,local_lowi,local_lowj)    #pragma omp parallel firstprivate(local_lowi,local_lowj) private(next,local_min)
1898    {    {
1899      local_min=min;      local_min=min;
1900      #pragma omp for private(i,j) schedule(static)      #pragma omp for private(i,j) schedule(static)
# Line 1921  Data::calc_minGlobalDataPoint(int& ProcN Line 1921  Data::calc_minGlobalDataPoint(int& ProcN
1921      next = temp.getDataPoint(lowi,lowj);      next = temp.getDataPoint(lowi,lowj);
1922      int lowProc = 0;      int lowProc = 0;
1923      double *globalMins = new double[get_MPISize()+1];      double *globalMins = new double[get_MPISize()+1];
1924      int error = MPI_Gather ( &next, 1, MPI_DOUBLE, globalMins, 1, MPI_DOUBLE, 0, get_MPIComm() );      int error;
1925        error = MPI_Gather ( &next, 1, MPI_DOUBLE, globalMins, 1, MPI_DOUBLE, 0, get_MPIComm() );
1926    
1927      if( get_MPIRank()==0 ){      if( get_MPIRank()==0 ){
1928          next = globalMins[lowProc];          next = globalMins[lowProc];

Legend:
Removed from v.2080  
changed lines
  Added in v.2081

  ViewVC Help
Powered by ViewVC 1.1.26