ParMooN
 All Classes Functions Variables Friends Pages
BF_C_Q_Q7_2D.h
1 
2 // ***********************************************************************
3 // Q7 element, conforming, 2D
4 // ***********************************************************************
5 
6 // base function values
7 static void C_Q_Q7_2D_Funct(double xi, double eta, double *values)
8 {
9 
10  double xi0= -0.1276573350694444E1*xi*xi*xi*xi*xi*xi*xi+0.1276573350694444E1*xi*xi*xi*xi*xi*xi+0.9118381076388889*xi*xi*xi*xi*xi-0.9118381076388889*xi*xi*xi*xi-0.1377061631944444*xi*xi*xi+0.1377061631944444*xi*xi+0.244140625E-2*xi-0.244140625E-2;
11  double xi1= 0.8936013454861111E1*xi*xi*xi*xi*xi*xi*xi-0.6382866753472222E1*xi*xi*xi*xi*xi*xi-0.1075968967013889E2*xi*xi*xi*xi*xi+0.7685492621527778E1*xi*xi*xi*xi+0.1857172309027778E1*xi*xi*xi-0.1326551649305556E1*xi*xi-0.3349609375E-1*xi+0.2392578125E-1;
12  double xi2= -0.2680804036458333E2*xi*xi*xi*xi*xi*xi*xi+0.1148916015625E2*xi*xi*xi*xi*xi*xi+0.4103271484375E2*xi*xi*xi*xi*xi-0.1758544921875E2*xi*xi*xi*xi-0.1450380859375E2*xi*xi*xi+0.621591796875E1*xi*xi+0.2791341145833333*xi-0.11962890625;
13  double xi3= 0.4468006727430556E2*xi*xi*xi*xi*xi*xi*xi-0.6382866753472222E1*xi*xi*xi*xi*xi*xi-0.7568256293402778E2*xi*xi*xi*xi*xi+0.1081179470486111E2*xi*xi*xi*xi+0.3518950737847222E2*xi*xi*xi-0.5027072482638889E1*xi*xi-0.418701171875E1*xi+0.59814453125;
14  double xi4= -0.4468006727430556E2*xi*xi*xi*xi*xi*xi*xi-0.6382866753472222E1*xi*xi*xi*xi*xi*xi+0.7568256293402778E2*xi*xi*xi*xi*xi+0.1081179470486111E2*xi*xi*xi*xi-0.3518950737847222E2*xi*xi*xi-0.5027072482638889E1*xi*xi+0.418701171875E1*xi+0.59814453125;
15  double xi5= 0.2680804036458333E2*xi*xi*xi*xi*xi*xi*xi+0.1148916015625E2*xi*xi*xi*xi*xi*xi-0.4103271484375E2*xi*xi*xi*xi*xi-0.1758544921875E2*xi*xi*xi*xi+0.1450380859375E2*xi*xi*xi+0.621591796875E1*xi*xi-0.2791341145833333*xi-0.11962890625;
16  double xi6= -0.8936013454861111E1*xi*xi*xi*xi*xi*xi*xi-0.6382866753472222E1*xi*xi*xi*xi*xi*xi+0.1075968967013889E2*xi*xi*xi*xi*xi+0.7685492621527778E1*xi*xi*xi*xi-0.1857172309027778E1*xi*xi*xi-0.1326551649305556E1*xi*xi+0.3349609375E-1*xi+0.2392578125E-1;
17  double xi7= 0.1276573350694444E1*xi*xi*xi*xi*xi*xi*xi+0.1276573350694444E1*xi*xi*xi*xi*xi*xi-0.9118381076388889*xi*xi*xi*xi*xi-0.9118381076388889*xi*xi*xi*xi+0.1377061631944444*xi*xi*xi+0.1377061631944444*xi*xi-0.244140625E-2*xi-0.244140625E-2;
18 
19  double eta0= -0.1276573350694444E1*eta*eta*eta*eta*eta*eta*eta+0.1276573350694444E1*eta*eta*eta*eta*eta*eta+0.9118381076388889*eta*eta*eta*eta*eta-0.9118381076388889*eta*eta*eta*eta-0.1377061631944444*eta*eta*eta+0.1377061631944444*eta*eta+0.244140625E-2*eta-0.244140625E-2;
20  double eta1= 0.8936013454861111E1*eta*eta*eta*eta*eta*eta*eta-0.6382866753472222E1*eta*eta*eta*eta*eta*eta-0.1075968967013889E2*eta*eta*eta*eta*eta+0.7685492621527778E1*eta*eta*eta*eta+0.1857172309027778E1*eta*eta*eta-0.1326551649305556E1*eta*eta-0.3349609375E-1*eta+0.2392578125E-1;
21  double eta2= -0.2680804036458333E2*eta*eta*eta*eta*eta*eta*eta+0.1148916015625E2*eta*eta*eta*eta*eta*eta+0.4103271484375E2*eta*eta*eta*eta*eta-0.1758544921875E2*eta*eta*eta*eta-0.1450380859375E2*eta*eta*eta+0.621591796875E1*eta*eta+0.2791341145833333*eta-0.11962890625;
22  double eta3= 0.4468006727430556E2*eta*eta*eta*eta*eta*eta*eta-0.6382866753472222E1*eta*eta*eta*eta*eta*eta-0.7568256293402778E2*eta*eta*eta*eta*eta+0.1081179470486111E2*eta*eta*eta*eta+0.3518950737847222E2*eta*eta*eta-0.5027072482638889E1*eta*eta-0.418701171875E1*eta+0.59814453125;
23  double eta4= -0.4468006727430556E2*eta*eta*eta*eta*eta*eta*eta-0.6382866753472222E1*eta*eta*eta*eta*eta*eta+0.7568256293402778E2*eta*eta*eta*eta*eta+0.1081179470486111E2*eta*eta*eta*eta-0.3518950737847222E2*eta*eta*eta-0.5027072482638889E1*eta*eta+0.418701171875E1*eta+0.59814453125;
24  double eta5= 0.2680804036458333E2*eta*eta*eta*eta*eta*eta*eta+0.1148916015625E2*eta*eta*eta*eta*eta*eta-0.4103271484375E2*eta*eta*eta*eta*eta-0.1758544921875E2*eta*eta*eta*eta+0.1450380859375E2*eta*eta*eta+0.621591796875E1*eta*eta-0.2791341145833333*eta-0.11962890625;
25  double eta6= -0.8936013454861111E1*eta*eta*eta*eta*eta*eta*eta-0.6382866753472222E1*eta*eta*eta*eta*eta*eta+0.1075968967013889E2*eta*eta*eta*eta*eta+0.7685492621527778E1*eta*eta*eta*eta-0.1857172309027778E1*eta*eta*eta-0.1326551649305556E1*eta*eta+0.3349609375E-1*eta+0.2392578125E-1;
26  double eta7= 0.1276573350694444E1*eta*eta*eta*eta*eta*eta*eta+0.1276573350694444E1*eta*eta*eta*eta*eta*eta-0.9118381076388889*eta*eta*eta*eta*eta-0.9118381076388889*eta*eta*eta*eta+0.1377061631944444*eta*eta*eta+0.1377061631944444*eta*eta-0.244140625E-2*eta-0.244140625E-2;
27 
28 
29  values[0] = xi0*eta0;
30  values[1] = xi1*eta0;
31  values[2] = xi2*eta0;
32  values[3] = xi3*eta0;
33  values[4] = xi4*eta0;
34  values[5] = xi5*eta0;
35  values[6] = xi6*eta0;
36  values[7] = xi7*eta0;
37  values[8] = xi0*eta1;
38  values[9] = xi1*eta1;
39  values[10] = xi2*eta1;
40  values[11] = xi3*eta1;
41  values[12] = xi4*eta1;
42  values[13] = xi5*eta1;
43  values[14] = xi6*eta1;
44  values[15] = xi7*eta1;
45  values[16] = xi0*eta2;
46  values[17] = xi1*eta2;
47  values[18] = xi2*eta2;
48  values[19] = xi3*eta2;
49  values[20] = xi4*eta2;
50  values[21] = xi5*eta2;
51  values[22] = xi6*eta2;
52  values[23] = xi7*eta2;
53  values[24] = xi0*eta3;
54  values[25] = xi1*eta3;
55  values[26] = xi2*eta3;
56  values[27] = xi3*eta3;
57  values[28] = xi4*eta3;
58  values[29] = xi5*eta3;
59  values[30] = xi6*eta3;
60  values[31] = xi7*eta3;
61  values[32] = xi0*eta4;
62  values[33] = xi1*eta4;
63  values[34] = xi2*eta4;
64  values[35] = xi3*eta4;
65  values[36] = xi4*eta4;
66  values[37] = xi5*eta4;
67  values[38] = xi6*eta4;
68  values[39] = xi7*eta4;
69  values[40] = xi0*eta5;
70  values[41] = xi1*eta5;
71  values[42] = xi2*eta5;
72  values[43] = xi3*eta5;
73  values[44] = xi4*eta5;
74  values[45] = xi5*eta5;
75  values[46] = xi6*eta5;
76  values[47] = xi7*eta5;
77  values[48] = xi0*eta6;
78  values[49] = xi1*eta6;
79  values[50] = xi2*eta6;
80  values[51] = xi3*eta6;
81  values[52] = xi4*eta6;
82  values[53] = xi5*eta6;
83  values[54] = xi6*eta6;
84  values[55] = xi7*eta6;
85  values[56] = xi0*eta7;
86  values[57] = xi1*eta7;
87  values[58] = xi2*eta7;
88  values[59] = xi3*eta7;
89  values[60] = xi4*eta7;
90  values[61] = xi5*eta7;
91  values[62] = xi6*eta7;
92  values[63] = xi7*eta7;
93 }
94 
95 
96 // values of the derivatives in xi direction
97 static void C_Q_Q7_2D_DeriveXi(double xi, double eta, double *values)
98 {
99 
100  double xi0= -0.8936013454861111E1*xi*xi*xi*xi*xi*xi+0.7659440104166667E1*xi*xi*xi*xi*xi+0.4559190538194444E1*xi*xi*xi*xi-0.3647352430555556E1*xi*xi*xi-0.4131184895833333*xi*xi+0.2754123263888889*xi+0.244140625E-2;
101  double xi1= 0.6255209418402778E2*xi*xi*xi*xi*xi*xi-0.3829720052083333E2*xi*xi*xi*xi*xi-0.5379844835069444E2*xi*xi*xi*xi+0.3074197048611111E2*xi*xi*xi+0.5571516927083333E1*xi*xi-0.2653103298611111E1*xi-0.3349609375E-1;
102  double xi2= -0.1876562825520833E3*xi*xi*xi*xi*xi*xi+0.689349609375E2*xi*xi*xi*xi*xi+0.20516357421875E3*xi*xi*xi*xi-0.70341796875E2*xi*xi*xi-0.4351142578125E2*xi*xi+0.124318359375E2*xi+0.2791341145833333;
103  double xi3= 0.3127604709201389E3*xi*xi*xi*xi*xi*xi-0.3829720052083333E2*xi*xi*xi*xi*xi-0.3784128146701389E3*xi*xi*xi*xi+0.4324717881944444E2*xi*xi*xi+0.1055685221354167E3*xi*xi-0.1005414496527778E2*xi-0.418701171875E1;
104  double xi4= -0.3127604709201389E3*xi*xi*xi*xi*xi*xi-0.3829720052083333E2*xi*xi*xi*xi*xi+0.3784128146701389E3*xi*xi*xi*xi+0.4324717881944444E2*xi*xi*xi-0.1055685221354167E3*xi*xi-0.1005414496527778E2*xi+0.418701171875E1;
105  double xi5= 0.1876562825520833E3*xi*xi*xi*xi*xi*xi+0.689349609375E2*xi*xi*xi*xi*xi-0.20516357421875E3*xi*xi*xi*xi-0.70341796875E2*xi*xi*xi+0.4351142578125E2*xi*xi+0.124318359375E2*xi-0.2791341145833333;
106  double xi6= -0.6255209418402778E2*xi*xi*xi*xi*xi*xi-0.3829720052083333E2*xi*xi*xi*xi*xi+0.5379844835069444E2*xi*xi*xi*xi+0.3074197048611111E2*xi*xi*xi-0.5571516927083333E1*xi*xi-0.2653103298611111E1*xi+0.3349609375E-1;
107  double xi7= 0.8936013454861111E1*xi*xi*xi*xi*xi*xi+0.7659440104166667E1*xi*xi*xi*xi*xi-0.4559190538194444E1*xi*xi*xi*xi-0.3647352430555556E1*xi*xi*xi+0.4131184895833333*xi*xi+0.2754123263888889*xi-0.244140625E-2;
108 
109  double eta0= -0.1276573350694444E1*eta*eta*eta*eta*eta*eta*eta+0.1276573350694444E1*eta*eta*eta*eta*eta*eta+0.9118381076388889*eta*eta*eta*eta*eta-0.9118381076388889*eta*eta*eta*eta-0.1377061631944444*eta*eta*eta+0.1377061631944444*eta*eta+0.244140625E-2*eta-0.244140625E-2;
110  double eta1= 0.8936013454861111E1*eta*eta*eta*eta*eta*eta*eta-0.6382866753472222E1*eta*eta*eta*eta*eta*eta-0.1075968967013889E2*eta*eta*eta*eta*eta+0.7685492621527778E1*eta*eta*eta*eta+0.1857172309027778E1*eta*eta*eta-0.1326551649305556E1*eta*eta-0.3349609375E-1*eta+0.2392578125E-1;
111  double eta2= -0.2680804036458333E2*eta*eta*eta*eta*eta*eta*eta+0.1148916015625E2*eta*eta*eta*eta*eta*eta+0.4103271484375E2*eta*eta*eta*eta*eta-0.1758544921875E2*eta*eta*eta*eta-0.1450380859375E2*eta*eta*eta+0.621591796875E1*eta*eta+0.2791341145833333*eta-0.11962890625;
112  double eta3= 0.4468006727430556E2*eta*eta*eta*eta*eta*eta*eta-0.6382866753472222E1*eta*eta*eta*eta*eta*eta-0.7568256293402778E2*eta*eta*eta*eta*eta+0.1081179470486111E2*eta*eta*eta*eta+0.3518950737847222E2*eta*eta*eta-0.5027072482638889E1*eta*eta-0.418701171875E1*eta+0.59814453125;
113  double eta4= -0.4468006727430556E2*eta*eta*eta*eta*eta*eta*eta-0.6382866753472222E1*eta*eta*eta*eta*eta*eta+0.7568256293402778E2*eta*eta*eta*eta*eta+0.1081179470486111E2*eta*eta*eta*eta-0.3518950737847222E2*eta*eta*eta-0.5027072482638889E1*eta*eta+0.418701171875E1*eta+0.59814453125;
114  double eta5= 0.2680804036458333E2*eta*eta*eta*eta*eta*eta*eta+0.1148916015625E2*eta*eta*eta*eta*eta*eta-0.4103271484375E2*eta*eta*eta*eta*eta-0.1758544921875E2*eta*eta*eta*eta+0.1450380859375E2*eta*eta*eta+0.621591796875E1*eta*eta-0.2791341145833333*eta-0.11962890625;
115  double eta6= -0.8936013454861111E1*eta*eta*eta*eta*eta*eta*eta-0.6382866753472222E1*eta*eta*eta*eta*eta*eta+0.1075968967013889E2*eta*eta*eta*eta*eta+0.7685492621527778E1*eta*eta*eta*eta-0.1857172309027778E1*eta*eta*eta-0.1326551649305556E1*eta*eta+0.3349609375E-1*eta+0.2392578125E-1;
116  double eta7= 0.1276573350694444E1*eta*eta*eta*eta*eta*eta*eta+0.1276573350694444E1*eta*eta*eta*eta*eta*eta-0.9118381076388889*eta*eta*eta*eta*eta-0.9118381076388889*eta*eta*eta*eta+0.1377061631944444*eta*eta*eta+0.1377061631944444*eta*eta-0.244140625E-2*eta-0.244140625E-2;
117 
118 
119  values[0] = xi0*eta0;
120  values[1] = xi1*eta0;
121  values[2] = xi2*eta0;
122  values[3] = xi3*eta0;
123  values[4] = xi4*eta0;
124  values[5] = xi5*eta0;
125  values[6] = xi6*eta0;
126  values[7] = xi7*eta0;
127  values[8] = xi0*eta1;
128  values[9] = xi1*eta1;
129  values[10] = xi2*eta1;
130  values[11] = xi3*eta1;
131  values[12] = xi4*eta1;
132  values[13] = xi5*eta1;
133  values[14] = xi6*eta1;
134  values[15] = xi7*eta1;
135  values[16] = xi0*eta2;
136  values[17] = xi1*eta2;
137  values[18] = xi2*eta2;
138  values[19] = xi3*eta2;
139  values[20] = xi4*eta2;
140  values[21] = xi5*eta2;
141  values[22] = xi6*eta2;
142  values[23] = xi7*eta2;
143  values[24] = xi0*eta3;
144  values[25] = xi1*eta3;
145  values[26] = xi2*eta3;
146  values[27] = xi3*eta3;
147  values[28] = xi4*eta3;
148  values[29] = xi5*eta3;
149  values[30] = xi6*eta3;
150  values[31] = xi7*eta3;
151  values[32] = xi0*eta4;
152  values[33] = xi1*eta4;
153  values[34] = xi2*eta4;
154  values[35] = xi3*eta4;
155  values[36] = xi4*eta4;
156  values[37] = xi5*eta4;
157  values[38] = xi6*eta4;
158  values[39] = xi7*eta4;
159  values[40] = xi0*eta5;
160  values[41] = xi1*eta5;
161  values[42] = xi2*eta5;
162  values[43] = xi3*eta5;
163  values[44] = xi4*eta5;
164  values[45] = xi5*eta5;
165  values[46] = xi6*eta5;
166  values[47] = xi7*eta5;
167  values[48] = xi0*eta6;
168  values[49] = xi1*eta6;
169  values[50] = xi2*eta6;
170  values[51] = xi3*eta6;
171  values[52] = xi4*eta6;
172  values[53] = xi5*eta6;
173  values[54] = xi6*eta6;
174  values[55] = xi7*eta6;
175  values[56] = xi0*eta7;
176  values[57] = xi1*eta7;
177  values[58] = xi2*eta7;
178  values[59] = xi3*eta7;
179  values[60] = xi4*eta7;
180  values[61] = xi5*eta7;
181  values[62] = xi6*eta7;
182  values[63] = xi7*eta7;
183 }
184 
185 // values of the derivatives in eta direction
186 static void C_Q_Q7_2D_DeriveEta(double xi, double eta, double *values)
187 {
188 
189  double xi0= -0.1276573350694444E1*xi*xi*xi*xi*xi*xi*xi+0.1276573350694444E1*xi*xi*xi*xi*xi*xi+0.9118381076388889*xi*xi*xi*xi*xi-0.9118381076388889*xi*xi*xi*xi-0.1377061631944444*xi*xi*xi+0.1377061631944444*xi*xi+0.244140625E-2*xi-0.244140625E-2;
190  double xi1= 0.8936013454861111E1*xi*xi*xi*xi*xi*xi*xi-0.6382866753472222E1*xi*xi*xi*xi*xi*xi-0.1075968967013889E2*xi*xi*xi*xi*xi+0.7685492621527778E1*xi*xi*xi*xi+0.1857172309027778E1*xi*xi*xi-0.1326551649305556E1*xi*xi-0.3349609375E-1*xi+0.2392578125E-1;
191  double xi2= -0.2680804036458333E2*xi*xi*xi*xi*xi*xi*xi+0.1148916015625E2*xi*xi*xi*xi*xi*xi+0.4103271484375E2*xi*xi*xi*xi*xi-0.1758544921875E2*xi*xi*xi*xi-0.1450380859375E2*xi*xi*xi+0.621591796875E1*xi*xi+0.2791341145833333*xi-0.11962890625;
192  double xi3= 0.4468006727430556E2*xi*xi*xi*xi*xi*xi*xi-0.6382866753472222E1*xi*xi*xi*xi*xi*xi-0.7568256293402778E2*xi*xi*xi*xi*xi+0.1081179470486111E2*xi*xi*xi*xi+0.3518950737847222E2*xi*xi*xi-0.5027072482638889E1*xi*xi-0.418701171875E1*xi+0.59814453125;
193  double xi4= -0.4468006727430556E2*xi*xi*xi*xi*xi*xi*xi-0.6382866753472222E1*xi*xi*xi*xi*xi*xi+0.7568256293402778E2*xi*xi*xi*xi*xi+0.1081179470486111E2*xi*xi*xi*xi-0.3518950737847222E2*xi*xi*xi-0.5027072482638889E1*xi*xi+0.418701171875E1*xi+0.59814453125;
194  double xi5= 0.2680804036458333E2*xi*xi*xi*xi*xi*xi*xi+0.1148916015625E2*xi*xi*xi*xi*xi*xi-0.4103271484375E2*xi*xi*xi*xi*xi-0.1758544921875E2*xi*xi*xi*xi+0.1450380859375E2*xi*xi*xi+0.621591796875E1*xi*xi-0.2791341145833333*xi-0.11962890625;
195  double xi6= -0.8936013454861111E1*xi*xi*xi*xi*xi*xi*xi-0.6382866753472222E1*xi*xi*xi*xi*xi*xi+0.1075968967013889E2*xi*xi*xi*xi*xi+0.7685492621527778E1*xi*xi*xi*xi-0.1857172309027778E1*xi*xi*xi-0.1326551649305556E1*xi*xi+0.3349609375E-1*xi+0.2392578125E-1;
196  double xi7= 0.1276573350694444E1*xi*xi*xi*xi*xi*xi*xi+0.1276573350694444E1*xi*xi*xi*xi*xi*xi-0.9118381076388889*xi*xi*xi*xi*xi-0.9118381076388889*xi*xi*xi*xi+0.1377061631944444*xi*xi*xi+0.1377061631944444*xi*xi-0.244140625E-2*xi-0.244140625E-2;
197 
198  double eta0= -0.8936013454861111E1*eta*eta*eta*eta*eta*eta+0.7659440104166667E1*eta*eta*eta*eta*eta+0.4559190538194444E1*eta*eta*eta*eta-0.3647352430555556E1*eta*eta*eta-0.4131184895833333*eta*eta+0.2754123263888889*eta+0.244140625E-2;
199  double eta1= 0.6255209418402778E2*eta*eta*eta*eta*eta*eta-0.3829720052083333E2*eta*eta*eta*eta*eta-0.5379844835069444E2*eta*eta*eta*eta+0.3074197048611111E2*eta*eta*eta+0.5571516927083333E1*eta*eta-0.2653103298611111E1*eta-0.3349609375E-1;
200  double eta2= -0.1876562825520833E3*eta*eta*eta*eta*eta*eta+0.689349609375E2*eta*eta*eta*eta*eta+0.20516357421875E3*eta*eta*eta*eta-0.70341796875E2*eta*eta*eta-0.4351142578125E2*eta*eta+0.124318359375E2*eta+0.2791341145833333;
201  double eta3= 0.3127604709201389E3*eta*eta*eta*eta*eta*eta-0.3829720052083333E2*eta*eta*eta*eta*eta-0.3784128146701389E3*eta*eta*eta*eta+0.4324717881944444E2*eta*eta*eta+0.1055685221354167E3*eta*eta-0.1005414496527778E2*eta-0.418701171875E1;
202  double eta4= -0.3127604709201389E3*eta*eta*eta*eta*eta*eta-0.3829720052083333E2*eta*eta*eta*eta*eta+0.3784128146701389E3*eta*eta*eta*eta+0.4324717881944444E2*eta*eta*eta-0.1055685221354167E3*eta*eta-0.1005414496527778E2*eta+0.418701171875E1;
203  double eta5= 0.1876562825520833E3*eta*eta*eta*eta*eta*eta+0.689349609375E2*eta*eta*eta*eta*eta-0.20516357421875E3*eta*eta*eta*eta-0.70341796875E2*eta*eta*eta+0.4351142578125E2*eta*eta+0.124318359375E2*eta-0.2791341145833333;
204  double eta6= -0.6255209418402778E2*eta*eta*eta*eta*eta*eta-0.3829720052083333E2*eta*eta*eta*eta*eta+0.5379844835069444E2*eta*eta*eta*eta+0.3074197048611111E2*eta*eta*eta-0.5571516927083333E1*eta*eta-0.2653103298611111E1*eta+0.3349609375E-1;
205  double eta7= 0.8936013454861111E1*eta*eta*eta*eta*eta*eta+0.7659440104166667E1*eta*eta*eta*eta*eta-0.4559190538194444E1*eta*eta*eta*eta-0.3647352430555556E1*eta*eta*eta+0.4131184895833333*eta*eta+0.2754123263888889*eta-0.244140625E-2;
206 
207 
208  values[0] = xi0*eta0;
209  values[1] = xi1*eta0;
210  values[2] = xi2*eta0;
211  values[3] = xi3*eta0;
212  values[4] = xi4*eta0;
213  values[5] = xi5*eta0;
214  values[6] = xi6*eta0;
215  values[7] = xi7*eta0;
216  values[8] = xi0*eta1;
217  values[9] = xi1*eta1;
218  values[10] = xi2*eta1;
219  values[11] = xi3*eta1;
220  values[12] = xi4*eta1;
221  values[13] = xi5*eta1;
222  values[14] = xi6*eta1;
223  values[15] = xi7*eta1;
224  values[16] = xi0*eta2;
225  values[17] = xi1*eta2;
226  values[18] = xi2*eta2;
227  values[19] = xi3*eta2;
228  values[20] = xi4*eta2;
229  values[21] = xi5*eta2;
230  values[22] = xi6*eta2;
231  values[23] = xi7*eta2;
232  values[24] = xi0*eta3;
233  values[25] = xi1*eta3;
234  values[26] = xi2*eta3;
235  values[27] = xi3*eta3;
236  values[28] = xi4*eta3;
237  values[29] = xi5*eta3;
238  values[30] = xi6*eta3;
239  values[31] = xi7*eta3;
240  values[32] = xi0*eta4;
241  values[33] = xi1*eta4;
242  values[34] = xi2*eta4;
243  values[35] = xi3*eta4;
244  values[36] = xi4*eta4;
245  values[37] = xi5*eta4;
246  values[38] = xi6*eta4;
247  values[39] = xi7*eta4;
248  values[40] = xi0*eta5;
249  values[41] = xi1*eta5;
250  values[42] = xi2*eta5;
251  values[43] = xi3*eta5;
252  values[44] = xi4*eta5;
253  values[45] = xi5*eta5;
254  values[46] = xi6*eta5;
255  values[47] = xi7*eta5;
256  values[48] = xi0*eta6;
257  values[49] = xi1*eta6;
258  values[50] = xi2*eta6;
259  values[51] = xi3*eta6;
260  values[52] = xi4*eta6;
261  values[53] = xi5*eta6;
262  values[54] = xi6*eta6;
263  values[55] = xi7*eta6;
264  values[56] = xi0*eta7;
265  values[57] = xi1*eta7;
266  values[58] = xi2*eta7;
267  values[59] = xi3*eta7;
268  values[60] = xi4*eta7;
269  values[61] = xi5*eta7;
270  values[62] = xi6*eta7;
271  values[63] = xi7*eta7;
272 }
273 
274 // values of the derivatives in xi-xi direction
275 static void C_Q_Q7_2D_DeriveXiXi(double xi, double eta, double *values)
276 {
277 
278  double xi0= -0.5361608072916667E2*xi*xi*xi*xi*xi+0.3829720052083333E2*xi*xi*xi*xi+0.1823676215277778E2*xi*xi*xi-0.1094205729166667E2*xi*xi-0.8262369791666667*xi+0.2754123263888889;
279  double xi1= 0.3753125651041667E3*xi*xi*xi*xi*xi-0.1914860026041667E3*xi*xi*xi*xi-0.2151937934027778E3*xi*xi*xi+0.9222591145833333E2*xi*xi+0.1114303385416667E2*xi-0.2653103298611111E1;
280  double xi2= -0.11259376953125E4*xi*xi*xi*xi*xi+0.3446748046875E3*xi*xi*xi*xi+0.820654296875E3*xi*xi*xi-0.211025390625E3*xi*xi-0.870228515625E2*xi+0.124318359375E2;
281  double xi3= 0.1876562825520833E4*xi*xi*xi*xi*xi-0.1914860026041667E3*xi*xi*xi*xi-0.1513651258680556E4*xi*xi*xi+0.1297415364583333E3*xi*xi+0.2111370442708333E3*xi-0.1005414496527778E2;
282  double xi4= -0.1876562825520833E4*xi*xi*xi*xi*xi-0.1914860026041667E3*xi*xi*xi*xi+0.1513651258680556E4*xi*xi*xi+0.1297415364583333E3*xi*xi-0.2111370442708333E3*xi-0.1005414496527778E2;
283  double xi5= 0.11259376953125E4*xi*xi*xi*xi*xi+0.3446748046875E3*xi*xi*xi*xi-0.820654296875E3*xi*xi*xi-0.211025390625E3*xi*xi+0.870228515625E2*xi+0.124318359375E2;
284  double xi6= -0.3753125651041667E3*xi*xi*xi*xi*xi-0.1914860026041667E3*xi*xi*xi*xi+0.2151937934027778E3*xi*xi*xi+0.9222591145833333E2*xi*xi-0.1114303385416667E2*xi-0.2653103298611111E1;
285  double xi7= 0.5361608072916667E2*xi*xi*xi*xi*xi+0.3829720052083333E2*xi*xi*xi*xi-0.1823676215277778E2*xi*xi*xi-0.1094205729166667E2*xi*xi+0.8262369791666667*xi+0.2754123263888889;
286 
287  double eta0= -0.1276573350694444E1*eta*eta*eta*eta*eta*eta*eta+0.1276573350694444E1*eta*eta*eta*eta*eta*eta+0.9118381076388889*eta*eta*eta*eta*eta-0.9118381076388889*eta*eta*eta*eta-0.1377061631944444*eta*eta*eta+0.1377061631944444*eta*eta+0.244140625E-2*eta-0.244140625E-2;
288  double eta1= 0.8936013454861111E1*eta*eta*eta*eta*eta*eta*eta-0.6382866753472222E1*eta*eta*eta*eta*eta*eta-0.1075968967013889E2*eta*eta*eta*eta*eta+0.7685492621527778E1*eta*eta*eta*eta+0.1857172309027778E1*eta*eta*eta-0.1326551649305556E1*eta*eta-0.3349609375E-1*eta+0.2392578125E-1;
289  double eta2= -0.2680804036458333E2*eta*eta*eta*eta*eta*eta*eta+0.1148916015625E2*eta*eta*eta*eta*eta*eta+0.4103271484375E2*eta*eta*eta*eta*eta-0.1758544921875E2*eta*eta*eta*eta-0.1450380859375E2*eta*eta*eta+0.621591796875E1*eta*eta+0.2791341145833333*eta-0.11962890625;
290  double eta3= 0.4468006727430556E2*eta*eta*eta*eta*eta*eta*eta-0.6382866753472222E1*eta*eta*eta*eta*eta*eta-0.7568256293402778E2*eta*eta*eta*eta*eta+0.1081179470486111E2*eta*eta*eta*eta+0.3518950737847222E2*eta*eta*eta-0.5027072482638889E1*eta*eta-0.418701171875E1*eta+0.59814453125;
291  double eta4= -0.4468006727430556E2*eta*eta*eta*eta*eta*eta*eta-0.6382866753472222E1*eta*eta*eta*eta*eta*eta+0.7568256293402778E2*eta*eta*eta*eta*eta+0.1081179470486111E2*eta*eta*eta*eta-0.3518950737847222E2*eta*eta*eta-0.5027072482638889E1*eta*eta+0.418701171875E1*eta+0.59814453125;
292  double eta5= 0.2680804036458333E2*eta*eta*eta*eta*eta*eta*eta+0.1148916015625E2*eta*eta*eta*eta*eta*eta-0.4103271484375E2*eta*eta*eta*eta*eta-0.1758544921875E2*eta*eta*eta*eta+0.1450380859375E2*eta*eta*eta+0.621591796875E1*eta*eta-0.2791341145833333*eta-0.11962890625;
293  double eta6= -0.8936013454861111E1*eta*eta*eta*eta*eta*eta*eta-0.6382866753472222E1*eta*eta*eta*eta*eta*eta+0.1075968967013889E2*eta*eta*eta*eta*eta+0.7685492621527778E1*eta*eta*eta*eta-0.1857172309027778E1*eta*eta*eta-0.1326551649305556E1*eta*eta+0.3349609375E-1*eta+0.2392578125E-1;
294  double eta7= 0.1276573350694444E1*eta*eta*eta*eta*eta*eta*eta+0.1276573350694444E1*eta*eta*eta*eta*eta*eta-0.9118381076388889*eta*eta*eta*eta*eta-0.9118381076388889*eta*eta*eta*eta+0.1377061631944444*eta*eta*eta+0.1377061631944444*eta*eta-0.244140625E-2*eta-0.244140625E-2;
295 
296 
297  values[0] = xi0*eta0;
298  values[1] = xi1*eta0;
299  values[2] = xi2*eta0;
300  values[3] = xi3*eta0;
301  values[4] = xi4*eta0;
302  values[5] = xi5*eta0;
303  values[6] = xi6*eta0;
304  values[7] = xi7*eta0;
305  values[8] = xi0*eta1;
306  values[9] = xi1*eta1;
307  values[10] = xi2*eta1;
308  values[11] = xi3*eta1;
309  values[12] = xi4*eta1;
310  values[13] = xi5*eta1;
311  values[14] = xi6*eta1;
312  values[15] = xi7*eta1;
313  values[16] = xi0*eta2;
314  values[17] = xi1*eta2;
315  values[18] = xi2*eta2;
316  values[19] = xi3*eta2;
317  values[20] = xi4*eta2;
318  values[21] = xi5*eta2;
319  values[22] = xi6*eta2;
320  values[23] = xi7*eta2;
321  values[24] = xi0*eta3;
322  values[25] = xi1*eta3;
323  values[26] = xi2*eta3;
324  values[27] = xi3*eta3;
325  values[28] = xi4*eta3;
326  values[29] = xi5*eta3;
327  values[30] = xi6*eta3;
328  values[31] = xi7*eta3;
329  values[32] = xi0*eta4;
330  values[33] = xi1*eta4;
331  values[34] = xi2*eta4;
332  values[35] = xi3*eta4;
333  values[36] = xi4*eta4;
334  values[37] = xi5*eta4;
335  values[38] = xi6*eta4;
336  values[39] = xi7*eta4;
337  values[40] = xi0*eta5;
338  values[41] = xi1*eta5;
339  values[42] = xi2*eta5;
340  values[43] = xi3*eta5;
341  values[44] = xi4*eta5;
342  values[45] = xi5*eta5;
343  values[46] = xi6*eta5;
344  values[47] = xi7*eta5;
345  values[48] = xi0*eta6;
346  values[49] = xi1*eta6;
347  values[50] = xi2*eta6;
348  values[51] = xi3*eta6;
349  values[52] = xi4*eta6;
350  values[53] = xi5*eta6;
351  values[54] = xi6*eta6;
352  values[55] = xi7*eta6;
353  values[56] = xi0*eta7;
354  values[57] = xi1*eta7;
355  values[58] = xi2*eta7;
356  values[59] = xi3*eta7;
357  values[60] = xi4*eta7;
358  values[61] = xi5*eta7;
359  values[62] = xi6*eta7;
360  values[63] = xi7*eta7;
361 }
362 
363 // values of the derivatives in xi-eta direction
364 static void C_Q_Q7_2D_DeriveXiEta(double xi, double eta, double *values)
365 {
366 
367  double xi0= -0.8936013454861111E1*xi*xi*xi*xi*xi*xi+0.7659440104166667E1*xi*xi*xi*xi*xi+0.4559190538194444E1*xi*xi*xi*xi-0.3647352430555556E1*xi*xi*xi-0.4131184895833333*xi*xi+0.2754123263888889*xi+0.244140625E-2;
368  double xi1= 0.6255209418402778E2*xi*xi*xi*xi*xi*xi-0.3829720052083333E2*xi*xi*xi*xi*xi-0.5379844835069444E2*xi*xi*xi*xi+0.3074197048611111E2*xi*xi*xi+0.5571516927083333E1*xi*xi-0.2653103298611111E1*xi-0.3349609375E-1;
369  double xi2= -0.1876562825520833E3*xi*xi*xi*xi*xi*xi+0.689349609375E2*xi*xi*xi*xi*xi+0.20516357421875E3*xi*xi*xi*xi-0.70341796875E2*xi*xi*xi-0.4351142578125E2*xi*xi+0.124318359375E2*xi+0.2791341145833333;
370  double xi3= 0.3127604709201389E3*xi*xi*xi*xi*xi*xi-0.3829720052083333E2*xi*xi*xi*xi*xi-0.3784128146701389E3*xi*xi*xi*xi+0.4324717881944444E2*xi*xi*xi+0.1055685221354167E3*xi*xi-0.1005414496527778E2*xi-0.418701171875E1;
371  double xi4= -0.3127604709201389E3*xi*xi*xi*xi*xi*xi-0.3829720052083333E2*xi*xi*xi*xi*xi+0.3784128146701389E3*xi*xi*xi*xi+0.4324717881944444E2*xi*xi*xi-0.1055685221354167E3*xi*xi-0.1005414496527778E2*xi+0.418701171875E1;
372  double xi5= 0.1876562825520833E3*xi*xi*xi*xi*xi*xi+0.689349609375E2*xi*xi*xi*xi*xi-0.20516357421875E3*xi*xi*xi*xi-0.70341796875E2*xi*xi*xi+0.4351142578125E2*xi*xi+0.124318359375E2*xi-0.2791341145833333;
373  double xi6= -0.6255209418402778E2*xi*xi*xi*xi*xi*xi-0.3829720052083333E2*xi*xi*xi*xi*xi+0.5379844835069444E2*xi*xi*xi*xi+0.3074197048611111E2*xi*xi*xi-0.5571516927083333E1*xi*xi-0.2653103298611111E1*xi+0.3349609375E-1;
374  double xi7= 0.8936013454861111E1*xi*xi*xi*xi*xi*xi+0.7659440104166667E1*xi*xi*xi*xi*xi-0.4559190538194444E1*xi*xi*xi*xi-0.3647352430555556E1*xi*xi*xi+0.4131184895833333*xi*xi+0.2754123263888889*xi-0.244140625E-2;
375 
376  double eta0= -0.8936013454861111E1*eta*eta*eta*eta*eta*eta+0.7659440104166667E1*eta*eta*eta*eta*eta+0.4559190538194444E1*eta*eta*eta*eta-0.3647352430555556E1*eta*eta*eta-0.4131184895833333*eta*eta+0.2754123263888889*eta+0.244140625E-2;
377  double eta1= 0.6255209418402778E2*eta*eta*eta*eta*eta*eta-0.3829720052083333E2*eta*eta*eta*eta*eta-0.5379844835069444E2*eta*eta*eta*eta+0.3074197048611111E2*eta*eta*eta+0.5571516927083333E1*eta*eta-0.2653103298611111E1*eta-0.3349609375E-1;
378  double eta2= -0.1876562825520833E3*eta*eta*eta*eta*eta*eta+0.689349609375E2*eta*eta*eta*eta*eta+0.20516357421875E3*eta*eta*eta*eta-0.70341796875E2*eta*eta*eta-0.4351142578125E2*eta*eta+0.124318359375E2*eta+0.2791341145833333;
379  double eta3= 0.3127604709201389E3*eta*eta*eta*eta*eta*eta-0.3829720052083333E2*eta*eta*eta*eta*eta-0.3784128146701389E3*eta*eta*eta*eta+0.4324717881944444E2*eta*eta*eta+0.1055685221354167E3*eta*eta-0.1005414496527778E2*eta-0.418701171875E1;
380  double eta4= -0.3127604709201389E3*eta*eta*eta*eta*eta*eta-0.3829720052083333E2*eta*eta*eta*eta*eta+0.3784128146701389E3*eta*eta*eta*eta+0.4324717881944444E2*eta*eta*eta-0.1055685221354167E3*eta*eta-0.1005414496527778E2*eta+0.418701171875E1;
381  double eta5= 0.1876562825520833E3*eta*eta*eta*eta*eta*eta+0.689349609375E2*eta*eta*eta*eta*eta-0.20516357421875E3*eta*eta*eta*eta-0.70341796875E2*eta*eta*eta+0.4351142578125E2*eta*eta+0.124318359375E2*eta-0.2791341145833333;
382  double eta6= -0.6255209418402778E2*eta*eta*eta*eta*eta*eta-0.3829720052083333E2*eta*eta*eta*eta*eta+0.5379844835069444E2*eta*eta*eta*eta+0.3074197048611111E2*eta*eta*eta-0.5571516927083333E1*eta*eta-0.2653103298611111E1*eta+0.3349609375E-1;
383  double eta7= 0.8936013454861111E1*eta*eta*eta*eta*eta*eta+0.7659440104166667E1*eta*eta*eta*eta*eta-0.4559190538194444E1*eta*eta*eta*eta-0.3647352430555556E1*eta*eta*eta+0.4131184895833333*eta*eta+0.2754123263888889*eta-0.244140625E-2;
384 
385 
386  values[0] = xi0*eta0;
387  values[1] = xi1*eta0;
388  values[2] = xi2*eta0;
389  values[3] = xi3*eta0;
390  values[4] = xi4*eta0;
391  values[5] = xi5*eta0;
392  values[6] = xi6*eta0;
393  values[7] = xi7*eta0;
394  values[8] = xi0*eta1;
395  values[9] = xi1*eta1;
396  values[10] = xi2*eta1;
397  values[11] = xi3*eta1;
398  values[12] = xi4*eta1;
399  values[13] = xi5*eta1;
400  values[14] = xi6*eta1;
401  values[15] = xi7*eta1;
402  values[16] = xi0*eta2;
403  values[17] = xi1*eta2;
404  values[18] = xi2*eta2;
405  values[19] = xi3*eta2;
406  values[20] = xi4*eta2;
407  values[21] = xi5*eta2;
408  values[22] = xi6*eta2;
409  values[23] = xi7*eta2;
410  values[24] = xi0*eta3;
411  values[25] = xi1*eta3;
412  values[26] = xi2*eta3;
413  values[27] = xi3*eta3;
414  values[28] = xi4*eta3;
415  values[29] = xi5*eta3;
416  values[30] = xi6*eta3;
417  values[31] = xi7*eta3;
418  values[32] = xi0*eta4;
419  values[33] = xi1*eta4;
420  values[34] = xi2*eta4;
421  values[35] = xi3*eta4;
422  values[36] = xi4*eta4;
423  values[37] = xi5*eta4;
424  values[38] = xi6*eta4;
425  values[39] = xi7*eta4;
426  values[40] = xi0*eta5;
427  values[41] = xi1*eta5;
428  values[42] = xi2*eta5;
429  values[43] = xi3*eta5;
430  values[44] = xi4*eta5;
431  values[45] = xi5*eta5;
432  values[46] = xi6*eta5;
433  values[47] = xi7*eta5;
434  values[48] = xi0*eta6;
435  values[49] = xi1*eta6;
436  values[50] = xi2*eta6;
437  values[51] = xi3*eta6;
438  values[52] = xi4*eta6;
439  values[53] = xi5*eta6;
440  values[54] = xi6*eta6;
441  values[55] = xi7*eta6;
442  values[56] = xi0*eta7;
443  values[57] = xi1*eta7;
444  values[58] = xi2*eta7;
445  values[59] = xi3*eta7;
446  values[60] = xi4*eta7;
447  values[61] = xi5*eta7;
448  values[62] = xi6*eta7;
449  values[63] = xi7*eta7;
450 }
451 
452 // values of the derivatives in eta-eta direction
453 static void C_Q_Q7_2D_DeriveEtaEta(double xi, double eta, double *values)
454 {
455 
456  double xi0= -0.1276573350694444E1*xi*xi*xi*xi*xi*xi*xi+0.1276573350694444E1*xi*xi*xi*xi*xi*xi+0.9118381076388889*xi*xi*xi*xi*xi-0.9118381076388889*xi*xi*xi*xi-0.1377061631944444*xi*xi*xi+0.1377061631944444*xi*xi+0.244140625E-2*xi-0.244140625E-2;
457  double xi1= 0.8936013454861111E1*xi*xi*xi*xi*xi*xi*xi-0.6382866753472222E1*xi*xi*xi*xi*xi*xi-0.1075968967013889E2*xi*xi*xi*xi*xi+0.7685492621527778E1*xi*xi*xi*xi+0.1857172309027778E1*xi*xi*xi-0.1326551649305556E1*xi*xi-0.3349609375E-1*xi+0.2392578125E-1;
458  double xi2= -0.2680804036458333E2*xi*xi*xi*xi*xi*xi*xi+0.1148916015625E2*xi*xi*xi*xi*xi*xi+0.4103271484375E2*xi*xi*xi*xi*xi-0.1758544921875E2*xi*xi*xi*xi-0.1450380859375E2*xi*xi*xi+0.621591796875E1*xi*xi+0.2791341145833333*xi-0.11962890625;
459  double xi3= 0.4468006727430556E2*xi*xi*xi*xi*xi*xi*xi-0.6382866753472222E1*xi*xi*xi*xi*xi*xi-0.7568256293402778E2*xi*xi*xi*xi*xi+0.1081179470486111E2*xi*xi*xi*xi+0.3518950737847222E2*xi*xi*xi-0.5027072482638889E1*xi*xi-0.418701171875E1*xi+0.59814453125;
460  double xi4= -0.4468006727430556E2*xi*xi*xi*xi*xi*xi*xi-0.6382866753472222E1*xi*xi*xi*xi*xi*xi+0.7568256293402778E2*xi*xi*xi*xi*xi+0.1081179470486111E2*xi*xi*xi*xi-0.3518950737847222E2*xi*xi*xi-0.5027072482638889E1*xi*xi+0.418701171875E1*xi+0.59814453125;
461  double xi5= 0.2680804036458333E2*xi*xi*xi*xi*xi*xi*xi+0.1148916015625E2*xi*xi*xi*xi*xi*xi-0.4103271484375E2*xi*xi*xi*xi*xi-0.1758544921875E2*xi*xi*xi*xi+0.1450380859375E2*xi*xi*xi+0.621591796875E1*xi*xi-0.2791341145833333*xi-0.11962890625;
462  double xi6= -0.8936013454861111E1*xi*xi*xi*xi*xi*xi*xi-0.6382866753472222E1*xi*xi*xi*xi*xi*xi+0.1075968967013889E2*xi*xi*xi*xi*xi+0.7685492621527778E1*xi*xi*xi*xi-0.1857172309027778E1*xi*xi*xi-0.1326551649305556E1*xi*xi+0.3349609375E-1*xi+0.2392578125E-1;
463  double xi7= 0.1276573350694444E1*xi*xi*xi*xi*xi*xi*xi+0.1276573350694444E1*xi*xi*xi*xi*xi*xi-0.9118381076388889*xi*xi*xi*xi*xi-0.9118381076388889*xi*xi*xi*xi+0.1377061631944444*xi*xi*xi+0.1377061631944444*xi*xi-0.244140625E-2*xi-0.244140625E-2;
464 
465  double eta0= -0.5361608072916667E2*eta*eta*eta*eta*eta+0.3829720052083333E2*eta*eta*eta*eta+0.1823676215277778E2*eta*eta*eta-0.1094205729166667E2*eta*eta-0.8262369791666667*eta+0.2754123263888889;
466  double eta1= 0.3753125651041667E3*eta*eta*eta*eta*eta-0.1914860026041667E3*eta*eta*eta*eta-0.2151937934027778E3*eta*eta*eta+0.9222591145833333E2*eta*eta+0.1114303385416667E2*eta-0.2653103298611111E1;
467  double eta2= -0.11259376953125E4*eta*eta*eta*eta*eta+0.3446748046875E3*eta*eta*eta*eta+0.820654296875E3*eta*eta*eta-0.211025390625E3*eta*eta-0.870228515625E2*eta+0.124318359375E2;
468  double eta3= 0.1876562825520833E4*eta*eta*eta*eta*eta-0.1914860026041667E3*eta*eta*eta*eta-0.1513651258680556E4*eta*eta*eta+0.1297415364583333E3*eta*eta+0.2111370442708333E3*eta-0.1005414496527778E2;
469  double eta4= -0.1876562825520833E4*eta*eta*eta*eta*eta-0.1914860026041667E3*eta*eta*eta*eta+0.1513651258680556E4*eta*eta*eta+0.1297415364583333E3*eta*eta-0.2111370442708333E3*eta-0.1005414496527778E2;
470  double eta5= 0.11259376953125E4*eta*eta*eta*eta*eta+0.3446748046875E3*eta*eta*eta*eta-0.820654296875E3*eta*eta*eta-0.211025390625E3*eta*eta+0.870228515625E2*eta+0.124318359375E2;
471  double eta6= -0.3753125651041667E3*eta*eta*eta*eta*eta-0.1914860026041667E3*eta*eta*eta*eta+0.2151937934027778E3*eta*eta*eta+0.9222591145833333E2*eta*eta-0.1114303385416667E2*eta-0.2653103298611111E1;
472  double eta7= 0.5361608072916667E2*eta*eta*eta*eta*eta+0.3829720052083333E2*eta*eta*eta*eta-0.1823676215277778E2*eta*eta*eta-0.1094205729166667E2*eta*eta+0.8262369791666667*eta+0.2754123263888889;
473 
474 
475  values[0] = xi0*eta0;
476  values[1] = xi1*eta0;
477  values[2] = xi2*eta0;
478  values[3] = xi3*eta0;
479  values[4] = xi4*eta0;
480  values[5] = xi5*eta0;
481  values[6] = xi6*eta0;
482  values[7] = xi7*eta0;
483  values[8] = xi0*eta1;
484  values[9] = xi1*eta1;
485  values[10] = xi2*eta1;
486  values[11] = xi3*eta1;
487  values[12] = xi4*eta1;
488  values[13] = xi5*eta1;
489  values[14] = xi6*eta1;
490  values[15] = xi7*eta1;
491  values[16] = xi0*eta2;
492  values[17] = xi1*eta2;
493  values[18] = xi2*eta2;
494  values[19] = xi3*eta2;
495  values[20] = xi4*eta2;
496  values[21] = xi5*eta2;
497  values[22] = xi6*eta2;
498  values[23] = xi7*eta2;
499  values[24] = xi0*eta3;
500  values[25] = xi1*eta3;
501  values[26] = xi2*eta3;
502  values[27] = xi3*eta3;
503  values[28] = xi4*eta3;
504  values[29] = xi5*eta3;
505  values[30] = xi6*eta3;
506  values[31] = xi7*eta3;
507  values[32] = xi0*eta4;
508  values[33] = xi1*eta4;
509  values[34] = xi2*eta4;
510  values[35] = xi3*eta4;
511  values[36] = xi4*eta4;
512  values[37] = xi5*eta4;
513  values[38] = xi6*eta4;
514  values[39] = xi7*eta4;
515  values[40] = xi0*eta5;
516  values[41] = xi1*eta5;
517  values[42] = xi2*eta5;
518  values[43] = xi3*eta5;
519  values[44] = xi4*eta5;
520  values[45] = xi5*eta5;
521  values[46] = xi6*eta5;
522  values[47] = xi7*eta5;
523  values[48] = xi0*eta6;
524  values[49] = xi1*eta6;
525  values[50] = xi2*eta6;
526  values[51] = xi3*eta6;
527  values[52] = xi4*eta6;
528  values[53] = xi5*eta6;
529  values[54] = xi6*eta6;
530  values[55] = xi7*eta6;
531  values[56] = xi0*eta7;
532  values[57] = xi1*eta7;
533  values[58] = xi2*eta7;
534  values[59] = xi3*eta7;
535  values[60] = xi4*eta7;
536  values[61] = xi5*eta7;
537  values[62] = xi6*eta7;
538  values[63] = xi7*eta7;
539 }
540 
541 
542 // ***********************************************************************
543 
544 TBaseFunct2D *BF_C_Q_Q7_2D_Obj = new TBaseFunct2D
545  (64, BF_C_Q_Q7_2D, BFUnitSquare,
546  C_Q_Q7_2D_Funct, C_Q_Q7_2D_DeriveXi,
547  C_Q_Q7_2D_DeriveEta, C_Q_Q7_2D_DeriveXiXi,
548  C_Q_Q7_2D_DeriveXiEta, C_Q_Q7_2D_DeriveEtaEta, 7, 7,
549  0, NULL);
Definition: BaseFunct2D.h:27