ParMooN
 All Classes Functions Variables Friends Pages
NF_C_H_Q1_3D.h
1 /*
2  TNodalFunctional3D(NodalFunctional3D id,
3  int n_allfunctionals, int *n_facefunctionals,
4  int n_pointsall, int *n_pointsface,
5  double *xi, double *eta, double *zeta,
6  double **xiarray, double **etaarray,
7  double **zetaarray,
8  DoubleFunctVect *evalall,
9  DoubleFunctVect *evalface);
10 */
11 
12 /* for all functionals */
13 static double NF_C_H_Q1_3D_Xi[] = { -1, 1, -1, 1, -1, 1, -1, 1 };
14 static double NF_C_H_Q1_3D_Eta[] = { -1, -1, 1, 1, -1, -1, 1, 1 };
15 static double NF_C_H_Q1_3D_Zeta[] = { -1, -1, -1, -1, 1, 1, 1, 1 };
16 
17 /* face 0 0 1 2 3 */
18 static double NF_C_H_Q1_3D_F0_Xi[] = { -1, 1, -1, 1 };
19 static double NF_C_H_Q1_3D_F0_Eta[] = { -1, -1, 1, 1 };
20 static double NF_C_H_Q1_3D_F0_Zeta[] = { -1, -1, -1, -1 };
21 
22 /* face 1 0 4 1 5 */
23 static double NF_C_H_Q1_3D_F1_Xi[] = { -1, -1, 1, 1 };
24 static double NF_C_H_Q1_3D_F1_Eta[] = { -1, -1, -1, -1 };
25 static double NF_C_H_Q1_3D_F1_Zeta[] = { -1, 1, -1, 1 };
26 
27 /* face 2 1 5 3 7 */
28 static double NF_C_H_Q1_3D_F2_Xi[] = { 1, 1, 1, 1 };
29 static double NF_C_H_Q1_3D_F2_Eta[] = { -1, -1, 1, 1 };
30 static double NF_C_H_Q1_3D_F2_Zeta[] = { -1, 1, -1, 1 };
31 
32 /* face 3 3 7 2 6 */
33 static double NF_C_H_Q1_3D_F3_Xi[] = { 1, 1, -1, -1 };
34 static double NF_C_H_Q1_3D_F3_Eta[] = { 1, 1, 1, -1 };
35 static double NF_C_H_Q1_3D_F3_Zeta[] = { -1, 1, -1, 1 };
36 
37 /* face 4 0 2 4 6 */
38 static double NF_C_H_Q1_3D_F4_Xi[] = { -1, -1, -1, -1 };
39 static double NF_C_H_Q1_3D_F4_Eta[] = { -1, 1, -1, 1 };
40 static double NF_C_H_Q1_3D_F4_Zeta[] = { -1, -1, 1, 1 };
41 
42 /* face 5 4 6 5 7 */
43 static double NF_C_H_Q1_3D_F5_Xi[] = { -1, -1, 1, 1 };
44 static double NF_C_H_Q1_3D_F5_Eta[] = { -1, 1, -1, 1 };
45 static double NF_C_H_Q1_3D_F5_Zeta[] = { 1, 1, 1, 1 };
46 
47 static double *NF_C_H_Q1_3D_XiArray[6] = {
48  NF_C_H_Q1_3D_F0_Xi,
49  NF_C_H_Q1_3D_F1_Xi,
50  NF_C_H_Q1_3D_F2_Xi,
51  NF_C_H_Q1_3D_F3_Xi,
52  NF_C_H_Q1_3D_F4_Xi,
53  NF_C_H_Q1_3D_F5_Xi };
54 
55 static double *NF_C_H_Q1_3D_EtaArray[6] = {
56  NF_C_H_Q1_3D_F0_Eta,
57  NF_C_H_Q1_3D_F1_Eta,
58  NF_C_H_Q1_3D_F2_Eta,
59  NF_C_H_Q1_3D_F3_Eta,
60  NF_C_H_Q1_3D_F4_Eta,
61  NF_C_H_Q1_3D_F5_Eta };
62 
63 static double *NF_C_H_Q1_3D_ZetaArray[6] = {
64  NF_C_H_Q1_3D_F0_Zeta,
65  NF_C_H_Q1_3D_F1_Zeta,
66  NF_C_H_Q1_3D_F2_Zeta,
67  NF_C_H_Q1_3D_F3_Zeta,
68  NF_C_H_Q1_3D_F4_Zeta,
69  NF_C_H_Q1_3D_F5_Zeta };
70 
71 static double NF_C_H_Q1_3D_T[4] = { 0, 1, 0, 1 };
72 static double NF_C_H_Q1_3D_S[4] = { 0, 0, 1, 1 };
73 
74 void NF_C_H_Q1_3D_EvalAll(TCollection *Coll, TBaseCell *Cell,
75  double *PointValues, double *Functionals)
76 {
77  Functionals[0] = PointValues[0];
78  Functionals[1] = PointValues[1];
79  Functionals[2] = PointValues[2];
80  Functionals[3] = PointValues[3];
81  Functionals[4] = PointValues[4];
82  Functionals[5] = PointValues[5];
83  Functionals[6] = PointValues[6];
84  Functionals[7] = PointValues[7];
85 }
86 
87 void NF_C_H_Q1_3D_EvalFace(TCollection *Coll, TBaseCell *Cell, int Joint,
88  double *PointValues, double *Functionals)
89 {
90  Functionals[0] = PointValues[0];
91  Functionals[1] = PointValues[1];
92  Functionals[2] = PointValues[2];
93  Functionals[3] = PointValues[3];
94 }
95 
96 static int NF_C_H_Q1_3D_N_AllFunctionals = 8;
97 static int NF_C_H_Q1_3D_N_PointsAll = 8;
98 static int NF_C_H_Q1_3D_N_FaceFunctionals[] = { 4, 4, 4, 4, 4, 4 };
99 static int NF_C_H_Q1_3D_N_PointsFace[] = { 4, 4, 4, 4, 4, 4 };
100 
101 TNodalFunctional3D *NF_C_H_Q1_3D_Obj = new TNodalFunctional3D
102  (NF_C_H_Q1_3D, NF_C_H_Q1_3D_N_AllFunctionals,
103  NF_C_H_Q1_3D_N_FaceFunctionals, NF_C_H_Q1_3D_N_PointsAll,
104  NF_C_H_Q1_3D_N_PointsFace,
105  NF_C_H_Q1_3D_Xi, NF_C_H_Q1_3D_Eta, NF_C_H_Q1_3D_Zeta,
106  NF_C_H_Q1_3D_XiArray, NF_C_H_Q1_3D_EtaArray,
107  NF_C_H_Q1_3D_ZetaArray,
108  NF_C_H_Q1_3D_T, NF_C_H_Q1_3D_S,
109  NF_C_H_Q1_3D_EvalAll, NF_C_H_Q1_3D_EvalFace);
TNodalFunctional3D
Definition: NodalFunctional3D.h:21
TCollection
store cells in an array, used by cell iterators
Definition: Collection.h:18
TBaseCell
information for finite element data structure
Definition: BaseCell.h:25
Generated on Tue May 10 2016 09:08:00 for ParMooN by   doxygen 1.8.5