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

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

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

revision 82 by jgs, Tue Oct 26 06:53:54 2004 UTC revision 123 by jgs, Fri Jul 8 04:08:13 2005 UTC
# Line 20  Line 20 
20    
21  /**************************************************************/  /**************************************************************/
22    
23  Finley_Mesh* Finley_RectangularMesh_Line3(int* numElements,double* Length,int* periodic,int order,int useElementsOnFace) {  Finley_Mesh* Finley_RectangularMesh_Line3(dim_t* numElements,double* Length,bool_t* periodic,index_t order,bool_t useElementsOnFace) {
24    int N0,NE0,i0,k,node0,NDOF0,NFaceElements,NUMNODES;    dim_t N0,NE0,i0,NDOF0,NFaceElements,NUMNODES;
25      index_t k,node0;
26    Finley_Mesh* out;    Finley_Mesh* out;
27    char name[50];    char name[50];
28    double time0=Finley_timer();    double time0=Finley_timer();
# Line 95  Finley_Mesh* Finley_RectangularMesh_Line Line 96  Finley_Mesh* Finley_RectangularMesh_Line
96      out->Elements->Nodes[INDEX2(1,k,3)]=node0+2;      out->Elements->Nodes[INDEX2(1,k,3)]=node0+2;
97      out->Elements->Nodes[INDEX2(2,k,3)]=node0+1;      out->Elements->Nodes[INDEX2(2,k,3)]=node0+1;
98    }    }
99    out->Elements->numColors=COLOR_MOD(0)+1;    out->Elements->minColor=0;
100      out->Elements->maxColor=COLOR_MOD(0);
101        
102    /*   face elements: */    /*   face elements: */
103    if (useElementsOnFace) {    if (useElementsOnFace) {
# Line 127  Finley_Mesh* Finley_RectangularMesh_Line Line 129  Finley_Mesh* Finley_RectangularMesh_Line
129          out->FaceElements->Nodes[INDEX2(0,1,NUMNODES)]=N0-1;          out->FaceElements->Nodes[INDEX2(0,1,NUMNODES)]=N0-1;
130       }       }
131    }    }
132    out->FaceElements->numColors=2;    out->FaceElements->minColor=0;
133      out->FaceElements->maxColor=1;
134    
135    /*  face elements done: */    /*  face elements done: */
136        
# Line 150  Finley_Mesh* Finley_RectangularMesh_Line Line 153  Finley_Mesh* Finley_RectangularMesh_Line
153    
154  /*  /*
155  * $Log$  * $Log$
156  * Revision 1.1  2004/10/26 06:53:57  jgs  * Revision 1.2  2005/07/08 04:07:53  jgs
157  * Initial revision  * Merge of development branch back to main trunk on 2005-07-08
158    *
159    * Revision 1.1.1.1.2.1  2005/06/29 02:34:52  gross
160    * some changes towards 64 integers in finley
161    *
162    * Revision 1.1.1.1  2004/10/26 06:53:57  jgs
163    * initial import of project esys2
164  *  *
165  * Revision 1.1.1.1  2004/06/24 04:00:40  johng  * Revision 1.1.1.1  2004/06/24 04:00:40  johng
166  * Initial version of eys using boost-python.  * Initial version of eys using boost-python.

Legend:
Removed from v.82  
changed lines
  Added in v.123

  ViewVC Help
Powered by ViewVC 1.1.26