/[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 3220 by jfenwick, Mon Sep 27 04:13:19 2010 UTC revision 3221 by jfenwick, Wed Sep 29 01:00:21 2010 UTC
# Line 25  Line 25 
25  /**************************************************************/  /**************************************************************/
26    
27  void Dudley_ElementFile_markNodes(index_t* mask,index_t offset,dim_t numNodes,Dudley_ElementFile* in,bool_t useLinear) {  void Dudley_ElementFile_markNodes(index_t* mask,index_t offset,dim_t numNodes,Dudley_ElementFile* in,bool_t useLinear) {
28      dim_t i,NN,e;      dim_t i,NN,e;  
 //    Dudley_ReferenceElement* refElement=NULL;  
     
29      if (in!=NULL)      if (in!=NULL)
30      {      {
 //  refElement=Dudley_ReferenceElementSet_borrowReferenceElement(in->referenceElementSet, FALSE);        
31      NN=in->numNodes;      NN=in->numNodes;
32      #pragma omp parallel for private(e,i) schedule(static)      #pragma omp parallel for private(e,i) schedule(static)
33      for (e=0;e<in->numElements;e++)      for (e=0;e<in->numElements;e++)
# Line 47  void Dudley_ElementFile_markDOFsConnecte Line 44  void Dudley_ElementFile_markDOFsConnecte
44  {  {
45      dim_t i,NN,e,j;      dim_t i,NN,e,j;
46      index_t color;      index_t color;
 //    Dudley_ReferenceElement* refElement=NULL;  
47      register index_t k;      register index_t k;
48        
49      if (in!=NULL)      if (in!=NULL)
50      {      {
 //  refElement=Dudley_ReferenceElementSet_borrowReferenceElement(in->referenceElementSet, FALSE);        
51      NN=in->numNodes;      NN=in->numNodes;
52      for (color=in->minColor;color<=in->maxColor;color++)      for (color=in->minColor;color<=in->maxColor;color++)
53      {      {

Legend:
Removed from v.3220  
changed lines
  Added in v.3221

  ViewVC Help
Powered by ViewVC 1.1.26