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

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

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

revision 97 by jgs, Tue Dec 14 05:39:33 2004 UTC revision 100 by jgs, Wed Dec 15 03:48:48 2004 UTC
# Line 36  void Finley_Mesh_glueFaces(Finley_Mesh* Line 36  void Finley_Mesh_glueFaces(Finley_Mesh*
36     int NN=self->FaceElements->ReferenceElement->Type->numNodes;     int NN=self->FaceElements->ReferenceElement->Type->numNodes;
37     int numDim=self->Nodes->numDim;     int numDim=self->Nodes->numDim;
38     /* allocate work arrays */     /* allocate work arrays */
39     elem1=TMPMEMALLOC(self->FaceElements->numElements,int);     elem1=(int*) TMPMEMALLOC(sizeof(int)*self->FaceElements->numElements);
40     elem0=TMPMEMALLOC(self->FaceElements->numElements,int);     elem0=(int*) TMPMEMALLOC(sizeof(int)*self->FaceElements->numElements);
41     elem_mask=TMPMEMALLOC(self->FaceElements->numElements,int);     elem_mask=(int*) TMPMEMALLOC(sizeof(int)*self->FaceElements->numElements);
42     matching_nodes_in_elem1=TMPMEMALLOC(self->FaceElements->numElements*NN,int);     matching_nodes_in_elem1=(int*) TMPMEMALLOC(sizeof(int)*sizeof(int)*self->FaceElements->numElements*NN);
43     new_node_label=TMPMEMALLOC(self->Nodes->numNodes,int);     new_node_label=(int*) TMPMEMALLOC(sizeof(int)*self->Nodes->numNodes);
44     new_node_list=TMPMEMALLOC(self->Nodes->numNodes,int);     new_node_list=(int*) TMPMEMALLOC(sizeof(int)*self->Nodes->numNodes);
45     new_node_mask=TMPMEMALLOC(self->Nodes->numNodes,int);     new_node_mask=(int*) TMPMEMALLOC(sizeof(int)*self->Nodes->numNodes);
46     if (!(Finley_checkPtr(elem1) || Finley_checkPtr(elem0) || Finley_checkPtr(elem_mask) || Finley_checkPtr(new_node_label) || Finley_checkPtr(new_node_list) || Finley_checkPtr(new_node_mask) || Finley_checkPtr(matching_nodes_in_elem1)) ) {     if (!(Finley_checkPtr(elem1) || Finley_checkPtr(elem0) || Finley_checkPtr(elem_mask) || Finley_checkPtr(new_node_label) || Finley_checkPtr(new_node_list) || Finley_checkPtr(new_node_mask) || Finley_checkPtr(matching_nodes_in_elem1)) ) {
47        /* find the matching face elements */        /* find the matching face elements */
48        Finley_Mesh_findMatchingFaces(self->Nodes,self->FaceElements,safety_factor,tolerance,&numPairs,elem0,elem1,matching_nodes_in_elem1);        Finley_Mesh_findMatchingFaces(self->Nodes,self->FaceElements,safety_factor,tolerance,&numPairs,elem0,elem1,matching_nodes_in_elem1);
# Line 120  void Finley_Mesh_glueFaces(Finley_Mesh* Line 120  void Finley_Mesh_glueFaces(Finley_Mesh*
120    
121  /*  /*
122  * $Log$  * $Log$
123  * Revision 1.2  2004/12/14 05:39:30  jgs  * Revision 1.3  2004/12/15 03:48:45  jgs
124  * *** empty log message ***  * *** empty log message ***
125  *  *
 * Revision 1.1.1.1.2.1  2004/11/24 01:37:14  gross  
 * some changes dealing with the integer overflow in memory allocation. Finley solves 4M unknowns now  
 *  
126  * Revision 1.1.1.1  2004/10/26 06:53:57  jgs  * Revision 1.1.1.1  2004/10/26 06:53:57  jgs
127  * initial import of project esys2  * initial import of project esys2
128  *  *

Legend:
Removed from v.97  
changed lines
  Added in v.100

  ViewVC Help
Powered by ViewVC 1.1.26