/[escript]/branches/doubleplusgood/dudley/src/Assemble_integrate.cpp
ViewVC logotype

Diff of /branches/doubleplusgood/dudley/src/Assemble_integrate.cpp

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

revision 4331 by jfenwick, Wed Feb 27 06:09:33 2013 UTC revision 4332 by jfenwick, Thu Mar 21 04:21:14 2013 UTC
# Line 61  void Dudley_Assemble_integrate(Dudley_No Line 61  void Dudley_Assemble_integrate(Dudley_No
61          out[q] = 0;          out[q] = 0;
62  #pragma omp parallel private(q,i,rtmp,data_array,out_local)  #pragma omp parallel private(q,i,rtmp,data_array,out_local)
63          {          {
64          out_local = THREAD_MEMALLOC(numComps, double);          out_local = new double[numComps];
65          if (!Dudley_checkPtr(out_local))          if (!Dudley_checkPtr(out_local))
66          {          {
67              /* initialize local result */              /* initialize local result */
# Line 110  void Dudley_Assemble_integrate(Dudley_No Line 110  void Dudley_Assemble_integrate(Dudley_No
110              for (i = 0; i < numComps; i++)              for (i = 0; i < numComps; i++)
111              out[i] += out_local[i];              out[i] += out_local[i];
112          }          }
113          THREAD_MEMFREE(out_local);          delete[] out_local;
114          }          }
115      }      }
116      }      }

Legend:
Removed from v.4331  
changed lines
  Added in v.4332

  ViewVC Help
Powered by ViewVC 1.1.26