source: issm/trunk/src/c/objects/Penta.h@ 3621

Last change on this file since 3621 was 3621, checked in by Eric.Larour, 15 years ago

Almost there
File size: 7.4 KB
Line 
1/*! \file Penta.h
2 * \brief: header file for penta object
3 */
4
5#ifndef _PENTA_H
6#define _PENTA_H
7
8class Object;
9class Node;
10class Hook;
11class DataSet;
12struct IoModel;
13
14
15#include "./Object.h"
16#include "./Element.h"
17#include "./Matpar.h"
18#include "./Matice.h"
19#include "./Tria.h"
20#include "./Hook.h"
21#include "../ModelProcessorx/IoModel.h"
22#include "./Node.h"
23#include "../DataSet/DataSet.h"
24#include "../DataSet/Parameters.h"
25#include "../DataSet/Inputs.h"
26
27class Penta: public Element{
28
29 private:
30
31 int id;
32 Hook hnodes; //hook to 6 nodes
33 Hook hmatice; //hook to 1 matice
34 Hook hmatpar; //hook to 1 matpar
35
36 Parameters* parameters; //pointer to solution parameters
37 Inputs* inputs;
38
39 public:
40
41 /*FUNCTION constructors, destructors {{{1*/
42 Penta();
43 Penta(int penta_id,int* penta_node_ids, int penta_matice_id, int penta_matpar_id);
44 Penta(int penta_id,Hook* penta_hnodes, Hook* penta_hmatice, Hook* penta_hmatpar, Parameters* penta_parameters, Inputs* inputs);
45 Penta(int i, IoModel* iomodel);
46 ~Penta();
47 /*}}}*/
48 /*FUNCTION object management {{{1*/
49 void Configure(DataSet* loads,DataSet* nodes,DataSet* materials,Parameters* parameters);
50 Object* copy();
51 void DeepEcho();
52 void Demarshall(char** pmarshalled_dataset);
53 void Echo();
54 int Enum();
55 int GetId();
56 char* GetName();
57 void Marshall(char** pmarshalled_dataset);
58 int MarshallSize();
59 int MyRank();
60 void* SpawnTria(int g0, int g1, int g2);
61 void SetClone(int* minranks);
62
63 /*}}}*/
64 /*FUNCTION element numerical routines {{{1*/
65 void CreateKMatrix(Mat Kgg,int analysis_type,int sub_analysis_type);
66 void CreateKMatrixDiagnosticHoriz( Mat Kgg, int analysis_type,int sub_analysis_type);
67 void CreateKMatrixDiagnosticVert( Mat Kgg, int analysis_type,int sub_analysis_type);
68 void CreatePVector(Vec pg, int analysis_type,int sub_analysis_type);
69 void GetDofList(int* doflist,int* pnumberofdofs);
70 void GetDofList1(int* doflist);
71 void* GetMatPar();
72 bool GetShelf();
73 void GetNodes(void** nodes);
74 bool GetOnBed();
75 void Du(Vec du_g,int analysis_type,int sub_analysis_type);
76 void Gradj(Vec grad_g,int analysis_type,int sub_analysis_type,char* control_type);
77 void GradjDrag(Vec grad_g,int analysis_type,int sub_analysis_type);
78 void GradjB(Vec grad_g,int analysis_type,int sub_analysis_type);
79 double Misfit(int analysis_type,int sub_analysis_type);
80 double SurfaceArea(int analysis_type,int sub_analysis_type);
81 double CostFunction(int analysis_type,int sub_analysis_type);
82
83 void GetThicknessList(double* thickness_list);
84 void GetBedList(double* bed_list);
85
86 void GetStrainRate(double* epsilon, double* velocity, double* xyz_list, double* gauss_coord);
87 void GetB(double* pB, double* xyz_list, double* gauss_coord);
88 void GetBPrime(double* B, double* xyz_list, double* gauss_coord);
89 void GetB_vert(double* B, double* xyz_list, double* gauss_coord);
90 void GetBPrime_vert(double* B, double* xyz_list, double* gauss_coord);
91 void GetJacobianDeterminant(double* Jdet, double* xyz_list,double* gauss_coord);
92 void GetNodalFunctionsDerivatives(double* dh1dh6,double* xyz_list, double* gauss_coord);
93 void GetJacobian(double* J, double* xyz_list,double* gauss_coord);
94 void GetNodalFunctionsDerivativesReference(double* dl1dl6,double* gauss_coord);
95 void GetJacobianInvert(double* Jinv, double* xyz_list,double* gauss_coord);
96 void CreatePVectorDiagnosticHoriz( Vec pg, int analysis_type,int sub_analysis_type);
97 void CreatePVectorDiagnosticVert( Vec pg, int analysis_type,int sub_analysis_type);
98 void GetParameterValue(double* pvalue, double* v_list,double* gauss_coord);
99 void GetParameterDerivativeValue(double* p, double* p_list,double* xyz_list, double* gauss_coord);
100 void GetNodalFunctions(double* l1l6, double* gauss_coord);
101 void FieldExtrude(Vec field,double* field_serial,char* field_name, int iscollapsed);
102 void ComputeBasalStress(Vec sigma_b,int analysis_type,int sub_analysis_type);
103 void ComputePressure(Vec p_g,int analysis_type,int sub_analysis_type);
104 void ComputeStrainRate(Vec eps,int analysis_type,int sub_analysis_type);
105 void CreateKMatrixSlopeCompute(Mat Kgg,int analysis_type,int sub_analysis_type);
106 void CreatePVectorSlopeCompute( Vec pg, int analysis_type,int sub_analysis_type);
107 void CreateKMatrixPrognostic(Mat Kgg,int analysis_type,int sub_analysis_type);
108 void CreatePVectorPrognostic( Vec pg, int analysis_type,int sub_analysis_type);
109 void CreateKMatrixBalancedthickness(Mat Kgg,int analysis_type,int sub_analysis_type);
110 void CreateKMatrixBalancedvelocities(Mat Kgg,int analysis_type,int sub_analysis_type);
111 void CreateKMatrixDiagnosticStokes( Mat Kgg, int analysis_type,int sub_analysis_type);
112 void CreatePVectorBalancedthickness( Vec pg, int analysis_type,int sub_analysis_type);
113 void CreatePVectorBalancedvelocities( Vec pg, int analysis_type,int sub_analysis_type);
114 void CreatePVectorDiagnosticStokes( Vec pg, int analysis_type,int sub_analysis_type);
115 void ReduceMatrixStokes(double* Ke_reduced, double* Ke_temp);
116 void GetMatrixInvert(double* Ke_invert, double* Ke);
117 void SurfaceNormal(double* surface_normal, double xyz_list[3][3]);
118 void GetStrainRateStokes(double* epsilon, double* velocity, double* xyz_list, double* gauss_coord);
119 void GetBStokes(double* B, double* xyz_list, double* gauss_coord);
120 void GetBprimeStokes(double* B_prime, double* xyz_list, double* gauss_coord);
121 void GetLStokes(double* LStokes, double* gauss_coord_tria);
122 void GetLprimeStokes(double* LprimeStokes, double* xyz_list, double* gauss_coord_tria, double* gauss_coord);
123 void GetNodalFunctionsDerivativesStokes(double* dh1dh7,double* xyz_list, double* gauss_coord);
124 void GetNodalFunctionsDerivativesReferenceStokes(double* dl1dl7,double* gauss_coord);
125 void ReduceVectorStokes(double* Pe_reduced, double* Ke_temp, double* Pe_temp);
126 void GetNodalFunctionsStokes(double* l1l7, double* gauss_coord);
127 void CreateKMatrixThermal(Mat Kgg,int analysis_type,int sub_analysis_type);
128 void GetB_conduct(double* B_conduct, double* xyz_list, double* gauss_coord);
129 void GetB_advec(double* B_advec, double* xyz_list, double* gauss_coord);
130 void GetBprime_advec(double* Bprime_advec, double* xyz_list, double* gauss_coord);
131 void GetB_artdiff(double* B_artdiff, double* xyz_list, double* gauss_coord);
132 void CreateKMatrixMelting(Mat Kgg,int analysis_type,int sub_analysis_type);
133 void CreatePVectorThermal( Vec pg, int analysis_type,int sub_analysis_type);
134 void CreatePVectorMelting( Vec pg, int analysis_type,int sub_analysis_type);
135 void GetPhi(double* phi, double* epsilon, double viscosity);
136 double MassFlux(double* segment,double* ug);
137
138 /*updates: */
139 void UpdateFromDakota(void* inputs);
140 void UpdateInputs(double* solution, int analysis_type, int sub_analysis_type);
141 void UpdateInputsDiagnosticHoriz( double* solution,int analysis_type,int sub_analysis_type);
142 void UpdateInputsSlopeCompute( double* solution,int analysis_type,int sub_analysis_type);
143 void UpdateInputsPrognostic( double* solution,int analysis_type,int sub_analysis_type);
144 void UpdateInputsPrognostic2(double* solution,int analysis_type,int sub_analysis_type);
145 void UpdateInputsBalancedthickness( double* solution,int analysis_type,int sub_analysis_type);
146 void UpdateInputsBalancedthickness2( double* solution,int analysis_type,int sub_analysis_type);
147 void UpdateInputsBalancedvelocities( double* solution,int analysis_type,int sub_analysis_type);
148
149 /*}}}*/
150
151
152};
153#endif /* _PENTA_H */
Note: See TracBrowser for help on using the repository browser.