source: issm/trunk-jpl/src/c/classes/Elements/Element.h@ 19987

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

CHG:

  • upload legendre coefficients if they are precomputed.
  • new land mask for the psl mask class.
File size: 20.2 KB
RevLine 
[3683]1/*!\file: Element.h
2 * \brief abstract class for Element object
3 * This class is a place holder for the Tria and the Penta elements.
4 * It is derived from Element, so DataSets can contain them.
5 */
6
7#ifndef _ELEMENT_H_
8#define _ELEMENT_H_
9
10/*Headers:*/
[12365]11/*{{{*/
[15067]12#include "../../datastructures/datastructures.h"
[16789]13#include "../../toolkits/toolkits.h"
[15012]14#include "../Update.h"
[3683]15class DataSet;
16class Parameters;
[16912]17class Parameter;
[14996]18class Elements;
19class Loads;
[16912]20class Nodes;
[14996]21class Node;
22class Vertices;
[16912]23class Vertex;
[14996]24class Materials;
[16912]25class Material;
[16693]26class Matpar;
[16912]27class Inputs;
[16675]28class Input;
29class Gauss;
[16799]30class ElementVector;
[13216]31template <class doublematrix> class Matrix;
32template <class doubletype> class Vector;
[16789]33class ElementMatrix;
34class ElementVector;
[3683]35/*}}}*/
36
[4244]37class Element: public Object,public Update{
[3683]38
[16910]39 public:
[17516]40 int id;
41 int sid;
[16912]42 Inputs *inputs;
43 Node **nodes;
44 Vertex **vertices;
45 Material *material;
46 Matpar *matpar;
47 Parameters *parameters;
[16910]48
[18078]49 int* element_type_list;
50 int element_type;
51
[3683]52 public:
[16910]53 /*Constructors/Destructores*/
54 Element();
55 ~Element();
[13623]56
[16910]57 /*Functions*/
[18913]58 void AddInput(Input* input_in);
59 /*bool AllActive(void);*/
60 /*bool AnyActive(void);*/
61 void ComputeNewDamage();
62 void ComputeStrainRate();
63 void CoordinateSystemTransform(IssmDouble** ptransform,Node** nodes,int numnodes,int* cs_array);
64 void Echo();
65 void DeepEcho();
66 void DeleteInput(int input_enum);
67 void DeleteMaterials(void);
[19237]68 void Delta18oParameterization(void);
69 void MungsmtpParameterization(void);
70 void Delta18opdParameterization(void);
[18913]71 IssmDouble Divergence(void);
72 void dViscositydBFS(IssmDouble* pdmudB,int dim,IssmDouble* xyz_list,Gauss* gauss,Input* vx_input,Input* vy_input,Input* vz_input);
73 void dViscositydBHO(IssmDouble* pdmudB,int dim,IssmDouble* xyz_list,Gauss* gauss,Input* vx_input,Input* vy_input);
74 void dViscositydBSSA(IssmDouble* pdmudB,int dim,IssmDouble* xyz_list,Gauss* gauss,Input* vx_input,Input* vy_input);
75 void dViscositydDSSA(IssmDouble* pdmudB,int dim,IssmDouble* xyz_list,Gauss* gauss,Input* vx_input,Input* vy_input);
76 IssmDouble EnthalpyDiffusionParameter(IssmDouble enthalpy,IssmDouble pressure);
77 IssmDouble EnthalpyDiffusionParameterVolume(int numvertices,IssmDouble* enthalpy,IssmDouble* pressure);
78 void EnthalpyToThermal(IssmDouble* ptemperature,IssmDouble* pwaterfraction,IssmDouble enthalpy,IssmDouble pressure);
79 void FindParam(bool* pvalue,int paramenum);
80 void FindParam(int* pvalue,int paramenum);
81 void FindParam(IssmDouble* pvalue,int paramenum);
82 void FindParam(int** pvalues,int* psize,int paramenum);
83 void GetDofList(int** pdoflist,int approximation_enum,int setenum);
84 void GetDofListPressure(int** pdoflist,int setenum);
85 void GetDofListVelocity(int** pdoflist,int setenum);
86 Input* GetInput(int inputenum);
87 void GetInputListOnNodes(IssmDouble* pvalue,int enumtype);
88 void GetInputListOnNodes(IssmDouble* pvalue,int enumtype,IssmDouble defaultvalue);
89 void GetInputListOnNodesVelocity(IssmDouble* pvalue,int enumtype);
90 void GetInputListOnVertices(IssmDouble* pvalue,int enumtype);
91 void GetInputListOnVertices(IssmDouble* pvalue,int enumtype,IssmDouble defaultvalue);
92 void GetInputLocalMinMaxOnNodes(IssmDouble* min,IssmDouble* max,IssmDouble* ug);
93 void GetInputValue(bool* pvalue,int enum_type);
94 void GetInputValue(int* pvalue,int enum_type);
95 void GetInputValue(IssmDouble* pvalue,int enum_type);
96 void GetInputValue(IssmDouble* pvalue,Gauss* gauss,int enum_type);
97 IssmDouble GetMaterialParameter(int enum_in);
98 void GetNodesLidList(int* lidlist);
99 void GetNodesSidList(int* sidlist);
100 void GetPhi(IssmDouble* phi, IssmDouble* epsilon, IssmDouble viscosity);
[19094]101 void GetVectorFromInputs(Vector<IssmDouble>* vector, int name_enum, int type);
[18913]102 void GetVertexPidList(int* pidlist);
103 void GetVerticesConnectivityList(int* connectivitylist);
104 void GetVerticesCoordinates(IssmDouble** xyz_list);
105 void GetVerticesSidList(int* sidlist);
106 IssmDouble GetXcoord(IssmDouble* xyz_list,Gauss* gauss);
107 IssmDouble GetYcoord(IssmDouble* xyz_list,Gauss* gauss);
108 IssmDouble GetZcoord(IssmDouble* xyz_list,Gauss* gauss);
109 void GradientIndexing(int* indexing,int control_index,bool onsid=false);
110 bool HasNodeOnBase();
111 bool HasNodeOnSurface();
112 int Id();
113 void InputChangeName(int enum_type,int enum_type_old);
114 void InputCreate(IssmDouble* vector,IoModel* iomodel,int M,int N,int vector_type,int vector_enum,int code);
115 void InputDuplicate(int original_enum,int new_enum);
116 void InputUpdateFromConstant(IssmDouble constant, int name);
117 void InputUpdateFromConstant(int constant, int name);
118 void InputUpdateFromConstant(bool constant, int name);
119 bool IsFloating();
120 bool IsIceInElement();
[19984]121 bool IsWaterInElement();
[19987]122 bool IsLandInElement();
123 bool IsInput(int name);
[18913]124 void LinearFloatingiceMeltingRate();
[19395]125 void MarshallElement(char** pmarshalled_data,int* pmarshalled_data_size, int marshall_direction,int numanalyses);
[18913]126 void MigrateGroundingLine(IssmDouble* sheet_ungrounding);
[19479]127 void MismipFloatingiceMeltingRate();
[18913]128 ElementMatrix* NewElementMatrix(int approximation_enum=NoneApproximationEnum);
129 ElementMatrix* NewElementMatrixCoupling(int number_nodes,int approximation_enum=NoneApproximationEnum);
130 ElementVector* NewElementVector(int approximation_enum=NoneApproximationEnum);
[19237]131 void PositiveDegreeDay(IssmDouble* pdds,IssmDouble* pds,IssmDouble signorm,bool ismungsm);
[18913]132 IssmDouble PureIceEnthalpy(IssmDouble pressure);
[19154]133 void ResetIceLevelset(void);
[19554]134 void ResultInterpolation(int* pinterpolation,int*nodesperelement,int* parray_size, int output_enum);
[18913]135 void ResultToPatch(IssmDouble* values,int nodesperelement,int output_enum);
[19554]136 void ResultToMatrix(IssmDouble* values,int ncols,int output_enum);
[18913]137 void ResultToVector(Vector<IssmDouble>* vector,int output_enum);
138 void SetwiseNodeConnectivity(int* d_nz,int* o_nz,Node* node,bool* flags,int* flagsindices,int set1_enum,int set2_enum);
139 int Sid();
[19554]140 void SmbGemb();
[18913]141 void StrainRateFS(IssmDouble* epsilon,IssmDouble* xyz_list,Gauss* gauss,Input* vx_input,Input* vy_input,Input* vz_input);
142 void StrainRateHO(IssmDouble* epsilon,IssmDouble* xyz_list,Gauss* gauss,Input* vx_input,Input* vy_input);
143 void StrainRateHO2dvertical(IssmDouble* epsilon,IssmDouble* xyz_list,Gauss* gauss,Input* vx_input,Input* vy_input);
144 void StrainRateSSA(IssmDouble* epsilon,IssmDouble* xyz_list,Gauss* gauss,Input* vx_input,Input* vy_input);
145 void StrainRateSSA1d(IssmDouble* epsilon,IssmDouble* xyz_list,Gauss* gauss,Input* vx_input);
146 void StressMaxPrincipalCreateInput(void);
147 void ThermalToEnthalpy(IssmDouble* penthalpy,IssmDouble temperature,IssmDouble waterfraction,IssmDouble pressure);
148 IssmDouble TMeltingPoint(IssmDouble pressure);
149 void TransformInvStiffnessMatrixCoord(ElementMatrix* Ke,int cs_enum);
150 void TransformInvStiffnessMatrixCoord(ElementMatrix* Ke,Node** nodes,int numnodes,int cs_enum);
151 void TransformInvStiffnessMatrixCoord(ElementMatrix* Ke,Node** nodes,int numnodes,int* cs_array);
152 void TransformLoadVectorCoord(ElementVector* pe,int cs_enum);
153 void TransformLoadVectorCoord(ElementVector* pe,int* cs_array);
154 void TransformLoadVectorCoord(ElementVector* pe,Node** nodes,int numnodes,int cs_enum);
155 void TransformLoadVectorCoord(ElementVector* pe,Node** nodes,int numnodes,int* cs_array);
156 void TransformLoadVectorCoord(ElementVector* pe,int numnodes,int transformenum){_error_("not implemented yet");};/*Tiling only*/
157 void TransformLoadVectorCoord(ElementVector* pe,int numnodes,int* transformenum_list){_error_("not implemented yet");};/*Tiling only*/
158 void TransformSolutionCoord(IssmDouble* solution,int cs_enum);
159 void TransformSolutionCoord(IssmDouble* solution,int* cs_array);
160 void TransformSolutionCoord(IssmDouble* solution,int numnodes,int cs_enum);
161 void TransformSolutionCoord(IssmDouble* solution,int numnodes,int* cs_array);
162 void TransformSolutionCoord(IssmDouble* solution,Node** nodes,int numnodes,int cs_enum);
163 void TransformSolutionCoord(IssmDouble* solution,Node** nodes,int numnodes,int* cs_array);
164 void TransformStiffnessMatrixCoord(ElementMatrix* Ke,int cs_enum);
165 void TransformStiffnessMatrixCoord(ElementMatrix* Ke,int* cs_array);
166 void TransformStiffnessMatrixCoord(ElementMatrix* Ke,Node** nodes,int numnodes,int cs_enum);
167 void TransformStiffnessMatrixCoord(ElementMatrix* Ke,Node** nodes,int numnodes,int* cs_array);
168 void TransformStiffnessMatrixCoord(ElementMatrix* Ke,int numnodes,int* transformenum_list){_error_("not implemented yet");};/*Tiling only*/
169 void ViscosityFS(IssmDouble* pviscosity,int dim,IssmDouble* xyz_list,Gauss* gauss,Input* vx_input,Input* vy_input,Input* vz_input);
170 void ViscosityFSDerivativeEpsSquare(IssmDouble* pmu_prime,IssmDouble* epsilon);
171 void ViscosityHO(IssmDouble* pviscosity,int dim,IssmDouble* xyz_list,Gauss* gauss,Input* vx_input,Input* vy_input);
172 void ViscosityHODerivativeEpsSquare(IssmDouble* pmu_prime,IssmDouble* epsilon);
173 void ViscosityL1L2(IssmDouble* pviscosity,IssmDouble* xyz_list,Gauss* gauss,Input* vx_input,Input* vy_input,Input* surf);
174 void ViscositySSA(IssmDouble* pviscosity,int dim,IssmDouble* xyz_list,Gauss* gauss,Input* vx_input,Input* vy_input);
175 void ViscositySSADerivativeEpsSquare(IssmDouble* pmu_prime,IssmDouble* epsilon);
176 void ViscousHeatingCreateInput(void);
[13623]177
[16910]178 /*Virtual functions*/
[16912]179 virtual void AddBasalInput(int input_enum, IssmDouble* values, int interpolation_enum)=0;
180 virtual void AddInput(int input_enum, IssmDouble* values, int interpolation_enum)=0;
[18913]181 virtual void AverageOntoPartition(Vector<IssmDouble>* partition_contributions,Vector<IssmDouble>* partition_areas,IssmDouble* vertex_response,IssmDouble* qmu_part)=0;
182 virtual void CalvingRateLevermann(void)=0;
[18953]183 virtual void CalvingRatePi(void)=0;
[19033]184 virtual void CalvingRateDev(void){_error_("not implemented yet");};
[19476]185 virtual void WriteLevelsetSegment(DataSet* segments){_error_("not implemented yet");};
186 virtual void ResetLevelsetFromSegmentlist(IssmDouble* segments,int numsegments){_error_("not implemented yet");};
[16832]187 virtual IssmDouble CharacteristicLength(void)=0;
[18913]188 virtual void ComputeBasalStress(Vector<IssmDouble>* sigma_b)=0;
189 virtual void ComputeDeviatoricStressTensor(void)=0;
190 virtual void ComputeSigmaNN(void)=0;
191 virtual void ComputeStressTensor(void)=0;
[16912]192 virtual void Configure(Elements* elements,Loads* loads,Nodes* nodes,Vertices* vertices,Materials* materials,Parameters* parameters)=0;
[18913]193 virtual void ControlInputSetGradient(IssmDouble* gradient,int enum_type,int control_index)=0;
194 virtual void ControlToVectors(Vector<IssmPDouble>* vector_control, Vector<IssmPDouble>* vector_gradient,int control_enum)=0;
195 virtual void ElementResponse(IssmDouble* presponse,int response_enum)=0;
196 virtual void ElementSizes(IssmDouble* phx,IssmDouble* phy,IssmDouble* phz)=0;
197 virtual int FiniteElement(void)=0;
[19764]198 virtual IssmDouble FloatingArea(void)=0;
[18913]199 virtual void FSContactMigration(Vector<IssmDouble>* vertexgrounded,Vector<IssmDouble>* vertexfloating)=0;
200 virtual Element* GetBasalElement(void)=0;
201 virtual int GetElementType(void)=0;
202 virtual void GetGroundedPart(int* point1,IssmDouble* fraction1,IssmDouble* fraction2, bool* mainlyfloating)=0;
203 virtual IssmDouble GetGroundedPortion(IssmDouble* xyz_list)=0;
204 virtual void GetIcefrontCoordinates(IssmDouble** pxyz_front,IssmDouble* xyz_list,int levelsetenum)=0;
205 virtual void GetInputValue(IssmDouble* pvalue,Node* node,int enumtype)=0;
206 virtual void GetLevelCoordinates(IssmDouble** pxyz_front,IssmDouble* xyz_list,int levelsetenum,IssmDouble level)=0;
207 virtual void GetLevelsetPositivePart(int* point1,IssmDouble* fraction1,IssmDouble* fraction2, bool* mainlynegative,IssmDouble* levelsetvalues)=0;
208 virtual Node* GetNode(int node_number)=0;
209 virtual int GetNodeIndex(Node* node)=0;
210 virtual int GetNumberOfNodes(void)=0;
211 virtual int GetNumberOfNodes(int enum_type)=0;
212 virtual int GetNumberOfVertices(void)=0;
213 virtual void GetSolutionFromInputsOneDof(Vector<IssmDouble>* solution,int solutionenum)=0;
214 virtual Element* GetUpperElement(void)=0;
215 virtual void GetVectorFromControlInputs(Vector<IssmDouble>* gradient,int control_enum,int control_index,const char* data,bool onsid)=0;
216 virtual void GetVerticesCoordinatesBase(IssmDouble** xyz_list)=0;
217 virtual void GetVerticesCoordinatesTop(IssmDouble** xyz_list)=0;
[19518]218 virtual IssmDouble GroundedArea(void)=0;
[19061]219 virtual IssmDouble IceMass(void)=0;
[18913]220 virtual IssmDouble IceVolume(void)=0;
221 virtual IssmDouble IceVolumeAboveFloatation(void)=0;
222 virtual void InputControlUpdate(IssmDouble scalar,bool save_parameter)=0;
223 virtual void InputDepthAverageAtBase(int enum_type,int average_enum_type)=0;
224 virtual void InputExtrude(int input_enum,int start)=0;
225 virtual void InputScale(int enum_type,IssmDouble scale_factor)=0;
226 virtual void InputUpdateFromSolutionOneDofCollapsed(IssmDouble* solution,int inputenum)=0;
227 virtual void InputUpdateFromSolutionOneDof(IssmDouble* solution,int inputenum)=0;
228 virtual bool IsFaceOnBoundary(void)=0;
229 virtual bool IsIcefront(void)=0;
230 virtual bool IsNodeOnShelfFromFlags(IssmDouble* flags)=0;
231 virtual bool IsOnBase()=0;
232 virtual bool IsOnSurface()=0;
233 virtual bool IsZeroLevelset(int levelset_enum)=0;
234 virtual void JacobianDeterminant(IssmDouble* Jdet, IssmDouble* xyz_list,Gauss* gauss)=0;
235 virtual void JacobianDeterminantBase(IssmDouble* Jdet,IssmDouble* xyz_list_base,Gauss* gauss)=0;
236 virtual void JacobianDeterminantLine(IssmDouble* Jdet, IssmDouble* xyz_list,Gauss* gauss)=0;
237 virtual void JacobianDeterminantSurface(IssmDouble* Jdet, IssmDouble* xyz_list,Gauss* gauss)=0;
238 virtual void JacobianDeterminantTop(IssmDouble* Jdet,IssmDouble* xyz_list_base,Gauss* gauss)=0;
[19395]239 virtual void Marshall(char** pmarshalled_data,int* pmarshalled_data_size, int marshall_direction)=0;
[18913]240 virtual IssmDouble Masscon(IssmDouble* levelset)=0;
241 virtual IssmDouble MassFlux(IssmDouble* segment)=0;
242 virtual IssmDouble MassFlux(IssmDouble x1,IssmDouble y1, IssmDouble x2, IssmDouble y2,int segment_id)=0;
243 virtual IssmDouble MinEdgeLength(IssmDouble* xyz_list)=0;
244 virtual IssmDouble Misfit(int modelenum,int observationenum,int weightsenum)=0;
245 virtual IssmDouble MisfitArea(int weightsenum)=0;
246 virtual Gauss* NewGauss(void)=0;
247 virtual Gauss* NewGauss(int order)=0;
248 virtual Gauss* NewGauss(IssmDouble* xyz_list, IssmDouble* xyz_list_front,int order)=0;
249 virtual Gauss* NewGauss(IssmDouble* xyz_list, IssmDouble* xyz_list_front,int order_horiz,int order_vert)=0;
250 virtual Gauss* NewGauss(int point1,IssmDouble fraction1,IssmDouble fraction2,bool mainlyfloating,int order)=0;
251 virtual Gauss* NewGaussBase(int order)=0;
252 virtual Gauss* NewGaussLine(int vertex1,int vertex2,int order)=0;
253 virtual Gauss* NewGaussTop(int order)=0;
254 virtual void NodalFunctions(IssmDouble* basis,Gauss* gauss)=0;
255 virtual void NodalFunctionsDerivatives(IssmDouble* dbasis,IssmDouble* xyz_list,Gauss* gauss)=0;
256 virtual void NodalFunctionsDerivativesVelocity(IssmDouble* dbasis,IssmDouble* xyz_list,Gauss* gauss)=0;
257 virtual void NodalFunctionsMINIDerivatives(IssmDouble* dbasis,IssmDouble* xyz_list,Gauss* gauss)=0;
258 virtual void NodalFunctionsPressure(IssmDouble* basis, Gauss* gauss)=0;
259 virtual void NodalFunctionsP1(IssmDouble* basis,Gauss* gauss)=0;
260 virtual void NodalFunctionsP1Derivatives(IssmDouble* dbasis,IssmDouble* xyz_list,Gauss* gauss)=0;
261 virtual void NodalFunctionsP2(IssmDouble* basis,Gauss* gauss)=0;
262 virtual void NodalFunctionsVelocity(IssmDouble* basis, Gauss* gauss)=0;
263 virtual void NodalFunctionsTensor(IssmDouble* basis, Gauss* gauss)=0;
264 virtual int NodalValue(IssmDouble* pvalue, int index, int natureofdataenum)=0;
265 virtual void NormalBase(IssmDouble* normal,IssmDouble* xyz_list)=0;
266 virtual void NormalSection(IssmDouble* normal,IssmDouble* xyz_list)=0;
267 virtual void NormalTop(IssmDouble* normal,IssmDouble* xyz_list)=0;
268 virtual int NumberofNodesPressure(void)=0;
269 virtual int NumberofNodesVelocity(void)=0;
270 virtual void PotentialUngrounding(Vector<IssmDouble>* potential_sheet_ungrounding)=0;
271 virtual int PressureInterpolation()=0;
272 virtual void ReduceMatrices(ElementMatrix* Ke,ElementVector* pe)=0;
273 virtual void ResetFSBasalBoundaryCondition()=0;
274 virtual void ResetHooks()=0;
275 virtual void SetControlInputsFromVector(IssmDouble* vector,int control_enum,int control_index)=0;
[16912]276 virtual void SetCurrentConfiguration(Elements* elements,Loads* loads,Nodes* nodes,Materials* materials,Parameters* parameters)=0;
[18913]277 virtual void SetTemporaryElementType(int element_type_in)=0;
[16721]278 virtual Element* SpawnBasalElement(void)=0;
[17172]279 virtual Element* SpawnTopElement(void)=0;
[16810]280 virtual IssmDouble StabilizationParameter(IssmDouble u, IssmDouble v, IssmDouble w, IssmDouble diameter, IssmDouble kappa)=0;
[18913]281 virtual void StrainRateparallel(void)=0;
282 virtual void StrainRateperpendicular(void)=0;
283 virtual void StressIntensityFactor(void)=0;
284 virtual IssmDouble SurfaceArea(void)=0;
285 virtual int TensorInterpolation()=0;
286 virtual IssmDouble TimeAdapt()=0;
[12773]287 virtual IssmDouble TotalSmb(void)=0;
[18913]288 virtual void Update(int index, IoModel* iomodel,int analysis_counter,int analysis_type,int finite_element)=0;
289 virtual void UpdateConstraintsExtrudeFromBase(void)=0;
290 virtual void UpdateConstraintsExtrudeFromTop(void)=0;
291 virtual int UpdatePotentialUngrounding(IssmDouble* potential_sheet_ungrounding,Vector<IssmDouble>* vec_nodes_on_iceshelf,IssmDouble* nodes_on_iceshelf)=0;
292 virtual void ValueP1DerivativesOnGauss(IssmDouble* dvalue,IssmDouble* values,IssmDouble* xyz_list,Gauss* gauss)=0;
293 virtual void ValueP1OnGauss(IssmDouble* pvalue,IssmDouble* values,Gauss* gauss)=0;
294 virtual int VelocityInterpolation()=0;
295 virtual int VertexConnectivity(int vertexindex)=0;
296 virtual void VerticalSegmentIndices(int** pindices,int* pnumseg)=0;
297 virtual void ViscousHeating(IssmDouble* pphi,IssmDouble* xyz_list,Gauss* gauss,Input* vx_input,Input* vy_input,Input* vz_input)=0;
298 virtual void ZeroLevelsetCoordinates(IssmDouble** pxyz_zero,IssmDouble* xyz_list,int levelsetenum)=0;
[4055]299
[14589]300 #ifdef _HAVE_GIA_
[18913]301 virtual void GiaDeflection(Vector<IssmDouble>* wg,Vector<IssmDouble>* dwgdt,IssmDouble* x,IssmDouble* y)=0;
[14589]302 #endif
[19984]303 #ifdef _HAVE_SEALEVELRISE_
304 virtual void Sealevelrise(Vector<IssmDouble>* pSgi,Vector<IssmDouble>* pSgo,IssmDouble* peustatic,IssmDouble* Sg_old,IssmDouble* Sgi_old,IssmDouble* Sgo_old,IssmDouble* x,IssmDouble* y,IssmDouble* z,IssmDouble oceanarea)=0;
305 virtual IssmDouble OceanArea(void)=0;
306 #endif
307
[3683]308};
309#endif
Note: See TracBrowser for help on using the repository browser.