/[escript]/trunk/finley/src/Assemble.h
ViewVC logotype

Contents of /trunk/finley/src/Assemble.h

Parent Directory Parent Directory | Revision Log Revision Log


Revision 776 - (show annotations)
Wed Jul 12 00:07:31 2006 UTC (13 years, 3 months ago) by gross
File MIME type: text/plain
File size: 6402 byte(s)
basic code for persistence of jacobeans added. routines are not called yet
1 /*
2 ************************************************************
3 * Copyright 2006 by ACcESS MNRF *
4 * *
5 * http://www.access.edu.au *
6 * Primary Business: Queensland, Australia *
7 * Licensed under the Open Software License version 3.0 *
8 * http://www.opensource.org/licenses/osl-3.0.php *
9 * *
10 ************************************************************
11 */
12
13 /**************************************************************/
14
15 /* assemblage routines: header file */
16
17 /**************************************************************/
18
19 /* Copyrights by ACcESS Australia 2003,2004,2005 */
20 /* Author: gross@access.edu.au */
21 /* Version: $Id$ */
22
23 /**************************************************************/
24
25 #ifndef INC_FINLEY_ASSEMBLE
26 #define INC_FINLEY_ASSEMBLE
27
28 /**************************************************************/
29
30 #include "ReferenceElements.h"
31 #include "Finley.h"
32 #include "ElementFile.h"
33 #include "NodeFile.h"
34 #include "escript/DataC.h"
35 #include "paso/SystemMatrix.h"
36
37 struct Assemble_Parameters {
38 dim_t numQuad;
39 dim_t numDim;
40 dim_t numElementDim;
41
42 dim_t NN;
43 dim_t NS;
44 Finley_RefElement* referenceElement;
45
46 dim_t numEqu;
47 index_t* label_row;
48 Finley_RefElement* referenceElement_row;
49 index_t* row_node;
50 dim_t NN_row;
51 dim_t NS_row;
52
53 dim_t numComp;
54 index_t * label_col;
55 Finley_RefElement* referenceElement_col;
56 index_t* col_node;
57 dim_t NN_col;
58 dim_t NS_col;
59
60 /* added by Ben Cumming for MPI version */
61 dim_t degreeOfFreedomUpperBound;
62
63 index_t id[MAX_numNodes]; /* used to hold a reordering vector, referenced by row_node and col_node */
64 };
65
66 typedef struct Assemble_Parameters Assemble_Parameters;
67
68
69 typedef void (Finley_Assemble_handelShapeMissMatch) (dim_t, dim_t,dim_t, double*,dim_t, dim_t);
70
71 void Finley_Assemble_PDE(Finley_NodeFile*,Finley_ElementFile*,Paso_SystemMatrix*,escriptDataC*,
72 escriptDataC*, escriptDataC*, escriptDataC*, escriptDataC*, escriptDataC*, escriptDataC*) ;
73 void Finley_Assemble_PDE_RHS(Finley_NodeFile*,Finley_ElementFile*,escriptDataC*,escriptDataC*,escriptDataC*) ;
74 void Finley_Assemble_RobinCondition(Finley_NodeFile*,Finley_ElementFile*,Paso_SystemMatrix*,escriptDataC*,
75 escriptDataC*,escriptDataC*,Finley_Assemble_handelShapeMissMatch) ;
76 void Finley_Assemble_RobinCondition_RHS(Finley_NodeFile*,Finley_ElementFile*,escriptDataC*,escriptDataC*,Finley_Assemble_handelShapeMissMatch);
77 /* void Finley_Assemble_Points(Finley_Mesh*,Paso_SystemMatrix*,escriptDataC*,escriptDataC*,escriptDataC*) ;*/
78 void Finley_Assemble_NodeCoordinates(Finley_NodeFile*,escriptDataC*);
79 void Finley_Assemble_setNormal(Finley_NodeFile*, Finley_ElementFile*, escriptDataC*);
80 void Finley_Assemble_interpolate(Finley_NodeFile*,Finley_ElementFile*,escriptDataC*, escriptDataC*);
81 void Finley_Assemble_gradient(Finley_NodeFile*, Finley_ElementFile*,escriptDataC*, escriptDataC*);
82 void Finley_Assemble_integrate(Finley_NodeFile*,Finley_ElementFile*,escriptDataC*,double*) ;
83 void Finley_Assemble_getSize(Finley_NodeFile*,Finley_ElementFile*, escriptDataC*);
84 void Finley_Assemble_CopyNodalData(Finley_NodeFile* nodes,escriptDataC* out,escriptDataC* in);
85 void Finley_Assemble_CopyElementData(Finley_ElementFile* elements,escriptDataC* out,escriptDataC* in);
86 void Finley_Assemble_PDEMatrix_System2(dim_t,dim_t,dim_t,dim_t,dim_t,double*,double*, double*,dim_t, double*, double*,dim_t, double*,dim_t,double*,dim_t,double*,dim_t);
87 void Finley_Assemble_PDEMatrix_Single2(dim_t,dim_t,dim_t,double*,double*, double*,dim_t, double*, double*,dim_t, double*,dim_t,double*,dim_t,double*,dim_t);
88 void Finley_Assemble_RHSMatrix_System(dim_t,dim_t,dim_t,dim_t,double*,double*,double*,dim_t, double*,double*,dim_t,double*,dim_t);
89 void Finley_Assemble_RHSMatrix_Single(dim_t,dim_t,dim_t,double*,double*,double*,dim_t, double*,double*,dim_t,double*,dim_t);
90
91
92 void Assemble_getAssembleParameters(Finley_NodeFile*,Finley_ElementFile*,Paso_SystemMatrix*,escriptDataC*,Assemble_Parameters*);
93 Finley_Assemble_handelShapeMissMatch Finley_Assemble_handelShapeMissMatch_Step_out;
94 Finley_Assemble_handelShapeMissMatch Finley_Assemble_handelShapeMissMatch_Step_in;
95 Finley_Assemble_handelShapeMissMatch Finley_Assemble_handelShapeMissMatch_Mean_out;
96 Finley_Assemble_handelShapeMissMatch Finley_Assemble_handelShapeMissMatch_Mean_in;
97 void Finley_Assemble_addToSystemMatrix(Paso_SystemMatrix*,dim_t,index_t*, dim_t,dim_t,index_t*,dim_t, double*);
98
99 void Assemble_jacobeans_1D(double*, dim_t,double*, dim_t, dim_t,index_t* , double*, dim_t,double*, double*, double*, index_t*);
100 void Assemble_jacobeans_2D(double*, dim_t,double*, dim_t, dim_t,index_t* , double*, dim_t,double*, double*, double*, index_t*);
101 void Assemble_jacobeans_2D_M1D(double*, dim_t,double*, dim_t, dim_t,index_t* , double*, dim_t,double*, double*, double*, index_t*);
102 void Assemble_jacobeans_3D(double*, dim_t,double*, dim_t, dim_t,index_t* , double*, dim_t,double*, double*, double*, index_t*);
103 void Assemble_jacobeans_3D_M2D(double*, dim_t,double*, dim_t, dim_t,index_t* , double*, dim_t,double*, double*, double*, index_t*);
104 void Assemble_jacobeans_3D_M1D(double*, dim_t,double*, dim_t, dim_t,index_t* , double*, dim_t,double*, double*, double*, index_t*);
105
106 #endif /* #ifndef INC_FINLEY_ASSEMBLE */
107
108 /*
109 * $Log$
110 * Revision 1.4 2005/09/15 03:44:21 jgs
111 * Merge of development branch dev-02 back to main trunk on 2005-09-15
112 *
113 * Revision 1.3 2005/08/12 01:45:42 jgs
114 * erge of development branch dev-02 back to main trunk on 2005-08-12
115 *
116 * Revision 1.2.2.2 2005/09/07 06:26:17 gross
117 * the solver from finley are put into the standalone package paso now
118 *
119 * Revision 1.2.2.1 2005/08/04 22:41:11 gross
120 * some extra routines for finley that might speed-up RHS assembling in some cases (not actived right now)
121 *
122 * Revision 1.2 2005/07/08 04:07:45 jgs
123 * Merge of development branch back to main trunk on 2005-07-08
124 *
125 * Revision 1.1.1.1.2.1 2005/06/29 02:34:46 gross
126 * some changes towards 64 integers in finley
127 *
128 * Revision 1.1.1.1 2004/10/26 06:53:56 jgs
129 * initial import of project esys2
130 *
131 * Revision 1.1 2004/07/02 04:21:13 gross
132 * Finley C code has been included
133 *
134 *
135 */

Properties

Name Value
svn:eol-style native
svn:keywords Author Date Id Revision

  ViewVC Help
Powered by ViewVC 1.1.26