ParMooN
 All Classes Functions Variables Friends Pages
BF_N_H_BDDF3_3D.h
1 // ***********************************************************************
2 // Brezzi-Douglas-Duran-Fortin element of third order on hexahedra, 3D
3 // ***********************************************************************
4 
5 static double N_H_BDDF3_3D_CM[5184] = {
6  0.0592236664,-0.0659886177,-0.0929351041,0.0115484942,0.0929351041,0.0384949805,-0.0047835429,0,-0.0384949805,0,0.0047835429,-0,-0.0115484942,0,0,0.0115484942,0,-0,-0,-0.0047835429,0.2133883476,-0.3642766953,-0.3642766953,0.1508883476,0.5151650429,0.1508883476,-0.0377220869,-0.1444162607,-0.1444162607,-0.0377220869,0.0047835429,-0,-0.0115484942,-0,0,0.0115484942,0,-0,-0,-0.0047835429,-0.2133883476,0.3642766953,0.3642766953,-0.1508883476,-0.5151650429,-0.1508883476,0.0377220869,0.1444162607,0.1444162607,0.0377220869,0.0592236664,-0.0929351041,-0.0659886177,0.0384949805,0.0929351041,0.0115484942,-0,-0.0384949805,-0,-0.0047835429,0.1875,-0,-0,-0,0,-0,-0,-0,0,-0,-0,-0,
7  0.0047835429,-0,-0.0115484942,0,0,0.0115484942,-0,-0,-0,-0.0047835429,-0.2133883476,0.3642766953,0.3642766953,-0.1508883476,-0.5151650429,-0.1508883476,0.0377220869,0.1444162607,0.1444162607,0.0377220869,0.0592236664,-0.0929351041,-0.0659886177,0.0384949805,0.0929351041,0.0115484942,0,-0.0384949805,-0,-0.0047835429,0.2133883476,-0.3642766953,-0.3642766953,0.1508883476,0.5151650429,0.1508883476,-0.0377220869,-0.1444162607,-0.1444162607,-0.0377220869,0.0592236664,-0.0659886177,-0.0929351041,0.0115484942,0.0929351041,0.0384949805,-0.0047835429,-0,-0.0384949805,0,0.0047835429,-0.0115484942,-0,0.0115484942,-0,-0,-0.0047835429,0,0,-0,0,0,-0,-0,0.1875,-0,-0,-0,0,0,-0,-0,
8  -0.2133883476,0.3642766953,0.3642766953,-0.1508883476,-0.5151650429,-0.1508883476,0.0377220869,0.1444162607,0.1444162607,0.0377220869,0.0592236664,-0.0659886177,-0.0929351041,0.0115484942,0.0929351041,0.0384949805,-0.0047835429,0,-0.0384949805,0,0.0047835429,-0.0115484942,-0,0.0115484942,0,0,-0.0047835429,-0,-0,-0,0.0592236664,-0.0659886177,-0.0929351041,0.0115484942,0.0929351041,0.0384949805,-0.0047835429,0,-0.0384949805,0,0.0047835429,-0,-0.0115484942,0,0,0.0115484942,-0,-0,-0,-0.0047835429,0.2133883476,-0.3642766953,-0.3642766953,0.1508883476,0.5151650429,0.1508883476,-0.0377220869,-0.1444162607,-0.1444162607,-0.0377220869,-0,-0,-0,-0,0,-0,0,-0,0.1875,-0,0,-0,
9  -0,0,-0,-0,0,0,0,0,-0,0,-0,0,0,-0,-0,-0,-0,0,0,0,0.3556472461,-0.6071278255,-0.6071278255,0.2514805794,0.8586084049,0.2514805794,-0.0542406956,-0.2909898838,-0.2909898838,-0.0542406956,-0,-0,0,0,-0,-0,-0,-0,0,0,0.3556472461,-0.6071278255,-0.6071278255,0.2514805794,0.8586084049,0.2514805794,-0.0542406956,-0.2909898838,-0.2909898838,-0.0542406956,-0,-0,0,0,0,-0,-0,-0,0,0,-0,0.9375,0,0,-0,0,0,0,-0,0,0,0,
10  0,-0,-0,0,0,0,0,-0,-0,-0,-0.3001612773,0.3773778756,0.4697658289,-0.1563150342,-0.5167805317,-0.2487029875,-0,0.1563150342,0.1394026561,0.0790984359,0,-0,-0,0,0,0,0,-0,-0,-0,0.3001612773,-0.3773778756,-0.4697658289,0.1563150342,0.5167805317,0.2487029875,-0,-0.1563150342,-0.1394026561,-0.0790984359,0,-0,-0,0,0,0,-0,-0,-0,-0,0,-0,0,0,-0,-0,-0,0,0,0,0,0,-0,-0,0,0.5625,-0,-0,0,-0,-0,-0,
11  -0.3001612773,0.4697658289,0.3773778756,-0.2487029875,-0.5167805317,-0.1563150342,0.0790984359,0.1394026561,0.1563150342,-0,-0,0,0,-0,-0,-0,0,0,0,-0,-0,0,0,-0,-0,-0,0,0,0,0,-0,0,0,-0,-0,-0,0,0,0,-0,-0,0,0,-0,-0,-0,0,0,0,0,0.3001612773,-0.3773778756,-0.4697658289,0.1563150342,0.5167805317,0.2487029875,-0,-0.1563150342,-0.1394026561,-0.0790984359,0,0,-0,0,0,0,-0,0,-0,0.5625,-0,-0,
12  0,-0,-0,-0,0,0,0,0,-0,-0,-0,-0,0,0,0,-0,0,-0,-0,0,0.3001612773,-0.3773778756,-0.4697658289,0.1563150342,0.5167805317,0.2487029875,0,-0.1563150342,-0.1394026561,-0.0790984359,-0,-0,0,0,0,-0,0,-0,-0,0,-0.3001612773,0.4697658289,0.3773778756,-0.2487029875,-0.5167805317,-0.1563150342,0.0790984359,0.1394026561,0.1563150342,0,0,-0,-0,0,0,-0,-0,-0,0,0,0,-0,0.5625,0,0,0,0,0,0,-0,-0,-0,
13  0,-0,-0,0,0,0,-0,-0,-0,-0,0.3556472461,-0.6071278256,-0.6071278256,0.2514805795,0.8586084051,0.2514805795,-0.0542406956,-0.2909898838,-0.2909898838,-0.0542406956,0,-0,-0,0,0,0,-0,-0,-0,-0,0.3556472461,-0.6071278256,-0.6071278256,0.2514805795,0.8586084051,0.2514805795,-0.0542406956,-0.2909898838,-0.2909898838,-0.0542406956,0,-0,-0,0,0,0,-0,-0,-0,0,0,-0,0,0,-0,-0,-0,0,0,0,0,0,-0,-0,0,-0,0.9375000002,-0,0,-0,-0,-0,
14  -0.3001612773,0.3773778756,0.4697658289,-0.1563150342,-0.5167805317,-0.2487029875,0,0.1563150342,0.1394026561,0.0790984359,0,-0,-0,0,0,0,-0,-0,-0,0,0,-0,-0,0,0,0,-0,-0,-0,0,0,-0,-0,0,0,0,-0,-0,-0,0,0,-0,-0,0,0,0,-0,-0,-0,-0,0.3001612773,-0.4697658289,-0.3773778756,0.2487029875,0.5167805317,0.1563150342,-0.0790984359,-0.1394026561,-0.1563150342,-0,0,-0,-0,-0,-0,-0,0,-0,0,-0,0.5625,-0,
15  -0,0,0,-0,-0,-0,0,-0,0,0,-0,0,0,-0,-0,-0,-0,0,0,0,0.3001612773,-0.4697658289,-0.3773778756,0.2487029875,0.5167805317,0.1563150342,-0.0790984359,-0.1394026561,-0.1563150342,0,-0,0,0,-0,-0,-0,-0,0,0,0,-0.3001612773,0.3773778756,0.4697658289,-0.1563150342,-0.5167805317,-0.2487029875,-0,0.1563150342,0.1394026561,0.0790984359,-0,0,0,-0,-0,-0,0,0,-0,0,-0,0,0,0.5625,0,0,0,0,-0,0,0,0,
16  -0,0,0,-0,-0,-0,-0,0,0,0,-0.3001612773,0.4697658289,0.3773778756,-0.2487029875,-0.5167805317,-0.1563150342,0.0790984359,0.1394026561,0.1563150342,-0,0,-0,-0,-0,0,0,0,0,-0,0,0.3001612773,-0.4697658289,-0.3773778756,0.2487029875,0.5167805317,0.1563150342,-0.0790984359,-0.1394026561,-0.1563150342,0,0,-0,-0,0,0,-0,0,-0,0,0,-0,0,-0,-0,0,0,0,-0,-0,-0,0,0,-0,0,-0,0,0,0.5625,0,0,0,0,
17  0.3556472461,-0.6071278256,-0.6071278256,0.2514805795,0.8586084051,0.2514805795,-0.0542406956,-0.2909898838,-0.2909898838,-0.0542406956,0,-0,-0,0,0,0,-0,-0,-0,0,0,-0,-0,0,0,0,-0,-0,-0,0,0,-0,-0,0,0,0,-0,-0,-0,0,0,-0,-0,0,0,0,-0,-0,-0,-0,0.3556472461,-0.6071278256,-0.6071278256,0.2514805795,0.8586084051,0.2514805795,-0.0542406956,-0.2909898838,-0.2909898838,-0.0542406956,0,-0,0,-0,0,-0,0,-0,0,0,-0,0.9375000002,
18  -0.083141381,0.1237310885,0.0929351041,-0.0692909649,-0.0929351041,-0.0384949805,0.0287012574,-0,0.0384949805,0,-0.0287012574,0,0.0692909649,-0,-0,-0.0692909649,0,0,0,0.0287012574,-0.2133883476,0.3642766953,0.3642766953,-0.1508883476,-0.5151650429,-0.1508883476,0.0247779131,0.2198604346,0.2198604346,0.0247779131,-0.0287012574,0,0.0692909649,0,-0,-0.0692909649,-0,-0,0,0.0287012574,0.2133883476,-0.3642766953,-0.3642766953,0.1508883476,0.5151650429,0.1508883476,-0.0247779131,-0.2198604346,-0.2198604346,-0.0247779131,-0.083141381,0.0929351041,0.1237310885,-0.0384949805,-0.0929351041,-0.0692909649,0,0.0384949805,0,0.0287012574,-0.1875,0,-0,0,0,0,0,0,-0,0,0,0,
19  -0,0,0,-0,-0,-0,0,0,0,0,0.2133883476,-0.3017766953,-0.4267766953,-0,0.5151650429,0.3017766953,-0,0,-0.2133883476,-0.0883883476,-0,0,0,-0,-0,-0,-0,0,0,0,-0.2133883476,0.3017766953,0.4267766953,0,-0.5151650429,-0.3017766953,-0,-0,0.2133883476,0.0883883476,-0,0,0,-0,-0,-0,0,0,0,-0,-0,0,-0,-0,0,0,0,-0,-0,-0,0,-0,0,0,-0,0,0,0,0,0,0,0,
20  0.2133883476,-0.4267766953,-0.3017766953,0.3017766953,0.5151650429,-0,-0.0883883476,-0.2133883476,0,-0,-0.1633203706,0.1633203706,0.2788053122,-0,-0.2788053122,-0.1154849416,-0,0,0.1154849416,-0,-0,0,0,-0,-0,-0,-0,0,0,0,-0.1633203706,0.1633203706,0.2788053122,0,-0.2788053122,-0.1154849416,-0,0,0.1154849416,0,-0,0,0,-0,-0,-0,0,0,0,-0,-0.2133883476,0.3017766953,0.4267766953,-0,-0.5151650429,-0.3017766953,0,0,0.2133883476,0.0883883476,-0,0,-0,0,-0,0,-0,0,-0,-0,-0,0,
21  -0.1088802471,0.1858702081,0.1088802471,-0.076989961,-0.1858702081,0,0,0.076989961,-0,0,-0,0,0,-0,-0,-0,0,0,0,-0,-0.1014742688,0.1971451269,0.1971451269,-0.0816601853,-0.475950439,-0.0816601853,0,0.0816601853,0.2788053122,-0.0140106728,-0,0,0,-0,-0,-0,0,0,0,-0,-0.1014742688,0.1971451269,0.1971451269,-0.0816601853,-0.475950439,-0.0816601853,-0.0140106728,0.2788053122,0.0816601853,-0,-0.1088802471,0.1088802471,0.1858702081,-0,-0.1858702081,-0.076989961,0,0,0.076989961,-0,0,-0,0,0,-0,0,-0,0,-0,0,0,0,
22  -0,0,0,-0,-0,-0,0,0,0,0,-0.1014742688,0.1971451269,0.1971451269,-0.0816601853,-0.475950439,-0.0816601853,-0,0.0816601853,0.2788053122,-0.0140106728,-0,0,0,-0,-0,-0,0,0,0,0,-0.1014742688,0.1971451269,0.1971451269,-0.0816601853,-0.475950439,-0.0816601853,0,0.0816601853,0.2788053122,-0.0140106728,-0,0,0,-0,-0,-0,0,0,0,-0,-0,0,0,-0,0,-0,0,-0,0,-0,0,0,-0,0,-0,0,0,0,0,-0,0,0,
23  0.4267766953,-0.7285533906,-0.7285533906,0.3017766953,1.030330086,0.3017766953,0,-0.3017766953,-0.3017766953,0,-0,0,0,0,-0,-0,-0,0,0,0,0,-0,-0,0,0,0,-0,-0,-0,0,-0,0,0,0,-0,-0,-0,0,0,-0,0,-0,-0,0,0,0,0,-0,0,-0,-0.4267766953,0.7285533906,0.7285533906,-0.3017766953,-1.030330086,-0.3017766953,0,0.3017766953,0.3017766953,0,-0,0,0,0,0,0,-0,0,0,0,-0,0,
24  0,-0,-0,0,0,0,0,-0,-0,0,0,-0,-0,0,0,0,-0,-0,-0,0,-0.1014742688,0.1971451269,0.1971451269,-0.0816601853,-0.475950439,-0.0816601853,-0.0140106728,0.2788053122,0.0816601853,0,0,-0,-0,0,0,0,-0,-0,-0,0,-0.1014742688,0.1971451269,0.1971451269,-0.0816601853,-0.475950439,-0.0816601853,-0,0.0816601853,0.2788053122,-0.0140106728,0,-0,-0,0,0,0,-0,-0,-0,0,0,-0,0,0,0,-0,0,-0,0,-0,-0,-0,
25  -0,0,0,-0,-0,-0,0,0,0,0,0.4267766953,-0.7285533906,-0.7285533906,0.3017766953,1.030330086,0.3017766953,-0,-0.3017766953,-0.3017766953,-0,-0,-0,0,0,0,-0,-0,-0,0,0,-0.4267766953,0.7285533906,0.7285533906,-0.3017766953,-1.030330086,-0.3017766953,0,0.3017766953,0.3017766953,-0,-0,0,-0,-0,0,0,0,0,-0,0,-0,0,-0,-0,0,0,0,-0,-0,-0,0,-0,0,-0,0,0,0,0,0,0,0,0,
26  -0.1014742688,0.1971451269,0.1971451269,-0.0816601853,-0.475950439,-0.0816601853,-0.0140106728,0.2788053122,0.0816601853,-0,-0.1088802471,0.1858702081,0.1088802471,-0.076989961,-0.1858702081,-0,-0,0.076989961,0,0,-0,0,0,-0,-0,-0,0,0,-0,0,-0.1088802471,0.1858702081,0.1088802471,-0.076989961,-0.1858702081,-0,0,0.076989961,0,0,-0,0,0,-0,-0,-0,0,-0,0,0,-0.1014742688,0.1971451269,0.1971451269,-0.0816601853,-0.475950439,-0.0816601853,0,0.0816601853,0.2788053122,-0.0140106728,0,0,-0,0,-0,0,-0,0,-0,0,-0,-0,
27  -0.1633203706,0.1633203706,0.2788053122,-0,-0.2788053122,-0.1154849416,-0,0,0.1154849416,0,-0,0,0,-0,-0,-0,-0,0,0,0,-0.2133883476,0.3017766953,0.4267766953,0,-0.5151650429,-0.3017766953,-0,-0,0.2133883476,0.0883883476,-0,0,0,-0,-0,-0,-0,0,0,-0,0.2133883476,-0.4267766953,-0.3017766953,0.3017766953,0.5151650429,0,-0.0883883476,-0.2133883476,-0,-0,-0.1633203706,0.2788053122,0.1633203706,-0.1154849416,-0.2788053122,-0,0,0.1154849416,0,0,-0,0,-0,0,0,0,-0,0,-0,0,0,0,
28  -0.0287012574,0,0.0692909649,-0,-0,-0.0692909649,-0,0,0,0.0287012574,0.2133883476,-0.3642766953,-0.3642766953,0.1508883476,0.5151650429,0.1508883476,-0.0247779131,-0.2198604346,-0.2198604346,-0.0247779131,-0.083141381,0.0929351041,0.1237310885,-0.0384949805,-0.0929351041,-0.0692909649,-0,0.0384949805,0,0.0287012574,-0.2133883476,0.3642766953,0.3642766953,-0.1508883476,-0.5151650429,-0.1508883476,0.0247779131,0.2198604346,0.2198604346,0.0247779131,-0.083141381,0.1237310885,0.0929351041,-0.0692909649,-0.0929351041,-0.0384949805,0.0287012574,0,0.0384949805,-0,-0.0287012574,0.0692909649,-0,-0.0692909649,0,-0,0.0287012574,-0,0,-0,0,-0,0,0,-0.1875,0,0,0,0,-0,0,0,
29  0.2133883476,-0.3017766953,-0.4267766953,-0,0.5151650429,0.3017766953,0,0,-0.2133883476,-0.0883883476,-0,0,0,0,-0,-0,-0,0,0,0,0,-0,-0,0,0,0,-0,-0,-0,0,-0,0,0,0,-0,-0,-0,0,0,0,0,-0,-0,0,0,0,0,-0,0,-0,-0.2133883476,0.4267766953,0.3017766953,-0.3017766953,-0.5151650429,-0,0.0883883476,0.2133883476,0,-0,0,-0,0,-0,0,0,-0,0,0,0,-0,0,
30  -0,0,0,-0,-0,-0,0,0,0,0,-0,0,0,-0,-0,-0,0,0,0,-0,-0.4267766953,0.7285533906,0.7285533906,-0.3017766953,-1.030330086,-0.3017766953,-0,0.3017766953,0.3017766953,-0,-0,0,0,-0,-0,-0,0,0,0,-0,0.4267766953,-0.7285533906,-0.7285533906,0.3017766953,1.030330086,0.3017766953,-0,-0.3017766953,-0.3017766953,0,-0,0,0,-0,-0,-0,0,0,0,0,-0,0,-0,0,0,0,-0,0,0,0,0,0,
31  -0,0,0,-0,-0,-0,0,0,0,0,-0.1014742688,0.1971451269,0.1971451269,-0.0816601853,-0.475950439,-0.0816601853,-0.0140106728,0.2788053122,0.0816601853,-0,-0.1088802471,0.1088802471,0.1858702081,-0,-0.1858702081,-0.076989961,0,0,0.076989961,0,-0.1014742688,0.1971451269,0.1971451269,-0.0816601853,-0.475950439,-0.0816601853,-0.0140106728,0.2788053122,0.0816601853,-0,-0.1088802471,0.1858702081,0.1088802471,-0.076989961,-0.1858702081,-0,0,0.076989961,0,-0,-0,0,-0,-0,0,0,0,-0,-0,-0,0,-0,0,0,-0,0,-0,0,0,0,0,0,
32  -0.1014742688,0.1971451269,0.1971451269,-0.0816601853,-0.475950439,-0.0816601853,0,0.0816601853,0.2788053122,-0.0140106728,-0,0,0,-0,-0,-0,0,0,0,-0,-0,0,0,-0,-0,-0,0,0,0,0,-0,0,0,-0,-0,-0,0,0,0,0,-0,0,0,-0,-0,-0,0,0,0,0,-0.1014742688,0.1971451269,0.1971451269,-0.0816601853,-0.475950439,-0.0816601853,-0.0140106728,0.2788053122,0.0816601853,0,0,0,-0,0,0,0,-0,0,0,0,0,-0,
33  -0,0,0,-0,-0,-0,0,0,0,-0,-0,0,0,-0,-0,-0,0,0,0,-0,-0.2133883476,0.4267766953,0.3017766953,-0.3017766953,-0.5151650429,0,0.0883883476,0.2133883476,-0,-0,-0,0,0,-0,-0,-0,0,0,0,-0,0.2133883476,-0.3017766953,-0.4267766953,0,0.5151650429,0.3017766953,-0,-0,-0.2133883476,-0.0883883476,-0,0,0,-0,-0,-0,0,0,0,0,-0,0,-0,-0,0,0,0,0,-0,0,0,0,
34  -0,0,0,-0,-0,-0,0,0,0,0,0.2133883476,-0.4267766953,-0.3017766953,0.3017766953,0.5151650429,-0,-0.0883883476,-0.2133883476,0,0,-0.1633203706,0.2788053122,0.1633203706,-0.1154849416,-0.2788053122,-0,0,0.1154849416,0,0,-0.2133883476,0.4267766953,0.3017766953,-0.3017766953,-0.5151650429,-0,0.0883883476,0.2133883476,0,0,-0.1633203706,0.1633203706,0.2788053122,-0,-0.2788053122,-0.1154849416,0,0,0.1154849416,-0,-0,0,-0,-0,0,-0,0,-0,-0,0,-0,0,-0,0,0,0,0,0,0,-0,0,0,
35  0.2133883476,-0.3642766953,-0.3642766953,0.1508883476,0.5151650429,0.1508883476,-0.0247779131,-0.2198604346,-0.2198604346,-0.0247779131,-0.083141381,0.1237310885,0.0929351041,-0.0692909649,-0.0929351041,-0.0384949805,0.0287012574,-0,0.0384949805,0,-0.0287012574,0.0692909649,0,-0.0692909649,-0,-0,0.0287012574,0,0,-0,-0.083141381,0.1237310885,0.0929351041,-0.0692909649,-0.0929351041,-0.0384949805,0.0287012574,-0,0.0384949805,-0,-0.0287012574,0,0.0692909649,-0,-0,-0.0692909649,0,0,0,0.0287012574,-0.2133883476,0.3642766953,0.3642766953,-0.1508883476,-0.5151650429,-0.1508883476,0.0247779131,0.2198604346,0.2198604346,0.0247779131,0,0,0,0,-0,0,-0,0,-0.1875,0,-0,0,
36  0,-0,0,0,0,-0,-0,-0,0,0,0,-0,-0,0,0,0,-0,-0,-0,-0,-0.3556472461,0.6071278255,0.6071278255,-0.2514805794,-0.8586084049,-0.2514805794,0.0412965218,0.3664340576,0.3664340576,0.0412965218,0,0,-0,-0,0,0,0,0,-0,-0,-0.3556472461,0.6071278255,0.6071278255,-0.2514805794,-0.8586084049,-0.2514805794,0.0412965218,0.3664340576,0.3664340576,0.0412965218,0,0,-0,-0,0,0,0,0,-0,-0,0,-0.9375,-0,-0,0,-0,-0,-0,0,-0,-0,-0,
37  -0,0,0,-0,-0,-0,0,0,0,0,0.0956708581,0,-0.2309698831,-0,-0,0.2309698831,0,0,0,-0.0956708581,-0,0,0,-0,-0,-0,0,0,-0,0,-0.0956708581,-0,0.2309698831,0,0,-0.2309698831,-0,-0,-0,0.0956708581,-0,0,0,-0,-0,-0,0,-0,0,-0,-0,0,-0,-0,0,-0,0,-0,0,-0,-0,0,-0,0,0,-0,0,0,0,-0,0,0,
38  0.0956708581,-0.2309698831,0,0.2309698831,-0,0,-0.0956708581,0,-0,-0,-0,0,0,-0,-0,-0,0,0,0,0,-0,0,0,-0,-0,-0,0,0,0,0,-0,0,0,-0,-0,-0,0,0,0,-0,-0,0,0,-0,-0,-0,0,0,0,0,-0.0956708581,0,0.2309698831,-0,-0,-0.2309698831,0,0,0,0.0956708581,0,0,0,0,0,0,-0,0,0,0,-0,0,
39  -0,0,0,-0,-0,-0,-0,0,0,0,0,0,-0,-0,-0,0,-0,0,0,-0,-0.4016355461,0.5745230025,0.6669109558,-0.2379752195,-0.9927309707,-0.3303631728,-0,0.2379752195,0.4182079683,0.0650877631,0,0,-0,-0,-0,0,-0,0,0,-0,0.4016355461,-0.6669109558,-0.5745230025,0.3303631728,0.9927309707,0.2379752195,-0.0650877631,-0.4182079683,-0.2379752195,-0,-0,0,0,-0,-0,-0,0,0,0,-0,-0,0,-0.5625,-0,-0,-0,-0,-0,-0,0,0,0,
40  0,-0,-0,0,0,0,-0,-0,-0,-0,-0.2133883476,0.3017766953,0.4267766953,-0,-0.5151650429,-0.3017766953,-0,0,0.2133883476,0.0883883476,-0,0,0,-0,-0,0,0,0,0,-0,-0.2133883476,0.3017766953,0.4267766953,-0,-0.5151650429,-0.3017766953,-0,0,0.2133883476,0.0883883476,-0,0,0,0,-0,-0,-0,0,0,-0,0,-0,0,0,-0,-0,-0,0,-0,0,0,-0,0,0,-0,0,-0,0,-0,0,-0,-0,
41  0.3266407412,-0.5576106243,-0.3266407412,0.2309698831,0.5576106243,0,0,-0.2309698831,-0,-0,-0,-0,0,0,-0,-0,-0,-0,0,-0,0,-0,-0,0,0,0,-0,-0,-0,0,-0,-0,0,0,-0,-0,-0,-0,0,-0,0,-0,-0,0,0,0,-0,-0,0,-0,-0.3266407412,0.3266407412,0.5576106243,-0,-0.5576106243,-0.2309698831,0,0,0.2309698831,-0,-0,0,0,0,0,0,0,0,0,0,-0,0,
42  0,-0,-0,0,0,0,-0,0,-0,-0,0,-0,-0,0,0,0,0,-0,-0,-0,-0.4016355461,0.6669109558,0.5745230025,-0.3303631728,-0.9927309707,-0.2379752195,0.0650877631,0.4182079683,0.2379752195,-0,0,-0,-0,0,0,0,0,-0,-0,-0,0.4016355461,-0.5745230025,-0.6669109558,0.2379752195,0.9927309707,0.3303631728,0,-0.2379752195,-0.4182079683,-0.0650877631,0,-0,-0,0,0,0,-0,-0,0,-0,-0,-0,-0,-0.5625,0,-0,-0,-0,0,-0,-0,-0,
43  -0,0,0,-0,-0,-0,0,0,0,0,0.3266407412,-0.3266407412,-0.5576106243,-0,0.5576106243,0.2309698831,-0,0,-0.2309698831,0,-0,0,0,-0,-0,-0,0,0,0,0,-0.3266407412,0.3266407412,0.5576106243,0,-0.5576106243,-0.2309698831,-0,0,0.2309698831,0,-0,0,0,-0,-0,-0,0,0,0,-0,-0,0,-0,-0,0,-0,0,-0,-0,0,0,-0,0,0,0,0,0,0,-0,0,0,0,
44  -0.2133883476,0.4267766953,0.3017766953,-0.3017766953,-0.5151650429,0,0.0883883476,0.2133883476,-0,0,-0,0,0,-0,-0,-0,0,0,0,0,-0,0,0,-0,-0,-0,0,0,0,-0,-0,0,0,-0,-0,-0,0,0,0,-0,-0,0,0,-0,-0,-0,0,0,0,0,-0.2133883476,0.3017766953,0.4267766953,-0,-0.5151650429,-0.3017766953,0,0,0.2133883476,0.0883883476,0,0,0,0,0,0,-0,0,-0,-0,0,0,
45  -0,0,0,-0,-0,0,0,0,-0,-0,-0,0,0,-0,-0,-0,0,0,0,0,-0.2133883476,0.3017766953,0.4267766953,-0,-0.5151650429,-0.3017766953,0,0,0.2133883476,0.0883883476,-0,0,0,-0,-0,-0,0,0,0,0,-0.2133883476,0.4267766953,0.3017766953,-0.3017766953,-0.5151650429,0,0.0883883476,0.2133883476,-0,-0,-0,0,0,0,-0,-0,0,-0,0,-0,0,-0,0,0,0,0,0,0,-0,0,0,0,
46  -0,0,0,-0,-0,-0,0,0,0,0,0.4016355461,-0.5745230025,-0.6669109557,0.2379752195,0.9927309707,0.3303631728,0,-0.2379752195,-0.4182079683,-0.0650877631,-0,0,0,0,-0,-0,-0,-0,0,0,-0.4016355461,0.5745230025,0.6669109557,-0.2379752195,-0.9927309707,-0.3303631728,0,0.2379752195,0.4182079683,0.0650877631,-0,0,0,-0,-0,0,0,0,-0,-0,-0,0,0,-0,0,0,0,-0,-0,-0,0,-0,0,-0,0,-0.5625,0,0,-0,0,0,0,
47  0.3266407412,-0.3266407412,-0.5576106243,-0,0.5576106243,0.2309698831,0,0,-0.2309698831,-0,-0,0,0,0,-0,-0,-0,0,0,0,0,-0,-0,0,0,0,-0,0,-0,0,-0,0,0,0,-0,-0,-0,0,0,0,0,0,-0,0,-0,0,0,-0,0,-0,-0.3266407412,0.5576106243,0.3266407412,-0.2309698831,-0.5576106243,-0,0,0.2309698831,0,0,-0,-0,-0,-0,0,0,-0,0,-0,0,-0,0,
48  0,-0,-0,0,0,0,0,-0,-0,0,0,-0,-0,0,0,0,-0,-0,-0,0,-0.4267766953,0.7285533906,0.7285533906,-0.3017766953,-1.030330086,-0.3017766953,0,0.3017766953,0.3017766953,0,0,-0,-0,0,0,0,-0,-0,-0,0,-0.4267766953,0.7285533906,0.7285533906,-0.3017766953,-1.030330086,-0.3017766953,0,0.3017766953,0.3017766953,-0,0,-0,-0,0,0,0,0,-0,-0,-0,-0,-0,0,0,0,-0,0,-0,0,-0,-0,-0,
49  -0,0,0,-0,-0,-0,-0,0,0,0,-0.4267766953,0.7285533906,0.7285533906,-0.3017766953,-1.030330086,-0.3017766953,-0,0.3017766953,0.3017766953,-0,-0,0,0,-0,-0,-0,-0,0,0,0,-0.4267766953,0.7285533906,0.7285533906,-0.3017766953,-1.030330086,-0.3017766953,-0,0.3017766953,0.3017766953,-0,-0,0,0,-0,-0,-0,0,0,0,-0,-0,0,-0,-0,0,0,0,-0,0,-0,-0,-0,0,0,-0,0,-0,0,-0,-0,0,0,
50  -0.4267766953,0.7285533906,0.7285533906,-0.3017766953,-1.030330086,-0.3017766953,-0,0.3017766953,0.3017766953,0,-0,0,0,-0,-0,-0,0,0,0,0,-0,0,0,-0,-0,-0,0,0,0,0,-0,0,0,-0,-0,-0,0,0,0,0,-0,0,0,-0,-0,-0,0,0,0,0,-0.4267766953,0.7285533906,0.7285533906,-0.3017766953,-1.030330086,-0.3017766953,0,0.3017766953,0.3017766953,0,0,0,0,0,0,0,0,0,-0,0,0,0,
51  -0,0,0,0,-0,-0,0,-0,0,-0,-0,0,0,-0,-0,-0,-0,0,0,0,-0.2133883476,0.4267766953,0.3017766953,-0.3017766953,-0.5151650429,-0,0.0883883476,0.2133883476,0,0,-0,0,0,-0,-0,-0,-0,0,0,0,-0.2133883476,0.3017766953,0.4267766953,-0,-0.5151650429,-0.3017766953,0,0,0.2133883476,0.0883883476,-0,0,0,-0,-0,0,0,0,-0,0,0,0,-0,0,0,0,0,0,-0,-0,0,0,
52  -0,0,0,-0,-0,-0,0,0,0,0,0.3266407412,-0.5576106243,-0.3266407412,0.2309698831,0.5576106243,-0,0,-0.2309698831,0,0,0,-0,0,0,0,-0,0,-0,-0,0,-0.3266407412,0.5576106243,0.3266407412,-0.2309698831,-0.5576106243,-0,-0,0.2309698831,0,0,0,0,-0,-0,0,0,0,-0,-0,0,-0,0,0,-0,0,0,0,-0,-0,-0,-0,-0,0,-0,0,0,0,0,0,0,0,0,
53  0.4016355461,-0.6669109557,-0.5745230025,0.3303631728,0.9927309707,0.2379752195,-0.0650877631,-0.4182079683,-0.2379752195,0,0,-0,-0,0,0,0,-0,-0,-0,0,0,-0,-0,0,0,0,-0,-0,-0,-0,0,-0,-0,0,0,0,-0,-0,-0,-0,0,-0,-0,0,0,0,-0,-0,-0,-0,-0.4016355461,0.5745230025,0.6669109557,-0.2379752195,-0.9927309707,-0.3303631728,0,0.2379752195,0.4182079683,0.0650877631,0,-0,0,-0,0,-0,0,-0,0,-0.5625,0,0,
54  0,-0,-0,0,0,0,0,-0,-0,0,0,-0,-0,0,0,0,-0,-0,-0,0,-0.0956708581,-0,0.2309698831,0,0,-0.2309698831,0,-0,-0,0.0956708581,0,-0,-0,0,0,0,-0,-0,-0,0,0.0956708581,-0.2309698831,0,0.2309698831,0,-0,-0.0956708581,-0,0,0,0,-0,-0,0,0,0,-0,-0,-0,0,0,-0,0,0,-0,-0,0,-0,0,-0,-0,-0,
55  -0,0,0,-0,-0,-0,0,0,0,0,-0.3556472461,0.6071278256,0.6071278256,-0.2514805795,-0.8586084051,-0.2514805795,0.0412965218,0.3664340577,0.3664340577,0.0412965218,-0,0,0,-0,-0,-0,-0,0,0,0,-0.3556472461,0.6071278256,0.6071278256,-0.2514805795,-0.8586084051,-0.2514805795,0.0412965218,0.3664340577,0.3664340577,0.0412965218,-0,0,0,-0,-0,-0,0,0,0,-0,-0,0,-0,-0,0,0,0,-0,-0,-0,0,0,-0,0,0,0,-0.9375000002,0,-0,0,0,0,
56  0.0956708581,0,-0.2309698831,0,0,0.2309698831,-0,-0,0,-0.0956708581,-0,0,0,0,-0,-0,-0,0,0,0,0,-0,-0,0,-0,0,-0,0,-0,0,-0,0,0,0,-0,-0,-0,0,0,-0,0,0,-0,0,-0,0,0,-0,0,-0,-0.0956708581,0.2309698831,-0,-0.2309698831,0,0,0.0956708581,-0,-0,-0,-0,-0,0,-0,0,0,-0,0,-0,0,-0,-0,
57  -0,0,0,-0,-0,-0,-0,0,0,-0,-0,0,0,-0,-0,-0,0,0,0,-0,-0.3266407412,0.3266407412,0.5576106243,0,-0.5576106243,-0.2309698831,-0,-0,0.2309698831,-0,-0,0,0,-0,-0,-0,0,0,0,-0,0.3266407412,-0.5576106243,-0.3266407412,0.2309698831,0.5576106243,0,-0,-0.2309698831,-0,-0,-0,0,0,-0,-0,-0,0,0,0,-0,-0,0,-0,0,0,0,-0,0,-0,-0,0,0,
58  0,-0,-0,0,0,0,0,-0,-0,-0,0.4016355461,-0.6669109558,-0.5745230025,0.3303631728,0.9927309707,0.2379752195,-0.0650877631,-0.4182079683,-0.2379752195,0,-0,0,0,0,-0,-0,-0,-0,0,-0,-0.4016355461,0.6669109558,0.5745230025,-0.3303631728,-0.9927309707,-0.2379752195,0.0650877631,0.4182079683,0.2379752195,-0,-0,0,0,-0,-0,0,-0,0,-0,0,0,-0,0,0,-0,-0,-0,0,0,0,0,-0,0,-0,0,-0,-0,-0.5625,0,-0,-0,-0,
59  -0.2133883476,0.3017766953,0.4267766953,0,-0.5151650429,-0.3017766953,-0,0,0.2133883476,0.0883883476,-0,0,0,-0,-0,-0,-0,0,0,0,0,-0,0,0,-0,-0,-0,0,0,0,-0,0,0,-0,-0,-0,-0,0,0,-0,0,0,-0,-0,-0,0,0,0,0,-0,-0.2133883476,0.4267766953,0.3017766953,-0.3017766953,-0.5151650429,-0,0.0883883476,0.2133883476,0,-0,0,0,0,0,-0,0,-0,0,0,0,0,0,
60  -0,0,0,-0,-0,-0,0,0,0,-0,-0,0,0,-0,-0,-0,0,0,0,-0,-0.3266407412,0.5576106243,0.3266407412,-0.2309698831,-0.5576106243,0,0,0.2309698831,-0,0,-0,0,0,-0,-0,-0,0,0,0,-0,0.3266407412,-0.3266407412,-0.5576106243,0,0.5576106243,0.2309698831,-0,-0,-0.2309698831,0,-0,0,0,-0,-0,-0,0,0,0,0,-0,0,-0,-0,0,0,0,0,-0,-0,0,0,
61  -0,0,0,-0,-0,-0,-0,0,0,0,-0.2133883476,0.4267766953,0.3017766953,-0.3017766953,-0.5151650429,-0,0.0883883476,0.2133883476,0,-0,-0,0,0,-0,-0,-0,0,0,-0,0,-0.2133883476,0.4267766953,0.3017766953,-0.3017766953,-0.5151650429,-0,0.0883883476,0.2133883476,0,-0,-0,0,0,-0,-0,-0,0,-0,0,-0,-0,0,-0,-0,0,0,0,-0,-0,-0,-0,0,-0,0,0,0,-0,0,-0,0,0,0,
62  0.4016355461,-0.5745230025,-0.6669109558,0.2379752195,0.9927309707,0.3303631728,-0,-0.2379752195,-0.4182079683,-0.0650877631,-0,0,0,-0,-0,-0,0,0,0,-0,-0,0,0,-0,-0,-0,0,0,0,0,-0,0,0,-0,-0,-0,0,0,0,-0,-0,0,0,-0,-0,-0,0,0,0,0,-0.4016355461,0.6669109558,0.5745230025,-0.3303631728,-0.9927309707,-0.2379752195,0.0650877631,0.4182079683,0.2379752195,0,0,0,0,0,-0,0,-0,0,-0,0,-0.5625,0,
63  -0,0,0,-0,-0,-0,0,-0,0,0,-0,0,0,-0,-0,-0,-0,0,0,0,-0.0956708581,0.2309698831,-0,-0.2309698831,0,0,0.0956708581,-0,-0,-0,-0,0,0,-0,-0,-0,-0,0,0,0,0.0956708581,-0,-0.2309698831,0,0,0.2309698831,-0,-0,-0,-0.0956708581,-0,0,0,-0,-0,-0,0,0,-0,0,0,0,0,0,0,0,0,0,0,0,0,0,
64  -0,0,0,-0,-0,-0,-0,0,0,0,0.0956708581,-0.2309698831,0,0.2309698831,-0,-0,-0.0956708581,0,0,-0,0,-0,-0,-0,0,0,-0,0,-0,0,-0.0956708581,0.2309698831,0,-0.2309698831,-0,-0,0.0956708581,0,0,0,0,-0,-0,0,0,-0,0,-0,0,0,-0,0,-0,-0,0,0,0,-0,-0,-0,0,0,-0,-0,-0,0,0,0,-0,0,0,0,
65  -0.3556472461,0.6071278256,0.6071278256,-0.2514805795,-0.8586084051,-0.2514805795,0.0412965218,0.3664340577,0.3664340577,0.0412965218,-0,0,0,-0,-0,-0,0,0,0,0,-0,0,0,-0,-0,-0,0,0,0,-0,-0,0,0,-0,-0,-0,0,0,0,0,-0,0,0,-0,-0,-0,0,0,0,0,-0.3556472461,0.6071278256,0.6071278256,-0.2514805795,-0.8586084051,-0.2514805795,0.0412965218,0.3664340577,0.3664340577,0.0412965218,-0,0,0,0,0,0,0,0,-0,-0,0,-0.9375000002,
66  -0,0,0,-0,-0,-0,0,0,0,0,0.0239177145,-0,-0.0577424708,0,0,0.0577424708,0,-0,-0,-0.0239177145,0,-0,-0,0,0,-0,-0,-0,0,0,0.0239177145,-0,-0.0577424708,-0,0,0.0577424708,0,-0,-0,-0.0239177145,0,-0,-0,-0,0,0,0,0,-0,0,-0,0,-0,-0,0,0,0,-0,-0,-0,0,0,-0,-0,-0,-0,-0,-0,-0,0,0,0,
67  0,-0,-0,-0,0,0,0,0,-0,-0,-0,-0,0,0,0,-0,0,-0,-0,0,0.0239177145,-0.0577424708,-0,0.0577424708,0,0,-0.0239177145,-0,-0,-0,-0,-0,0,0,0,-0,0,-0,-0,0,0.0239177145,-0,-0.0577424708,0,0,0.0577424708,0,-0,-0,-0.0239177145,0,-0,-0,0,0,-0,-0,-0,0,0,-0,-0,-0,-0,0,0,0,0,0,-0,-0,-0,
68  0.0239177145,-0,-0.0577424708,0,0,0.0577424708,0,-0,-0,-0.0239177145,-0,0,0,0,-0,-0,0,-0,0,-0,-0,0,0,-0,-0,-0,0,0,0,0,-0,0,0,0,-0,-0,0,-0,0,-0,-0,0,0,-0,-0,-0,-0,0,0,0,0.0239177145,-0.0577424708,0,0.0577424708,-0,0,-0.0239177145,0,-0,0,0,0,0,0,-0,0,0,0,0,0,-0,-0,
69  0,-0,-0,0,0,0,-0,-0,-0,0,0,-0,-0,0,0,0,-0,-0,-0,0,-0.1633203706,0.2788053122,0.1633203706,-0.1154849416,-0.2788053122,-0,0,0.1154849416,0,0,0,-0,-0,0,0,0,-0,-0,-0,0,-0.1633203706,0.1633203706,0.2788053122,-0,-0.2788053122,-0.1154849416,0,-0,0.1154849416,0,0,-0,-0,0,0,0,-0,-0,-0,-0,0,0,-0,0,0,-0,0,-0,0,-0,-0,-0,
70  0,-0,-0,0,0,0,0,-0,-0,0,0,-0,-0,0,0,0,-0,-0,-0,0,-0.1088802471,0.1088802471,0.1858702081,-0,-0.1858702081,-0.076989961,0,0,0.076989961,-0,0,-0,-0,0,0,0,-0,-0,-0,0,-0.1088802471,0.1858702081,0.1088802471,-0.076989961,-0.1858702081,0,0,0.076989961,-0,-0,0,-0,-0,0,0,0,-0,-0,-0,-0,0,-0,0,0,-0,-0,0,-0,0,-0,-0,-0,
71  -0,0,0,-0,-0,-0,-0,0,-0,-0,-0,0,0,-0,-0,-0,0,0,0,0,-0.0239177145,0,0.0577424708,-0,-0,-0.0577424708,0,0,0,0.0239177145,-0,0,0,-0,-0,-0,0,0,0,-0,-0.0239177145,0.0577424708,0,-0.0577424708,-0,-0,0.0239177145,0,0,-0,-0,0,0,-0,-0,-0,0,0,0,-0,0,-0,0,0,0,0,0,0,-0,0,0,0,
72  -0.1633203706,0.1633203706,0.2788053122,-0,-0.2788053122,-0.1154849416,-0,0,0.1154849416,0,-0,0,0,-0,-0,-0,-0,0,0,0,0,-0,0,0,-0,0,-0,0,-0,0,-0,0,0,-0,-0,-0,-0,0,0,-0,0,0,-0,-0,-0,0,0,-0,0,-0,-0.1633203706,0.2788053122,0.1633203706,-0.1154849416,-0.2788053122,-0,0,0.1154849416,0,0,0,-0,0,-0,0,0,-0,0,-0,0,0,0,
73  -0.1088802471,0.1858702081,0.1088802471,-0.076989961,-0.1858702081,0,-0,0.076989961,-0,-0,-0,0,0,-0,-0,-0,0,0,0,-0,-0,0,0,-0,-0,-0,0,0,0,-0,-0,0,0,-0,-0,-0,0,0,0,-0,-0,0,0,-0,-0,-0,0,0,0,0,-0.1088802471,0.1088802471,0.1858702081,-0,-0.1858702081,-0.076989961,0,0,0.076989961,0,0,0,-0,0,-0,0,0,0,-0,0,0,0,
74  -0.0239177145,0.0577424708,-0,-0.0577424708,0,0,0.0239177145,-0,-0,-0,-0,-0,0,0,-0,-0,0,-0,0,-0,-0,0,0,-0,-0,-0,0,0,0,-0,-0,-0,0,0,-0,-0,0,-0,0,-0,-0,0,0,-0,-0,-0,-0,0,0,0,-0.0239177145,-0,0.0577424708,0,0,-0.0577424708,-0,0,-0,0.0239177145,-0,0,0,0,0,0,0,0,-0,0,0,0,
75  -0,0,0,-0,0,-0,0,-0,-0,0,-0.1633203706,0.1633203706,0.2788053122,-0,-0.2788053122,-0.1154849416,-0,0,0.1154849416,-0,-0,0,0,-0,-0,-0,0,0,0,0,-0.1633203706,0.1633203706,0.2788053122,0,-0.2788053122,-0.1154849416,-0,0,0.1154849416,-0,-0,0,0,-0,-0,-0,0,0,0,-0,-0,0,0,-0,0,-0,0,-0,-0,0,0,-0,0,0,-0,0,-0,0,-0,0,0,0,
76  -0,0,0,-0,-0,-0,0,0,0,0,-0.1088802471,0.1858702081,0.1088802471,-0.076989961,-0.1858702081,-0,-0,0.076989961,0,0,-0,0,0,-0,-0,-0,-0,0,-0,0,-0.1088802471,0.1858702081,0.1088802471,-0.076989961,-0.1858702081,0,-0,0.076989961,0,-0,-0,0,0,-0,-0,-0,0,-0,0,-0,-0,0,0,-0,0,-0,0,-0,0,-0,-0,0,-0,0,-0,0,-0,0,-0,0,0,0,
77  0,-0,-0,0,0,0,0,-0,-0,-0,-0.0239177145,0.0577424708,0,-0.0577424708,-0,-0,0.0239177145,0,0,0,-0,0,0,-0,-0,0,0,0,0,-0,-0.0239177145,0.0577424708,0,-0.0577424708,-0,-0,0.0239177145,0,0,0,-0,0,0,0,-0,-0,-0,0,0,0,0,-0,0,0,-0,-0,-0,0,0,0,0,-0,0,0,0,0,-0,0,0,-0,-0,-0
78 };
79 
80 static void N_H_BDDF3_3D_Funct(double xi, double eta, double zeta,
81  double *values)
82 {
83  int nBF = 72; // number of basis functions
84  // monomials x-component, y-component and z-component
85  double mon_x[]={1,0,0,xi,0,0,eta,0,0,zeta,0,0,
86  xi*xi,0,0,xi*eta,0,0,xi*zeta,0,0,eta*eta,0,0,eta*zeta,0,0,zeta*zeta,0,0,
87  xi*xi*xi,0,0,xi*xi*eta,0,0,xi*xi*zeta,0,0,
88  xi*eta*eta,0,0,xi*eta*zeta,0,0,xi*zeta*zeta,0,0,
89  eta*eta*eta,0,0,eta*eta*zeta,0,0,eta*zeta*zeta,0,0,zeta*zeta*zeta,0,0,
90  xi*xi*xi*xi,-4*xi*zeta*zeta*zeta,0,
91  2*xi*eta*zeta*zeta,3*xi*eta*eta*zeta,4*xi*eta*eta*eta,
92  -xi*xi*eta*eta,-xi*xi*xi*eta,-xi*xi*xi*xi,0,0,0};
93  double mon_y[]={0,1,0,0,xi,0,0,eta,0,0,zeta,0,
94  0,xi*xi,0,0,xi*eta,0,0,xi*zeta,0,0,eta*eta,0,0,eta*zeta,0,0,zeta*zeta,0,
95  0,xi*xi*xi,0,0,xi*xi*eta,0,0,xi*xi*zeta,0,
96  0,xi*eta*eta,0,0,xi*eta*zeta,0,0,xi*zeta*zeta,0,
97  0,eta*eta*eta,0,0,eta*eta*zeta,0,0,eta*zeta*zeta,0,0,zeta*zeta*zeta,0,
98  -4*xi*xi*xi*eta,0,eta*eta*eta*eta,
99  -eta*eta*zeta*zeta,-eta*eta*eta*zeta,-eta*eta*eta*eta,
100  0,0,0,2*xi*xi*eta*zeta,3*xi*eta*zeta*zeta,4*eta*zeta*zeta*zeta};
101  double mon_z[]={0,0,1,0,0,xi,0,0,eta,0,0,zeta,
102  0,0,xi*xi,0,0,xi*eta,0,0,xi*zeta,0,0,eta*eta,0,0,eta*zeta,0,0,zeta*zeta,
103  0,0,xi*xi*xi,0,0,xi*xi*eta,0,0,xi*xi*zeta,
104  0,0,xi*eta*eta,0,0,xi*eta*zeta,0,0,xi*zeta*zeta,
105  0,0,eta*eta*eta,0,0,eta*eta*zeta,0,0,eta*zeta*zeta,0,0,zeta*zeta*zeta,
106  0,zeta*zeta*zeta*zeta,-4*eta*eta*eta*zeta,0,0,0,
107  2*xi*eta*eta*zeta,3*xi*xi*eta*zeta,4*xi*xi*xi*zeta,
108  -xi*xi*zeta*zeta,-xi*zeta*zeta*zeta,-zeta*zeta*zeta*zeta};
109 
110  memset(values, 0.0, 3*nBF*SizeOfDouble); // 3 is the space dimension
111  for(int i=0; i<nBF; i++)
112  {
113  for(int j=0; j<nBF; j++)
114  {
115  values[i ] += N_H_BDDF3_3D_CM[i+j*nBF]*mon_x[j];
116  values[i+ nBF] += N_H_BDDF3_3D_CM[i+j*nBF]*mon_y[j];
117  values[i+2*nBF] += N_H_BDDF3_3D_CM[i+j*nBF]*mon_z[j];
118  }
119  }
120 }
121 
122 static void N_H_BDDF3_3D_DeriveXi(double xi, double eta, double zeta,
123  double *values)
124 {
125  int nBF = 72; // number of basis functions
126  // monomials x-component, y-component and z-component
127  double mon_x[]={0,0,0,1,0,0,0,0,0,0,0,0,
128  2*xi,0,0,eta,0,0,zeta,0,0,0,0,0,0,0,0,0,0,0,
129  3*xi*xi,0,0,2*xi*eta,0,0,2*xi*zeta,0,0,
130  eta*eta,0,0,eta*zeta,0,0,zeta*zeta,0,0,
131  0,0,0,0,0,0,0,0,0,0,0,0,
132  4*xi*xi*xi,-4*zeta*zeta*zeta,0,
133  2*eta*zeta*zeta,3*eta*eta*zeta,4*eta*eta*eta,
134  -2*xi*eta*eta,-3*xi*xi*eta,-4*xi*xi*xi,0,0,0};
135  double mon_y[]={0,0,0,0,1,0,0,0,0,0,0,0,
136  0,2*xi,0,0,eta,0,0,zeta,0,0,0,0,0,0,0,0,0,0,
137  0,3*xi*xi,0,0,2*xi*eta,0,0,2*xi*zeta,0,
138  0,eta*eta,0,0,eta*zeta,0,0,zeta*zeta,0,
139  0,0,0,0,0,0,0,0,0,0,0,0,
140  -4*3*xi*xi*eta,0,0,
141  0,0,0,
142  0,0,0,2*2*xi*eta*zeta,3*eta*zeta*zeta,0};
143  double mon_z[]={0,0,0,0,0,1,0,0,0,0,0,0,
144  0,0,2*xi,0,0,eta,0,0,zeta,0,0,0,0,0,0,0,0,0,
145  0,0,3*xi*xi,0,0,2*xi*eta,0,0,2*xi*zeta,
146  0,0,eta*eta,0,0,eta*zeta,0,0,zeta*zeta,
147  0,0,0,0,0,0,0,0,0,0,0,0,
148  0,0,0,0,0,0,
149  2*eta*eta*zeta,3*2*xi*eta*zeta,4*3*xi*xi*zeta,
150  -2*xi*zeta*zeta,-zeta*zeta*zeta,0};
151 
152  memset(values, 0.0, 3*nBF*SizeOfDouble); // 3 is the space dimension
153  for(int i=0; i<nBF; i++)
154  {
155  for(int j=0; j<nBF; j++)
156  {
157  values[i ] += N_H_BDDF3_3D_CM[i+j*nBF]*mon_x[j];
158  values[i+ nBF] += N_H_BDDF3_3D_CM[i+j*nBF]*mon_y[j];
159  values[i+2*nBF] += N_H_BDDF3_3D_CM[i+j*nBF]*mon_z[j];
160  }
161  }
162 }
163 
164 static void N_H_BDDF3_3D_DeriveEta(double xi, double eta, double zeta,
165  double *values)
166 {
167  int nBF = 72; // number of basis functions
168  // monomials x-component, y-component and z-component
169  double mon_x[]={0,0,0,0,0,0,1,0,0,0,0,0,
170  0,0,0,xi,0,0,0,0,0,2*eta,0,0,zeta,0,0,0,0,0,
171  0,0,0,xi*xi,0,0,0,0,0,
172  xi*2*eta,0,0,xi*zeta,0,0,0,0,0,
173  3*eta*eta,0,0,2*eta*zeta,0,0,zeta*zeta,0,0,0,0,0,
174  0,0,0,
175  2*xi*zeta*zeta,3*xi*2*eta*zeta,4*xi*3*eta*eta,
176  -xi*xi*2*eta,-xi*xi*xi,0,0,0,0};
177  double mon_y[]={0,0,0,0,0,0,0,1,0,0,0,0,
178  0,0,0,0,xi,0,0,0,0,0,2*eta,0,0,zeta,0,0,0,0,
179  0,0,0,0,xi*xi,0,0,0,0,
180  0,xi*2*eta,0,0,xi*zeta,0,0,0,0,
181  0,3*eta*eta,0,0,2*eta*zeta,0,0,zeta*zeta,0,0,0,0,
182  -4*xi*xi*xi,0,4*eta*eta*eta,
183  -2*eta*zeta*zeta,-3*eta*eta*zeta,-4*eta*eta*eta,
184  0,0,0,2*xi*xi*zeta,3*xi*zeta*zeta,4*zeta*zeta*zeta};
185  double mon_z[]={0,0,0,0,0,0,0,0,1,0,0,0,
186  0,0,0,0,0,xi,0,0,0,0,0,2*eta,0,0,zeta,0,0,0,
187  0,0,0,0,0,xi*xi,0,0,0,
188  0,0,xi*2*eta,0,0,xi*zeta,0,0,0,
189  0,0,3*eta*eta,0,0,2*eta*zeta,0,0,zeta*zeta,0,0,0,
190  0,0,-4*3*eta*eta*zeta,0,0,0,
191  2*xi*2*eta*zeta,3*xi*xi*zeta,0,
192  0,0,0};
193 
194  memset(values, 0.0, 3*nBF*SizeOfDouble); // 3 is the space dimension
195  for(int i=0; i<nBF; i++)
196  {
197  for(int j=0; j<nBF; j++)
198  {
199  values[i ] += N_H_BDDF3_3D_CM[i+j*nBF]*mon_x[j];
200  values[i+ nBF] += N_H_BDDF3_3D_CM[i+j*nBF]*mon_y[j];
201  values[i+2*nBF] += N_H_BDDF3_3D_CM[i+j*nBF]*mon_z[j];
202  }
203  }
204 }
205 
206 static void N_H_BDDF3_3D_DeriveZeta(double xi, double eta, double zeta,
207  double *values)
208 {
209  int nBF = 72; // number of basis functions
210  // monomials x-component, y-component and z-component
211  double mon_x[]={0,0,0,0,0,0,0,0,0,1,0,0,
212  0,0,0,0,0,0,xi,0,0,0,0,0,eta,0,0,2*zeta,0,0,
213  0,0,0,0,0,0,xi*xi,0,0,
214  0,0,0,xi*eta,0,0,xi*2*zeta,0,0,
215  0,0,0,eta*eta,0,0,eta*2*zeta,0,0,3*zeta*zeta,0,0,
216  0,-4*xi*3*zeta*zeta,0,
217  2*xi*eta*2*zeta,3*xi*eta*eta,0,
218  0,0,0,0,0,0};
219  double mon_y[]={0,0,0,0,0,0,0,0,0,0,1,0,
220  0,0,0,0,0,0,0,xi,0,0,0,0,0,eta,0,0,2*zeta,0,
221  0,0,0,0,0,0,0,xi*xi,0,
222  0,0,0,0,xi*eta,0,0,xi*2*zeta,0,
223  0,0,0,0,eta*eta,0,0,eta*2*zeta,0,0,3*zeta*zeta,0,
224  0,0,0,
225  -eta*eta*2*zeta,-eta*eta*eta,0,
226  0,0,0,2*xi*xi*eta,3*xi*eta*2*zeta,4*eta*3*zeta*zeta};
227  double mon_z[]={0,0,0,0,0,0,0,0,0,0,0,1,
228  0,0,0,0,0,0,0,0,xi,0,0,0,0,0,eta,0,0,2*zeta,
229  0,0,0,0,0,0,0,0,xi*xi,
230  0,0,0,0,0,xi*eta,0,0,xi*2*zeta,
231  0,0,0,0,0,eta*eta,0,0,eta*2*zeta,0,0,3*zeta*zeta,
232  0,4*zeta*zeta*zeta,-4*eta*eta*eta,0,0,0,
233  2*xi*eta*eta,3*xi*xi*eta,4*xi*xi*xi,
234  -xi*xi*2*zeta,-xi*3*zeta*zeta,-4*zeta*zeta*zeta};
235 
236  memset(values, 0.0, 3*nBF*SizeOfDouble); // 3 is the space dimension
237  for(int i=0; i<nBF; i++)
238  {
239  for(int j=0; j<nBF; j++)
240  {
241  values[i ] += N_H_BDDF3_3D_CM[i+j*nBF]*mon_x[j];
242  values[i+ nBF] += N_H_BDDF3_3D_CM[i+j*nBF]*mon_y[j];
243  values[i+2*nBF] += N_H_BDDF3_3D_CM[i+j*nBF]*mon_z[j];
244  }
245  }
246 }
247 
248 static void N_H_BDDF3_3D_DeriveXiXi(double xi, double eta, double zeta,
249  double *values)
250 {
251  int nBF = 72; // number of basis functions
252  // monomials x-component, y-component and z-component
253  double mon_x[]={0,0,0,0,0,0,0,0,0,0,0,0,
254  2,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,
255  3*2*xi,0,0,2*eta,0,0,2*zeta,0,0,
256  0,0,0,0,0,0,0,0,0,
257  0,0,0,0,0,0,0,0,0,0,0,0,
258  4*3*xi*xi,0,0,
259  0,0,0,
260  -2*eta*eta,-3*2*xi*eta,-4*3*xi*xi,0,0,0};
261  double mon_y[]={0,0,0,0,0,0,0,0,0,0,0,0,
262  0,2,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,
263  0,3*2*xi,0,0,2*eta,0,0,2*zeta,0,
264  0,0,0,0,0,0,0,0,0,
265  0,0,0,0,0,0,0,0,0,0,0,0,
266  -4*3*2*xi*eta,0,0,
267  0,0,0,
268  0,0,0,2*2*eta*zeta,0,0};
269  double mon_z[]={0,0,0,0,0,0,0,0,0,0,0,0,
270  0,0,2,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,
271  0,0,3*2*xi,0,0,2*eta,0,0,2*zeta,
272  0,0,0,0,0,0,0,0,0,
273  0,0,0,0,0,0,0,0,0,0,0,0,
274  0,0,0,0,0,0,
275  0,3*2*eta*zeta,4*3*2*xi*zeta,
276  -2*zeta*zeta,0,0};
277 
278  memset(values, 0.0, 3*nBF*SizeOfDouble); // 3 is the space dimension
279  for(int i=0; i<nBF; i++)
280  {
281  for(int j=0; j<nBF; j++)
282  {
283  values[i ] += N_H_BDDF3_3D_CM[i+j*nBF]*mon_x[j];
284  values[i+ nBF] += N_H_BDDF3_3D_CM[i+j*nBF]*mon_y[j];
285  values[i+2*nBF] += N_H_BDDF3_3D_CM[i+j*nBF]*mon_z[j];
286  }
287  }
288 }
289 
290 static void N_H_BDDF3_3D_DeriveXiEta(double xi, double eta, double zeta,
291  double *values)
292 {
293  int nBF = 72; // number of basis functions
294  // monomials x-component, y-component and z-component
295  double mon_x[]={0,0,0,0,0,0,0,0,0,0,0,0,
296  0,0,0,1,0,0,0,0,0,0,0,0,0,0,0,0,0,0,
297  0,0,0,2*xi,0,0,0,0,0,
298  2*eta,0,0,zeta,0,0,0,0,0,
299  0,0,0,0,0,0,0,0,0,0,0,0,
300  0,0,0,
301  2*zeta*zeta,3*2*eta*zeta,4*3*eta*eta,
302  -2*xi*2*eta,-3*xi*xi,0,0,0,0};
303  double mon_y[]={0,0,0,0,0,0,0,0,0,0,0,0,
304  0,0,0,0,1,0,0,0,0,0,0,0,0,0,0,0,0,0,
305  0,0,0,0,2*xi,0,0,0,0,
306  0,2*eta,0,0,zeta,0,0,0,0,
307  0,0,0,0,0,0,0,0,0,0,0,0,
308  -4*3*xi*xi,0,0,
309  0,0,0,
310  0,0,0,2*2*xi*zeta,3*zeta*zeta,0};
311  double mon_z[]={0,0,0,0,0,0,0,0,0,0,0,0,
312  0,0,0,0,0,1,0,0,0,0,0,0,0,0,0,0,0,0,
313  0,0,0,0,0,2*xi,0,0,0,
314  0,0,2*eta,0,0,zeta,0,0,0,
315  0,0,0,0,0,0,0,0,0,0,0,0,
316  0,0,0,0,0,0,
317  2*2*eta*zeta,3*2*xi*zeta,0,
318  0,0,0};
319 
320  memset(values, 0.0, 3*nBF*SizeOfDouble); // 3 is the space dimension
321  for(int i=0; i<nBF; i++)
322  {
323  for(int j=0; j<nBF; j++)
324  {
325  values[i ] += N_H_BDDF3_3D_CM[i+j*nBF]*mon_x[j];
326  values[i+ nBF] += N_H_BDDF3_3D_CM[i+j*nBF]*mon_y[j];
327  values[i+2*nBF] += N_H_BDDF3_3D_CM[i+j*nBF]*mon_z[j];
328  }
329  }
330 }
331 
332 static void N_H_BDDF3_3D_DeriveXiZeta(double xi, double eta, double zeta,
333  double *values)
334 {
335  int nBF = 72; // number of basis functions
336  // monomials x-component, y-component and z-component
337  double mon_x[]={0,0,0,0,0,0,0,0,0,0,0,0,
338  0,0,0,0,0,0,1,0,0,0,0,0,0,0,0,0,0,0,
339  0,0,0,0,0,0,2*xi,0,0,
340  0,0,0,eta,0,0,2*zeta,0,0,
341  0,0,0,0,0,0,0,0,0,0,0,0,
342  0,-4*3*zeta*zeta,0,
343  2*eta*2*zeta,3*eta*eta,0,
344  0,0,0,0,0,0};
345  double mon_y[]={0,0,0,0,0,0,0,0,0,0,0,0,
346  0,0,0,0,0,0,0,1,0,0,0,0,0,0,0,0,0,0,
347  0,0,0,0,0,0,0,2*xi,0,
348  0,0,0,0,eta,0,0,2*zeta,0,
349  0,0,0,0,0,0,0,0,0,0,0,0,
350  0,0,0,
351  0,0,0,
352  0,0,0,2*2*xi*eta,3*eta*2*zeta,0};
353  double mon_z[]={0,0,0,0,0,0,0,0,0,0,0,0,
354  0,0,0,0,0,0,0,0,1,0,0,0,0,0,0,0,0,0,
355  0,0,0,0,0,0,0,0,2*xi,
356  0,0,0,0,0,eta,0,0,2*zeta,
357  0,0,0,0,0,0,0,0,0,0,0,0,
358  0,0,0,0,0,0,
359  2*eta*eta,3*2*xi*eta,4*3*xi*xi,
360  -2*xi*2*zeta,-3*zeta*zeta,0};
361 
362  memset(values, 0.0, 3*nBF*SizeOfDouble); // 3 is the space dimension
363  for(int i=0; i<nBF; i++)
364  {
365  for(int j=0; j<nBF; j++)
366  {
367  values[i ] += N_H_BDDF3_3D_CM[i+j*nBF]*mon_x[j];
368  values[i+ nBF] += N_H_BDDF3_3D_CM[i+j*nBF]*mon_y[j];
369  values[i+2*nBF] += N_H_BDDF3_3D_CM[i+j*nBF]*mon_z[j];
370  }
371  }
372 }
373 
374 static void N_H_BDDF3_3D_DeriveEtaEta(double xi, double eta, double zeta,
375  double *values)
376 {
377  int nBF = 72; // number of basis functions
378  // monomials x-component, y-component and z-component
379  double mon_x[]={0,0,0,0,0,0,0,0,0,0,0,0,
380  0,0,0,0,0,0,0,0,0,2,0,0,0,0,0,0,0,0,
381  0,0,0,0,0,0,0,0,0,
382  xi*2,0,0,0,0,0,0,0,0,
383  3*2*eta,0,0,2*zeta,0,0,0,0,0,0,0,0,
384  0,0,0,
385  0,3*xi*2*zeta,4*xi*3*2*eta,
386  -xi*xi*2,0,0,0,0,0};
387  double mon_y[]={0,0,0,0,0,0,0,0,0,0,0,0,
388  0,0,0,0,0,0,0,0,0,0,2,0,0,0,0,0,0,0,
389  0,0,0,0,0,0,0,0,0,
390  0,xi*2,0,0,0,0,0,0,0,
391  0,3*2*eta,0,0,2*zeta,0,0,0,0,0,0,0,
392  0,0,4*3*eta*eta,
393  -2*zeta*zeta,-3*2*eta*zeta,-4*3*eta*eta,
394  0,0,0,0,0,0};
395  double mon_z[]={0,0,0,0,0,0,0,0,0,0,0,0,
396  0,0,0,0,0,0,0,0,0,0,0,2,0,0,0,0,0,0,
397  0,0,0,0,0,0,0,0,0,
398  0,0,xi*2,0,0,0,0,0,0,
399  0,0,3*2*eta,0,0,2*zeta,0,0,0,0,0,0,
400  0,0,-4*3*2*eta*zeta,0,0,0,
401  2*xi*2*zeta,0,0,
402  0,0,0};
403 
404  memset(values, 0.0, 3*nBF*SizeOfDouble); // 3 is the space dimension
405  for(int i=0; i<nBF; i++)
406  {
407  for(int j=0; j<nBF; j++)
408  {
409  values[i ] += N_H_BDDF3_3D_CM[i+j*nBF]*mon_x[j];
410  values[i+ nBF] += N_H_BDDF3_3D_CM[i+j*nBF]*mon_y[j];
411  values[i+2*nBF] += N_H_BDDF3_3D_CM[i+j*nBF]*mon_z[j];
412  }
413  }
414 }
415 
416 static void N_H_BDDF3_3D_DeriveEtaZeta(double xi, double eta, double zeta,
417  double *values)
418 {
419  int nBF = 72; // number of basis functions
420  // monomials x-component, y-component and z-component
421  double mon_x[]={0,0,0,0,0,0,0,0,0,0,0,0,
422  0,0,0,0,0,0,0,0,0,0,0,0,1,0,0,0,0,0,
423  0,0,0,0,0,0,0,0,0,
424  0,0,0,xi,0,0,0,0,0,
425  0,0,0,2*eta,0,0,2*zeta,0,0,0,0,0,
426  0,0,0,
427  2*xi*2*zeta,3*xi*2*eta,0,
428  0,0,0,0,0,0};
429  double mon_y[]={0,0,0,0,0,0,0,0,0,0,0,0,
430  0,0,0,0,0,0,0,0,0,0,0,0,0,1,0,0,0,0,
431  0,0,0,0,0,0,0,0,0,
432  0,0,0,0,xi,0,0,0,0,
433  0,0,0,0,2*eta,0,0,2*zeta,0,0,0,0,
434  0,0,0,
435  -2*eta*2*zeta,-3*eta*eta,0,
436  0,0,0,2*xi*xi,3*xi*2*zeta,4*3*zeta*zeta};
437  double mon_z[]={0,0,0,0,0,0,0,0,0,0,0,0,
438  0,0,0,0,0,0,0,0,0,0,0,0,0,0,1,0,0,0,
439  0,0,0,0,0,0,0,0,0,
440  0,0,0,0,0,xi,0,0,0,
441  0,0,0,0,0,2*eta,0,0,2*zeta,0,0,0,
442  0,0,-4*3*eta*eta,0,0,0,
443  2*xi*2*eta,3*xi*xi,0,
444  0,0,0};
445 
446  memset(values, 0.0, 3*nBF*SizeOfDouble); // 3 is the space dimension
447  for(int i=0; i<nBF; i++)
448  {
449  for(int j=0; j<nBF; j++)
450  {
451  values[i ] += N_H_BDDF3_3D_CM[i+j*nBF]*mon_x[j];
452  values[i+ nBF] += N_H_BDDF3_3D_CM[i+j*nBF]*mon_y[j];
453  values[i+2*nBF] += N_H_BDDF3_3D_CM[i+j*nBF]*mon_z[j];
454  }
455  }
456 }
457 
458 static void N_H_BDDF3_3D_DeriveZetaZeta(double xi, double eta, double zeta,
459  double *values)
460 {
461  int nBF = 72; // number of basis functions
462  // monomials x-component, y-component and z-component
463  double mon_x[]={0,0,0,0,0,0,0,0,0,0,0,0,
464  0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,2,0,0,
465  0,0,0,0,0,0,0,0,0,
466  0,0,0,0,0,0,xi*2,0,0,
467  0,0,0,0,0,0,eta*2,0,0,3*2*zeta,0,0,
468  0,-4*xi*3*2*zeta,0,
469  2*xi*eta*2,0,0,
470  0,0,0,0,0,0};
471  double mon_y[]={0,0,0,0,0,0,0,0,0,0,0,0,
472  0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,2,0,
473  0,0,0,0,0,0,0,0,0,
474  0,0,0,0,0,0,0,xi*2,0,
475  0,0,0,0,0,0,0,eta*2,0,0,3*2*zeta,0,
476  0,0,0,
477  -eta*eta*2,0,0,
478  0,0,0,0,3*xi*eta*2,4*eta*3*2*zeta};
479  double mon_z[]={0,0,0,0,0,0,0,0,0,0,0,0,
480  0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,2,
481  0,0,0,0,0,0,0,0,0,
482  0,0,0,0,0,0,0,0,xi*2,
483  0,0,0,0,0,0,0,0,eta*2,0,0,3*2*zeta,
484  0,4*3*zeta*zeta,0,0,0,0,
485  0,0,0,
486  -xi*xi*2,-xi*3*2*zeta,-4*3*zeta*zeta};
487 
488  memset(values, 0.0, 3*nBF*SizeOfDouble); // 3 is the space dimension
489  for(int i=0; i<nBF; i++)
490  {
491  for(int j=0; j<nBF; j++)
492  {
493  values[i ] += N_H_BDDF3_3D_CM[i+j*nBF]*mon_x[j];
494  values[i+ nBF] += N_H_BDDF3_3D_CM[i+j*nBF]*mon_y[j];
495  values[i+2*nBF] += N_H_BDDF3_3D_CM[i+j*nBF]*mon_z[j];
496  }
497  }
498 }
499 
500 TBaseFunct3D *BF_N_H_BDDF3_3D_Obj =
501 new TBaseFunct3D(72, BF_N_H_BDDF3_3D, BFUnitHexahedron,
502  N_H_BDDF3_3D_Funct, N_H_BDDF3_3D_DeriveXi,
503  N_H_BDDF3_3D_DeriveEta, N_H_BDDF3_3D_DeriveZeta,
504  N_H_BDDF3_3D_DeriveXiXi, N_H_BDDF3_3D_DeriveXiEta,
505  N_H_BDDF3_3D_DeriveXiZeta, N_H_BDDF3_3D_DeriveEtaEta,
506  N_H_BDDF3_3D_DeriveEtaZeta, N_H_BDDF3_3D_DeriveZetaZeta,
507  4, 1, 0, NULL, 3);
TBaseFunct3D
Definition: BaseFunct3D.h:27
Generated on Tue May 10 2016 09:08:00 for ParMooN by   doxygen 1.8.5