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

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

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

temp_trunk_copy/finley/src/NodeFile_gather.c revision 1384 by phornby, Fri Jan 11 02:29:38 2008 UTC trunk/finley/src/NodeFile_gather.c revision 1739 by gross, Fri Aug 29 06:19:53 2008 UTC
# Line 13  Line 13 
13   *   *
14   *******************************************************/   *******************************************************/
15    
16  /**************************************************************/  /**************************************************************
17     *
18  /*   Finley: Mesh: NodeFile                                   */   *   Finley: Mesh: NodeFile                                  
19     *   gathers the NodeFile out from the NodeFile in using the entries
20  /*   gathers the NodeFile out from the NodeFile in using the entries   *   in index[0:out->numNodes-1] which are between min_index and max_index (exclusive)
21  /*   in index[0:out->numNodes-1] which are between min_index and max_index (exclusive) */   *   the node index[i]
22  /*   the node index[i]   *
23     **************************************************************/
 /**************************************************************/  
24    
25  #include "NodeFile.h"  #include "NodeFile.h"
26    
# Line 33  void Finley_NodeFile_gatherEntries(dim_t Line 32  void Finley_NodeFile_gatherEntries(dim_t
32                                     index_t* globalDegreesOfFreedom_out, index_t* globalDegreesOfFreedom_in,                                     index_t* globalDegreesOfFreedom_out, index_t* globalDegreesOfFreedom_in,
33                                     dim_t numDim, double* Coordinates_out, double* Coordinates_in)                                     dim_t numDim, double* Coordinates_out, double* Coordinates_in)
34  {  {
35     dim_t i,j;     dim_t i;
36     register index_t k;     register index_t k;
37     register const index_t range=max_index-min_index;     register const index_t range=max_index-min_index;
38     const  size_t numDim_size=(size_t)numDim*sizeof(double);     const  size_t numDim_size=(size_t)numDim*sizeof(double);
39    
40     #pragma omp parallel for private(i,j,k) schedule(static)     #pragma omp parallel for private(i,k) schedule(static)
41     for (i=0;i<n;i++) {     for (i=0;i<n;i++) {
42        k=index[i]-min_index;        k=index[i]-min_index;
43        if ((k>=0) && (k <range)) {        if ((k>=0) && (k <range)) {

Legend:
Removed from v.1384  
changed lines
  Added in v.1739

  ViewVC Help
Powered by ViewVC 1.1.26