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

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

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

revision 853 by gross, Wed Sep 20 05:56:36 2006 UTC revision 1028 by gross, Wed Mar 14 00:15:24 2007 UTC
# Line 36  Line 36 
36  void Finley_Assemble_getSize(Finley_NodeFile* nodes, Finley_ElementFile* elements, escriptDataC* element_size) {  void Finley_Assemble_getSize(Finley_NodeFile* nodes, Finley_ElementFile* elements, escriptDataC* element_size) {
37    
38    double *local_X=NULL,*element_size_array;    double *local_X=NULL,*element_size_array;
39    dim_t e,n0,n1,q,i;    dim_t e,n0,n1,q,i, NVertices, NN, NS, numQuad, numDim;
40    index_t node_offset;    index_t node_offset;
41    double d,diff,min_diff;    double d,diff,min_diff;
42    Finley_resetError();    Finley_resetError();
43    
44    if (nodes==NULL || elements==NULL) return;    if (nodes==NULL || elements==NULL) return;
45    dim_t NVertices=elements->ReferenceElement->Type->numVertices;    NVertices=elements->ReferenceElement->Type->numVertices;
46    dim_t NN=elements->ReferenceElement->Type->numNodes;    NN=elements->ReferenceElement->Type->numNodes;
47    dim_t NS=elements->ReferenceElement->Type->numShapes;    NS=elements->ReferenceElement->Type->numShapes;
48    dim_t numQuad=elements->ReferenceElement->numQuadNodes;    numQuad=elements->ReferenceElement->numQuadNodes;
49    dim_t numDim=nodes->numDim;    numDim=nodes->numDim;
50    
51    /* set a few more parameters */    /* set a few more parameters */
52    

Legend:
Removed from v.853  
changed lines
  Added in v.1028

  ViewVC Help
Powered by ViewVC 1.1.26