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

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

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

revision 1733 by gross, Thu Aug 28 01:46:07 2008 UTC revision 1981 by jfenwick, Thu Nov 6 05:27:33 2008 UTC
# Line 1  Line 1 
1    
 /* $Id$ */  
   
2  /*******************************************************  /*******************************************************
3   *  *
4   *           Copyright 2003-2007 by ACceSS MNRF  * Copyright (c) 2003-2008 by University of Queensland
5   *       Copyright 2007 by University of Queensland  * Earth Systems Science Computational Center (ESSCC)
6   *  * http://www.uq.edu.au/esscc
7   *                http://esscc.uq.edu.au  *
8   *        Primary Business: Queensland, Australia  * Primary Business: Queensland, Australia
9   *  Licensed under the Open Software License version 3.0  * Licensed under the Open Software License version 3.0
10   *     http://www.opensource.org/licenses/osl-3.0.php  * http://www.opensource.org/licenses/osl-3.0.php
11   *  *
12   *******************************************************/  *******************************************************/
13    
14    
15  /**************************************************************/  /**************************************************************/
16    
# Line 43  Finley_Mesh* Finley_RectangularMesh_Hex2 Line 42  Finley_Mesh* Finley_RectangularMesh_Hex2
42    Finley_Mesh* out;    Finley_Mesh* out;
43    Paso_MPIInfo *mpi_info = NULL;    Paso_MPIInfo *mpi_info = NULL;
44    char name[50];    char name[50];
45      #ifdef Finley_TRACE
46    double time0=Finley_timer();    double time0=Finley_timer();
47      #endif
48    
49    /* get MPI information */    /* get MPI information */
50    mpi_info = Paso_MPIInfo_alloc( MPI_COMM_WORLD );    mpi_info = Paso_MPIInfo_alloc( MPI_COMM_WORLD );
# Line 167  Finley_Mesh* Finley_RectangularMesh_Hex2 Line 168  Finley_Mesh* Finley_RectangularMesh_Hex2
168        NDOF2=N2-1;        NDOF2=N2-1;
169    }    }
170    
171    if (!periodic[0] && (local_NE1>0) ) {    if (!periodic[0] && (local_NE0>0) ) {
172       NDOF0=N0;       NDOF0=N0;
173       if (e_offset0 == 0) NFaceElements+=local_NE1*local_NE2;       if (e_offset0 == 0) NFaceElements+=local_NE1*local_NE2;
174       if (local_NE0+e_offset0 == NE0) NFaceElements+=local_NE1*local_NE2;       if (local_NE0+e_offset0 == NE0) NFaceElements+=local_NE1*local_NE2;
# Line 181  Finley_Mesh* Finley_RectangularMesh_Hex2 Line 182  Finley_Mesh* Finley_RectangularMesh_Hex2
182    } else {    } else {
183        NDOF1=N1-1;        NDOF1=N1-1;
184    }    }
 printf("HEX20 %d %d %d\n",local_NE0,local_NE1,local_NE2);  
   
185    /*  allocate tables: */    /*  allocate tables: */
186    
187    Finley_NodeFile_allocTable(out->Nodes,local_N0*local_N1*local_N2);    Finley_NodeFile_allocTable(out->Nodes,local_N0*local_N1*local_N2);

Legend:
Removed from v.1733  
changed lines
  Added in v.1981

  ViewVC Help
Powered by ViewVC 1.1.26