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

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

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

revision 1743 by ksteube, Thu Aug 14 06:38:14 2008 UTC revision 1744 by ksteube, Tue Sep 2 07:39:18 2008 UTC
# Line 179  void Finley_PrintMesh_Info(Finley_Mesh * Line 179  void Finley_PrintMesh_Info(Finley_Mesh *
179    
180    /* write face elements: */    /* write face elements: */
181    if (in->FaceElements!=NULL) {    if (in->FaceElements!=NULL) {
182      fprintf(stdout, "\tFace elements: %s %d (TypeId=%d)\n", in->FaceElements->ReferenceElement->Type->Name,in->FaceElements->numElements,in->FaceElements->ReferenceElement->Type->TypeId);      int mine=0, overlap=0;
183        for (i=0;i<in->FaceElements->numElements;i++) {
184          if (in->FaceElements->Owner[i] == in->MPIInfo->rank) mine++;
185          else overlap++;
186        }
187        fprintf(stdout, "\tFace elements: %s %d (TypeId=%d) owner=%d overlap=%d\n", in->FaceElements->ReferenceElement->Type->Name,in->FaceElements->numElements,in->FaceElements->ReferenceElement->Type->TypeId, mine, overlap);
188      NN=in->FaceElements->numNodes;      NN=in->FaceElements->numNodes;
189      if (full) {      if (full) {
190        fprintf(stdout, "\t     Id   Tag Owner Color:  Nodes\n");        fprintf(stdout, "\t     Id   Tag Owner Color:  Nodes\n");
# Line 195  void Finley_PrintMesh_Info(Finley_Mesh * Line 200  void Finley_PrintMesh_Info(Finley_Mesh *
200    
201    /* write Contact elements : */    /* write Contact elements : */
202    if (in->ContactElements!=NULL) {    if (in->ContactElements!=NULL) {
203      fprintf(stdout, "\tContact elements: %s %d (TypeId=%d)\n",in->ContactElements->ReferenceElement->Type->Name,in->ContactElements->numElements,in->ContactElements->ReferenceElement->Type->TypeId);      int mine=0, overlap=0;
204        for (i=0;i<in->ContactElements->numElements;i++) {
205          if (in->ContactElements->Owner[i] == in->MPIInfo->rank) mine++;
206          else overlap++;
207        }
208        fprintf(stdout, "\tContact elements: %s %d (TypeId=%d) owner=%d overlap=%d\n",in->ContactElements->ReferenceElement->Type->Name,in->ContactElements->numElements,in->ContactElements->ReferenceElement->Type->TypeId, mine, overlap);
209      NN=in->ContactElements->numNodes;      NN=in->ContactElements->numNodes;
210      if (full) {      if (full) {
211        fprintf(stdout, "\t     Id   Tag Owner Color:  Nodes\n");        fprintf(stdout, "\t     Id   Tag Owner Color:  Nodes\n");
# Line 211  void Finley_PrintMesh_Info(Finley_Mesh * Line 221  void Finley_PrintMesh_Info(Finley_Mesh *
221    
222    /* write points: */    /* write points: */
223    if (in->Points!=NULL) {    if (in->Points!=NULL) {
224      fprintf(stdout, "\tPoints: %s %d (TypeId=%d)\n",in->Points->ReferenceElement->Type->Name,in->Points->numElements,in->Points->ReferenceElement->Type->TypeId);      int mine=0, overlap=0;
225        for (i=0;i<in->Points->numElements;i++) {
226          if (in->Points->Owner[i] == in->MPIInfo->rank) mine++;
227          else overlap++;
228        }
229        fprintf(stdout, "\tPoints: %s %d (TypeId=%d) owner=%d overlap=%d\n",in->Points->ReferenceElement->Type->Name,in->Points->numElements,in->Points->ReferenceElement->Type->TypeId, mine, overlap);
230      if (full) {      if (full) {
231        fprintf(stdout, "\t     Id   Tag Owner Color:  Nodes\n");        fprintf(stdout, "\t     Id   Tag Owner Color:  Nodes\n");
232        for (i=0;i<in->Points->numElements;i++) {        for (i=0;i<in->Points->numElements;i++) {
Legend:
Removed from v.1743  
changed lines
  Added in v.1744
  ViewVC Help
Powered by ViewVC 1.1.26