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

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

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

revision 2548 by jfenwick, Mon Jul 20 06:20:06 2009 UTC revision 2748 by gross, Tue Nov 17 07:32:59 2009 UTC
# Line 32  void Finley_ElementFile_optimizeOrdering Line 32  void Finley_ElementFile_optimizeOrdering
32       index_t *index=NULL;       index_t *index=NULL;
33       if (*in != NULL) {       if (*in != NULL) {
34          if ((*in)->numElements<1) return;          if ((*in)->numElements<1) return;
35          NN=(*in)->ReferenceElement->Type->numNodes;          NN=(*in)->referenceElementSet->numNodes;
36          item_list=TMPMEMALLOC((*in)->numElements,Finley_Util_ValueAndIndex);          item_list=TMPMEMALLOC((*in)->numElements,Finley_Util_ValueAndIndex);
37          index=TMPMEMALLOC((*in)->numElements,index_t);          index=TMPMEMALLOC((*in)->numElements,index_t);
38          if (! (Finley_checkPtr(item_list) || Finley_checkPtr(index)) ) {          if (! (Finley_checkPtr(item_list) || Finley_checkPtr(index)) ) {
39    
40             out=Finley_ElementFile_alloc((*in)->ReferenceElement->Type->TypeId,(*in)->order, (*in)->reduced_order, (*in)->MPIInfo);             out=Finley_ElementFile_alloc((*in)->referenceElementSet, (*in)->MPIInfo);
41             if (Finley_noError()) {             if (Finley_noError()) {
42                 Finley_ElementFile_allocTable(out,(*in)->numElements);                 Finley_ElementFile_allocTable(out,(*in)->numElements);
43                 if (Finley_noError()) {                 if (Finley_noError()) {

Legend:
Removed from v.2548  
changed lines
  Added in v.2748

  ViewVC Help
Powered by ViewVC 1.1.26