/[escript]/branches/domexper/dudley/src/ElementFile_markNodes.c
ViewVC logotype

Diff of /branches/domexper/dudley/src/ElementFile_markNodes.c

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

revision 1770 by ksteube, Mon Sep 8 06:58:47 2008 UTC revision 1776 by ksteube, Tue Sep 9 06:03:53 2008 UTC
# Line 44  void Finley_ElementFile_markNodes(index_ Line 44  void Finley_ElementFile_markNodes(index_
44          #pragma omp parallel for private(e,i) schedule(static)          #pragma omp parallel for private(e,i) schedule(static)
45          for (e=0;e<in->numElements;e++) {          for (e=0;e<in->numElements;e++) {
46              for (i=0;i<NN;i++) {              for (i=0;i<NN;i++) {
 #ifdef BOUNDS_CHECK  
 if ((in->Nodes[INDEX2(lin_node[i],e,NN2)]-offset) >= numNodes) { printf("BOUNDS_CHECK %s %d i=%d e=%d NN2=%d offset=%d index=%d\n", __FILE__, __LINE__, i, e, NN2, offset, in->Nodes[INDEX2(lin_node[i],e,NN2)]-offset); exit(1); }  
 #endif  
47                  mask[in->Nodes[INDEX2(lin_node[i],e,NN2)]-offset]=1;                  mask[in->Nodes[INDEX2(lin_node[i],e,NN2)]-offset]=1;
48             }             }
49          }          }

Legend:
Removed from v.1770  
changed lines
  Added in v.1776

  ViewVC Help
Powered by ViewVC 1.1.26