/[escript]/temp/finley/src/Assemble_setNormal.c
ViewVC logotype

Diff of /temp/finley/src/Assemble_setNormal.c

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

revision 1027 by gross, Wed Jul 12 08:54:45 2006 UTC revision 1028 by gross, Wed Mar 14 00:15:24 2007 UTC
# Line 33  Line 33 
33  void Finley_Assemble_setNormal(Finley_NodeFile* nodes, Finley_ElementFile* elements, escriptDataC* normal) {  void Finley_Assemble_setNormal(Finley_NodeFile* nodes, Finley_ElementFile* elements, escriptDataC* normal) {
34    double *local_X=NULL, *dVdv=NULL,*normal_array;    double *local_X=NULL, *dVdv=NULL,*normal_array;
35    index_t sign,node_offset;    index_t sign,node_offset;
36    dim_t e,q;    dim_t e,q, NN, NS, numDim, numQuad, numDim_local;
37    if (nodes==NULL || elements==NULL) return;    if (nodes==NULL || elements==NULL) return;
38    dim_t NN=elements->ReferenceElement->Type->numNodes;    NN=elements->ReferenceElement->Type->numNodes;
39    dim_t NS=elements->ReferenceElement->Type->numShapes;    NS=elements->ReferenceElement->Type->numShapes;
40    dim_t numDim=nodes->numDim;    numDim=nodes->numDim;
41    dim_t numQuad=elements->ReferenceElement->numQuadNodes;    numQuad=elements->ReferenceElement->numQuadNodes;
42    dim_t numDim_local=elements->ReferenceElement->Type->numDim;    numDim_local=elements->ReferenceElement->Type->numDim;
43    Finley_resetError();    Finley_resetError();
44    
45    /* set some parameter */    /* set some parameter */

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

  ViewVC Help
Powered by ViewVC 1.1.26