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

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

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

revision 1776 by ksteube, Tue Sep 9 06:03:53 2008 UTC revision 1804 by gross, Wed Sep 24 07:52:19 2008 UTC
# Line 28  Line 28 
28  void Finley_ElementFile_markNodes(index_t* mask,index_t offset,dim_t numNodes,Finley_ElementFile* in,bool_t useLinear) {  void Finley_ElementFile_markNodes(index_t* mask,index_t offset,dim_t numNodes,Finley_ElementFile* in,bool_t useLinear) {
29     dim_t i,NN,NN2,e;     dim_t i,NN,NN2,e;
30     index_t *lin_node,*id=NULL;     index_t *lin_node,*id=NULL;
   
31     if (in!=NULL) {     if (in!=NULL) {
32       id=TMPMEMALLOC(in->ReferenceElement->Type->numNodes, index_t);       id=TMPMEMALLOC(in->ReferenceElement->Type->numNodes, index_t);
33       if (! Finley_checkPtr(id) ){       if (! Finley_checkPtr(id) ){
# Line 41  void Finley_ElementFile_markNodes(index_ Line 40  void Finley_ElementFile_markNodes(index_
40             for (i=0;i<in->ReferenceElement->Type->numNodes;i++) id[i]=i;             for (i=0;i<in->ReferenceElement->Type->numNodes;i++) id[i]=i;
41          }          }
42          NN2=in->numNodes;          NN2=in->numNodes;
43    
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++) {

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

  ViewVC Help
Powered by ViewVC 1.1.26