/[escript]/trunk/finley/src/Assemble_CopyNodalData.c
ViewVC logotype

Diff of /trunk/finley/src/Assemble_CopyNodalData.c

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

revision 1762 by phornby, Fri Jul 11 13:12:46 2008 UTC revision 1763 by gross, Mon Sep 8 02:47:55 2008 UTC
# Line 225  void Finley_Assemble_CopyNodalData(Finle Line 225  void Finley_Assemble_CopyNodalData(Finle
225    
226             if  (out_data_type == FINLEY_NODES) {             if  (out_data_type == FINLEY_NODES) {
227               Finley_setError(TYPE_ERROR,"Finley_Assemble_CopyNodalData: cannot copy from reduced degrees of freedom to nodes.");               Finley_setError(TYPE_ERROR,"Finley_Assemble_CopyNodalData: cannot copy from reduced degrees of freedom to nodes.");
   
228             } else if (out_data_type == FINLEY_REDUCED_NODES) {             } else if (out_data_type == FINLEY_REDUCED_NODES) {
229                 coupler=Paso_Coupler_alloc(nodes->reducedDegreesOfFreedomConnector,numComps);                 coupler=Paso_Coupler_alloc(nodes->reducedDegreesOfFreedomConnector,numComps);
230                 if (Paso_noError()) {                 if (Paso_noError()) {
231                        upperBound=Paso_Distribution_getMyNumComponents(nodes->reducedDegreesOfFreedomDistribution);
232                      Paso_Coupler_startCollect(coupler,getSampleDataFast(in,0));                      Paso_Coupler_startCollect(coupler,getSampleDataFast(in,0));
233                      recv_buffer=Paso_Coupler_finishCollect(coupler);                      recv_buffer=Paso_Coupler_finishCollect(coupler);
                     upperBound=Paso_Distribution_getMyNumComponents(nodes->reducedDegreesOfFreedomDistribution);  
234                      #pragma omp parallel for private(n,k,l) schedule(static)                      #pragma omp parallel for private(n,k,l) schedule(static)
235                      for (n=0;n<nodes->reducedNodesMapping->numTargets;n++) {                      for (n=0;n<nodes->reducedNodesMapping->numTargets;n++) {
236                            l=nodes->reducedNodesMapping->map[n];                            l=nodes->reducedNodesMapping->map[n];

Legend:
Removed from v.1762  
changed lines
  Added in v.1763

  ViewVC Help
Powered by ViewVC 1.1.26