1 |
jgs |
150 |
/* |
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 |
jgs |
82 |
/**************************************************************/ |
16 |
|
|
/* */ |
17 |
|
|
/* Finley: Mesh : NodeFile */ |
18 |
|
|
/* */ |
19 |
|
|
/* allocates and deallocates node files */ |
20 |
|
|
/* */ |
21 |
|
|
/**************************************************************/ |
22 |
|
|
|
23 |
|
|
/* Author: gross@access.edu.au */ |
24 |
|
|
/* Version: $Id$ */ |
25 |
|
|
|
26 |
|
|
/**************************************************************/ |
27 |
|
|
|
28 |
|
|
#include "NodeFile.h" |
29 |
|
|
|
30 |
|
|
/**************************************************************/ |
31 |
|
|
|
32 |
|
|
/* allocates a node file to hold nodes */ |
33 |
|
|
/* use Finley_NodeFile_allocTable to allocate the node table (Id,Coordinatess). */ |
34 |
|
|
|
35 |
|
|
Finley_NodeFile* Finley_NodeFile_alloc(int numDim){ |
36 |
|
|
Finley_NodeFile *out; |
37 |
|
|
|
38 |
|
|
/* allocate the return value */ |
39 |
|
|
|
40 |
jgs |
102 |
out=MEMALLOC(1,Finley_NodeFile); |
41 |
jgs |
82 |
if (Finley_checkPtr(out)) return NULL; |
42 |
|
|
out->numNodes=0; |
43 |
|
|
out->numDegreesOfFreedom=0; |
44 |
|
|
out->reducedNumDegreesOfFreedom=0; |
45 |
|
|
out->reducedNumNodes=0; |
46 |
|
|
out->numDim=numDim; |
47 |
|
|
out->Id=NULL; |
48 |
|
|
out->Tag=NULL; |
49 |
|
|
out->Coordinates=NULL; |
50 |
|
|
out->degreeOfFreedom=NULL; |
51 |
|
|
out->reducedDegreeOfFreedom=NULL; |
52 |
|
|
out->toReduced=NULL; |
53 |
|
|
return out; |
54 |
|
|
} |
55 |
|
|
|
56 |
|
|
/* deallocates a node file: */ |
57 |
|
|
|
58 |
|
|
void Finley_NodeFile_dealloc(Finley_NodeFile* in) { |
59 |
|
|
if (in!=NULL) { |
60 |
|
|
#ifdef Finley_TRACE |
61 |
|
|
printf("node file is deallocated.\n"); |
62 |
|
|
#endif |
63 |
|
|
Finley_NodeFile_deallocTable(in); |
64 |
|
|
MEMFREE(in); |
65 |
|
|
} |
66 |
|
|
} |
67 |
|
|
/* |
68 |
|
|
* $Log$ |
69 |
jgs |
150 |
* Revision 1.5 2005/09/15 03:44:23 jgs |
70 |
|
|
* Merge of development branch dev-02 back to main trunk on 2005-09-15 |
71 |
|
|
* |
72 |
|
|
* Revision 1.4.2.1 2005/09/07 06:26:20 gross |
73 |
|
|
* the solver from finley are put into the standalone package paso now |
74 |
|
|
* |
75 |
jgs |
102 |
* Revision 1.4 2004/12/15 07:08:33 jgs |
76 |
jgs |
97 |
* *** empty log message *** |
77 |
jgs |
82 |
* |
78 |
jgs |
97 |
* |
79 |
jgs |
82 |
* |
80 |
|
|
*/ |