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

Annotation of /temp_trunk_copy/finley/src/Assemble.h

Parent Directory Parent Directory | Revision Log Revision Log


Revision 1116 - (hide annotations)
Mon Apr 23 03:36:34 2007 UTC (12 years, 7 months ago) by gross
Original Path: trunk/finley/src/Assemble.h
File MIME type: text/plain
File size: 7720 byte(s)
Interporpolation from full to reduced integration order added.


1 jgs 150 /*
2 elspeth 626 ************************************************************
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 jgs 150 */
12 jgs 82
13     /**************************************************************/
14    
15     /* assemblage routines: header file */
16    
17     /**************************************************************/
18    
19 jgs 150 /* Copyrights by ACcESS Australia 2003,2004,2005 */
20     /* Author: gross@access.edu.au */
21     /* Version: $Id$ */
22 jgs 82
23     /**************************************************************/
24 jgs 150
25     #ifndef INC_FINLEY_ASSEMBLE
26     #define INC_FINLEY_ASSEMBLE
27    
28     /**************************************************************/
29    
30 jgs 82 #include "ReferenceElements.h"
31 jgs 150 #include "Finley.h"
32 jgs 82 #include "ElementFile.h"
33     #include "NodeFile.h"
34 robwdcock 682 #include "escript/DataC.h"
35     #include "paso/SystemMatrix.h"
36 jgs 82
37     struct Assemble_Parameters {
38 jgs 123 dim_t numQuad;
39     dim_t numDim;
40     dim_t NN;
41 jgs 82
42 jgs 123 dim_t numEqu;
43 gross 798 index_t* row_DOF;
44     dim_t row_DOF_UpperBound;
45     Finley_ElementFile_Jacobeans* row_jac;
46 jgs 123 index_t* row_node;
47 gross 798 dim_t row_NN;
48     dim_t row_NS;
49 jgs 82
50 jgs 123 dim_t numComp;
51 gross 798 index_t * col_DOF;
52     dim_t col_DOF_UpperBound;
53     Finley_ElementFile_Jacobeans* col_jac;
54 jgs 123 index_t* col_node;
55 gross 798 dim_t col_NN;
56     dim_t col_NS;
57 jgs 82
58 bcumming 751 /* added by Ben Cumming for MPI version */
59    
60 jgs 123 index_t id[MAX_numNodes]; /* used to hold a reordering vector, referenced by row_node and col_node */
61 jgs 82 };
62    
63     typedef struct Assemble_Parameters Assemble_Parameters;
64    
65    
66 gross 1062 #define Finley_Assemble_reducedIntegrationOrder(__in__) ( (getFunctionSpaceType(__in__) == FINLEY_REDUCED_ELEMENTS) || (getFunctionSpaceType(__in__) == FINLEY_REDUCED_FACE_ELEMENTS) || (getFunctionSpaceType(__in__) == FINLEY_REDUCED_CONTACT_ELEMENTS_1) || (getFunctionSpaceType(__in__) == FINLEY_REDUCED_CONTACT_ELEMENTS_2) )
67    
68 jgs 150 void Finley_Assemble_PDE(Finley_NodeFile*,Finley_ElementFile*,Paso_SystemMatrix*,escriptDataC*,
69 jgs 82 escriptDataC*, escriptDataC*, escriptDataC*, escriptDataC*, escriptDataC*, escriptDataC*) ;
70 gross 798 void Assemble_getAssembleParameters(Finley_NodeFile*,Finley_ElementFile*,Paso_SystemMatrix*,escriptDataC*,bool_t, Assemble_Parameters*);
71     void Finley_Assemble_PDE_System2_3D(Assemble_Parameters, Finley_ElementFile*,Paso_SystemMatrix*,escriptDataC*,
72     escriptDataC*, escriptDataC*, escriptDataC*, escriptDataC*, escriptDataC*, escriptDataC*);
73     void Finley_Assemble_PDE_System2_2D(Assemble_Parameters, Finley_ElementFile*,Paso_SystemMatrix*,escriptDataC*,
74     escriptDataC*, escriptDataC*, escriptDataC*, escriptDataC*, escriptDataC*, escriptDataC*);
75     void Finley_Assemble_PDE_System2_1D(Assemble_Parameters, Finley_ElementFile*,Paso_SystemMatrix*,escriptDataC*,
76     escriptDataC*, escriptDataC*, escriptDataC*, escriptDataC*, escriptDataC*, escriptDataC*);
77     void Finley_Assemble_PDE_System2_C(Assemble_Parameters p, Finley_ElementFile*, Paso_SystemMatrix*, escriptDataC*, escriptDataC*, escriptDataC*);
78     void Finley_Assemble_PDE_Single2_3D(Assemble_Parameters, Finley_ElementFile*,Paso_SystemMatrix*,escriptDataC*,
79     escriptDataC*, escriptDataC*, escriptDataC*, escriptDataC*, escriptDataC*, escriptDataC*);
80     void Finley_Assemble_PDE_Single2_2D(Assemble_Parameters, Finley_ElementFile*,Paso_SystemMatrix*,escriptDataC*,
81     escriptDataC*, escriptDataC*, escriptDataC*, escriptDataC*, escriptDataC*, escriptDataC*);
82     void Finley_Assemble_PDE_Single2_1D(Assemble_Parameters, Finley_ElementFile*,Paso_SystemMatrix*,escriptDataC*,
83     escriptDataC*, escriptDataC*, escriptDataC*, escriptDataC*, escriptDataC*, escriptDataC*);
84     void Finley_Assemble_PDE_Single2_C(Assemble_Parameters p, Finley_ElementFile*, Paso_SystemMatrix*, escriptDataC*, escriptDataC*, escriptDataC*);
85    
86    
87 jgs 82 void Finley_Assemble_NodeCoordinates(Finley_NodeFile*,escriptDataC*);
88     void Finley_Assemble_setNormal(Finley_NodeFile*, Finley_ElementFile*, escriptDataC*);
89     void Finley_Assemble_interpolate(Finley_NodeFile*,Finley_ElementFile*,escriptDataC*, escriptDataC*);
90     void Finley_Assemble_gradient(Finley_NodeFile*, Finley_ElementFile*,escriptDataC*, escriptDataC*);
91     void Finley_Assemble_integrate(Finley_NodeFile*,Finley_ElementFile*,escriptDataC*,double*) ;
92     void Finley_Assemble_getSize(Finley_NodeFile*,Finley_ElementFile*, escriptDataC*);
93     void Finley_Assemble_CopyNodalData(Finley_NodeFile* nodes,escriptDataC* out,escriptDataC* in);
94     void Finley_Assemble_CopyElementData(Finley_ElementFile* elements,escriptDataC* out,escriptDataC* in);
95 gross 1116 void Finley_Assemble_AverageElementData(Finley_ElementFile* elements,escriptDataC* out,escriptDataC* in);
96 jgs 150 void Finley_Assemble_addToSystemMatrix(Paso_SystemMatrix*,dim_t,index_t*, dim_t,dim_t,index_t*,dim_t, double*);
97 gross 781 void Assemble_jacobeans_1D(double*, dim_t,double*, dim_t, dim_t, dim_t, index_t* , double*, dim_t, double*, double*, double*, index_t*);
98     void Assemble_jacobeans_2D(double*, dim_t,double*, dim_t, dim_t, dim_t, index_t* , double*, dim_t, double*, double*, double*, index_t*);
99     void Assemble_jacobeans_2D_M1D_E2D(double*, dim_t,double*, dim_t, dim_t, dim_t, index_t* , double*, dim_t, double*, double*, double*, index_t*);
100     void Assemble_jacobeans_2D_M1D_E2D_C(double*, dim_t,double*, dim_t, dim_t, dim_t, index_t* , double*, dim_t, double*, double*, double*, index_t*);
101     void Assemble_jacobeans_2D_M1D_E1D(double*, dim_t,double*, dim_t, dim_t, dim_t, index_t* , double*, dim_t, double*, double*, double*, index_t*);
102     void Assemble_jacobeans_2D_M1D_E1D_C(double*, dim_t,double*, dim_t, dim_t, dim_t, index_t* , double*, dim_t, double*, double*, double*, index_t*);
103     void Assemble_jacobeans_3D(double*, dim_t,double*, dim_t, dim_t, dim_t, index_t* , double*, dim_t, double*, double*, double*, index_t*);
104     void Assemble_jacobeans_3D_M2D_E3D(double*, dim_t,double*, dim_t, dim_t, dim_t, index_t* , double*, dim_t, double*, double*, double*, index_t*);
105     void Assemble_jacobeans_3D_M2D_E3D_C(double*, dim_t,double*, dim_t, dim_t, dim_t, index_t* , double*, dim_t, double*, double*, double*, index_t*);
106     void Assemble_jacobeans_3D_M2D_E2D(double*, dim_t,double*, dim_t, dim_t, dim_t, index_t* , double*, dim_t, double*, double*, double*, index_t*);
107     void Assemble_jacobeans_3D_M2D_E2D_C(double*, dim_t,double*, dim_t, dim_t, dim_t, index_t* , double*, dim_t, double*, double*, double*, index_t*);
108 gross 776
109 jgs 82 #endif /* #ifndef INC_FINLEY_ASSEMBLE */
110    
111     /*
112     * $Log$
113 jgs 150 * Revision 1.4 2005/09/15 03:44:21 jgs
114     * Merge of development branch dev-02 back to main trunk on 2005-09-15
115     *
116 jgs 147 * Revision 1.3 2005/08/12 01:45:42 jgs
117     * erge of development branch dev-02 back to main trunk on 2005-08-12
118     *
119 jgs 150 * Revision 1.2.2.2 2005/09/07 06:26:17 gross
120     * the solver from finley are put into the standalone package paso now
121     *
122 jgs 147 * Revision 1.2.2.1 2005/08/04 22:41:11 gross
123     * some extra routines for finley that might speed-up RHS assembling in some cases (not actived right now)
124     *
125 jgs 123 * Revision 1.2 2005/07/08 04:07:45 jgs
126     * Merge of development branch back to main trunk on 2005-07-08
127 jgs 82 *
128 jgs 123 * Revision 1.1.1.1.2.1 2005/06/29 02:34:46 gross
129     * some changes towards 64 integers in finley
130     *
131     * Revision 1.1.1.1 2004/10/26 06:53:56 jgs
132     * initial import of project esys2
133     *
134 jgs 82 * Revision 1.1 2004/07/02 04:21:13 gross
135     * Finley C code has been included
136     *
137     *
138     */

Properties

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

  ViewVC Help
Powered by ViewVC 1.1.26