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

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

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

revision 781 by bcumming, Mon Jun 26 01:46:34 2006 UTC revision 782 by bcumming, Tue Jul 18 00:47:47 2006 UTC
# Line 79  void Finley_Mesh_markOrderedNodesLocatio Line 79  void Finley_Mesh_markOrderedNodesLocatio
79    
80  void Finley_Mesh_markOrderedDegreesOfFreedomLocation(index_t* mask,index_t offset,Finley_Mesh* in,bool_t useLinear)  void Finley_Mesh_markOrderedDegreesOfFreedomLocation(index_t* mask,index_t offset,Finley_Mesh* in,bool_t useLinear)
81  {  {
82    index_t *internalMask=NULL, *boundaryMask=NULL, i;    index_t *internalMask=NULL, *boundaryMask=NULL, i,startElement;
83    
84    if( offset )    if( offset )
85    {    {
# Line 92  void Finley_Mesh_markOrderedDegreesOfFre Line 92  void Finley_Mesh_markOrderedDegreesOfFre
92    for( i=0; i<in->Nodes->numDegreesOfFreedom; i++ )    for( i=0; i<in->Nodes->numDegreesOfFreedom; i++ )
93      internalMask[i] = boundaryMask[i] = 0;      internalMask[i] = boundaryMask[i] = 0;
94    
95    Finley_ElementFile_markInternalElementDOF(internalMask,offset,in->Nodes->degreeOfFreedom,in->Elements,useLinear);      startElement = 0;
96    Finley_ElementFile_markInternalElementDOF(internalMask,offset,in->Nodes->degreeOfFreedom,in->FaceElements,useLinear);    Finley_ElementFile_markInternalElementDOF(internalMask,offset,in->Nodes->degreeOfFreedom,in->Elements,useLinear,startElement);
97    Finley_ElementFile_markInternalElementDOF(internalMask,offset,in->Nodes->degreeOfFreedom,in->ContactElements,useLinear);      startElement += in->Elements->numElements;
98    Finley_ElementFile_markInternalElementDOF(internalMask,offset,in->Nodes->degreeOfFreedom,in->Points,useLinear);    Finley_ElementFile_markInternalElementDOF(internalMask,offset,in->Nodes->degreeOfFreedom,in->FaceElements,useLinear,startElement);
99        startElement += in->FaceElements->numElements;
100    Finley_ElementFile_markBoundaryElementDOF(boundaryMask,offset,in->Nodes->degreeOfFreedom,in->Elements,useLinear);    Finley_ElementFile_markInternalElementDOF(internalMask,offset,in->Nodes->degreeOfFreedom,in->ContactElements,useLinear,startElement);
101    Finley_ElementFile_markBoundaryElementDOF(boundaryMask,offset,in->Nodes->degreeOfFreedom,in->FaceElements,useLinear);      startElement += in->ContactElements->numElements;
102    Finley_ElementFile_markBoundaryElementDOF(boundaryMask,offset,in->Nodes->degreeOfFreedom,in->ContactElements,useLinear);    Finley_ElementFile_markInternalElementDOF(internalMask,offset,in->Nodes->degreeOfFreedom,in->Points,useLinear,startElement);
103    Finley_ElementFile_markBoundaryElementDOF(boundaryMask,offset,in->Nodes->degreeOfFreedom,in->Points,useLinear);  
104        startElement = 0;
105      Finley_ElementFile_markBoundaryElementDOF(boundaryMask,offset,in->Nodes->degreeOfFreedom,in->Elements,useLinear,startElement);
106        startElement += in->Elements->numElements;
107      Finley_ElementFile_markBoundaryElementDOF(boundaryMask,offset,in->Nodes->degreeOfFreedom,in->FaceElements,useLinear,startElement);
108        startElement += in->FaceElements->numElements;
109      Finley_ElementFile_markBoundaryElementDOF(boundaryMask,offset,in->Nodes->degreeOfFreedom,in->ContactElements,useLinear,startElement);
110        startElement += in->ContactElements->numElements;
111      Finley_ElementFile_markBoundaryElementDOF(boundaryMask,offset,in->Nodes->degreeOfFreedom,in->Points,useLinear,startElement);
112    
113    for( i=0; i<in->Nodes->numDegreesOfFreedom; i++ )    for( i=0; i<in->Nodes->numDegreesOfFreedom; i++ )
114      if( internalMask[i] && boundaryMask[i] )      if( internalMask[i] && boundaryMask[i] )

Legend:
Removed from v.781  
changed lines
  Added in v.782

  ViewVC Help
Powered by ViewVC 1.1.26