/[escript]/branches/arrexp_2137_win_merge/finley/src/Assemble_NodeCoordinates.c
ViewVC logotype

Diff of /branches/arrexp_2137_win_merge/finley/src/Assemble_NodeCoordinates.c

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

revision 2221 by jfenwick, Wed Jan 14 00:23:39 2009 UTC revision 2222 by jfenwick, Tue Jan 20 04:52:39 2009 UTC
# Line 43  void Finley_Assemble_NodeCoordinates(Fin Line 43  void Finley_Assemble_NodeCoordinates(Fin
43         Finley_setError(TYPE_ERROR,error_msg);         Finley_setError(TYPE_ERROR,error_msg);
44    } else {    } else {
45         dim_size=nodes->numDim*sizeof(double);         dim_size=nodes->numDim*sizeof(double);
46           requireWrite(x);
47         #pragma omp parallel for private(n)         #pragma omp parallel for private(n)
48         for (n=0;n<nodes->numNodes;n++)         for (n=0;n<nodes->numNodes;n++)
49            memcpy(getSampleDataFast(x,n),&(nodes->Coordinates[INDEX2(0,n,nodes->numDim)]),dim_size);            memcpy(getSampleDataRWFast(x,n),&(nodes->Coordinates[INDEX2(0,n,nodes->numDim)]),dim_size);
50    }    }
51  }  }

Legend:
Removed from v.2221  
changed lines
  Added in v.2222

  ViewVC Help
Powered by ViewVC 1.1.26