/[escript]/branches/doubleplusgood/finley/src/Assemble_PDE_Single2_2D.cpp
ViewVC logotype

Diff of /branches/doubleplusgood/finley/src/Assemble_PDE_Single2_2D.cpp

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

revision 4326 by jfenwick, Wed Feb 27 06:09:33 2013 UTC revision 4327 by jfenwick, Wed Mar 20 05:09:11 2013 UTC
# Line 72  void  Finley_Assemble_PDE_Single2_2D(Fin Line 72  void  Finley_Assemble_PDE_Single2_2D(Fin
72    
73      #pragma omp parallel private(color,EM_S, EM_F, Vol, DSDX, A_p, B_p, C_p, D_p, X_p, Y_p, A_q, B_q, C_q, D_q, X_q, Y_q,row_index,q, s,r,rtmp00, rtmp01, rtmp10, rtmp11, rtmp, rtmp0, rtmp1,add_EM_F, add_EM_S, isub)      #pragma omp parallel private(color,EM_S, EM_F, Vol, DSDX, A_p, B_p, C_p, D_p, X_p, Y_p, A_q, B_q, C_q, D_q, X_q, Y_q,row_index,q, s,r,rtmp00, rtmp01, rtmp10, rtmp11, rtmp, rtmp0, rtmp1,add_EM_F, add_EM_S, isub)
74      {      {
75         EM_S=THREAD_MEMALLOC(len_EM_S,double);         EM_S=new double[len_EM_S];
76         EM_F=THREAD_MEMALLOC(len_EM_F,double);         EM_F=new double[len_EM_F];
77         row_index=THREAD_MEMALLOC(p.row_numShapesTotal,index_t);         row_index=new index_t[p.row_numShapesTotal];
78                                                                                                                                                                                                                                                                                                                                                                                                            
79         if (!Finley_checkPtr(EM_S) && !Finley_checkPtr(EM_F) && !Finley_checkPtr(row_index) ) {         if (!Finley_checkPtr(EM_S) && !Finley_checkPtr(EM_F) && !Finley_checkPtr(row_index) ) {
80    
# Line 289  void  Finley_Assemble_PDE_Single2_2D(Fin Line 289  void  Finley_Assemble_PDE_Single2_2D(Fin
289               } /* end element loop */               } /* end element loop */
290           } /* end color loop */           } /* end color loop */
291                        
292           THREAD_MEMFREE(EM_S);           delete[] EM_S;
293           THREAD_MEMFREE(EM_F);           delete[] EM_F;
294           THREAD_MEMFREE(row_index);           delete[] row_index;
295    
296        } /* end of pointer check */        } /* end of pointer check */
297     } /* end parallel region */     } /* end parallel region */

Legend:
Removed from v.4326  
changed lines
  Added in v.4327

  ViewVC Help
Powered by ViewVC 1.1.26