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

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

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

revision 102 by jgs, Wed Dec 15 07:08:39 2004 UTC revision 150 by jgs, Thu Sep 15 03:44:45 2005 UTC
# Line 1  Line 1 
1  /* $Id$ */  /*
2     ******************************************************************************
3     *                                                                            *
4     *       COPYRIGHT  ACcESS 2003,2004,2005 -  All Rights Reserved              *
5     *                                                                            *
6     * This software is the property of ACcESS. No part of this code              *
7     * may be copied in any form or by any means without the expressed written    *
8     * consent of ACcESS.  Copying, use or modification of this software          *
9     * by any unauthorised person is illegal unless that person has a software    *
10     * license agreement with ACcESS.                                             *
11     *                                                                            *
12     ******************************************************************************
13    */
14    
15  /**************************************************************/  /**************************************************************/
16    
17  /*   Finley: Mesh: NodeFile */  /*   Finley: Mesh: NodeFile */
18    
19  /**************************************************************/  /**************************************************************/
20    
 /*   Copyrights by ACcESS Australia 2003 */  
21  /*   Author: gross@access.edu.au */  /*   Author: gross@access.edu.au */
22  /*   Version: $Id$ */  /*   Version: $Id$ */
23    
24  /**************************************************************/  /**************************************************************/
25    
 #include "Finley.h"  
26  #include "NodeFile.h"  #include "NodeFile.h"
27    
28  /**************************************************************/  /**************************************************************/
# Line 20  Line 31 
31  /*  is deallocated. use Finley_Mesh_setLinearMesh to create a new one. */  /*  is deallocated. use Finley_Mesh_setLinearMesh to create a new one. */
32    
33  void Finley_NodeFile_allocTable(Finley_NodeFile* in ,int numNodes) {  void Finley_NodeFile_allocTable(Finley_NodeFile* in ,int numNodes) {
34    maybelong *Id2=NULL, *Tag2=NULL, *degreeOfFreedom2=NULL, *reducedDegreeOfFreedom2=NULL, *toReduced2=NULL;    index_t *Id2=NULL, *Tag2=NULL, *degreeOfFreedom2=NULL, *reducedDegreeOfFreedom2=NULL, *toReduced2=NULL;
35    double *Coordinates2=NULL;    double *Coordinates2=NULL;
36    maybelong n,i;    dim_t n,i;
37        
38    /*  allocate memory: */    /*  allocate memory: */
39        
40    Id2=MEMALLOC(numNodes,maybelong);    Id2=MEMALLOC(numNodes,index_t);
41    Coordinates2=MEMALLOC(numNodes*in->numDim,double);    Coordinates2=MEMALLOC(numNodes*in->numDim,double);
42    Tag2=MEMALLOC(numNodes,maybelong);    Tag2=MEMALLOC(numNodes,index_t);
43    degreeOfFreedom2=MEMALLOC(numNodes,maybelong);    degreeOfFreedom2=MEMALLOC(numNodes,index_t);
44    reducedDegreeOfFreedom2=MEMALLOC(numNodes,maybelong);    reducedDegreeOfFreedom2=MEMALLOC(numNodes,index_t);
45    toReduced2=MEMALLOC(numNodes,maybelong);    toReduced2=MEMALLOC(numNodes,index_t);
46        
47    /*  if fine, deallocate the old table and replace by new: */    /*  if fine, deallocate the old table and replace by new: */
48        
# Line 87  void Finley_NodeFile_deallocTable(Finley Line 98  void Finley_NodeFile_deallocTable(Finley
98  }  }
99  /*  /*
100  * $Log$  * $Log$
101    * Revision 1.6  2005/09/15 03:44:23  jgs
102    * Merge of development branch dev-02 back to main trunk on 2005-09-15
103    *
104    * Revision 1.5.2.1  2005/09/07 06:26:20  gross
105    * the solver from finley are put into the standalone package paso now
106    *
107    * Revision 1.5  2005/07/08 04:07:55  jgs
108    * Merge of development branch back to main trunk on 2005-07-08
109    *
110  * Revision 1.4  2004/12/15 07:08:33  jgs  * Revision 1.4  2004/12/15 07:08:33  jgs
111  * *** empty log message ***  * *** empty log message ***
112    * Revision 1.1.1.1.2.2  2005/06/29 02:34:54  gross
113    * some changes towards 64 integers in finley
114    *
115    * Revision 1.1.1.1.2.1  2004/11/24 01:37:15  gross
116    * some changes dealing with the integer overflow in memory allocation. Finley solves 4M unknowns now
117  *  *
118  *  *
119  *  *

Legend:
Removed from v.102  
changed lines
  Added in v.150

  ViewVC Help
Powered by ViewVC 1.1.26