1 //
2 // BAGEL - Brilliantly Advanced General Electronic Structure Library
3 // Filename: _carsph_63.cc
4 // Copyright (C) 2009 Toru Shiozaki
5 //
6 // Author: Toru Shiozaki <shiozaki@northwestern.edu>
7 // Maintainer: Shiozaki group
8 //
9 // This file is part of the BAGEL package.
10 //
11 // This program is free software: you can redistribute it and/or modify
12 // it under the terms of the GNU General Public License as published by
13 // the Free Software Foundation, either version 3 of the License, or
14 // (at your option) any later version.
15 //
16 // This program is distributed in the hope that it will be useful,
17 // but WITHOUT ANY WARRANTY; without even the implied warranty of
18 // MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the
19 // GNU General Public License for more details.
20 //
21 // You should have received a copy of the GNU General Public License
22 // along with this program. If not, see <http://www.gnu.org/licenses/>.
23 //
24
25 #include <src/integral/carsphlist.h>
26 #include <algorithm>
27
28 using namespace std;
29 using namespace bagel;
30
31
carsph_63(const int nloop,const double * source,double * target)32 void CarSphList::carsph_63(const int nloop, const double* source, double* target) {
33 const double c68 = 115.27819611704548;
34 const double c42 = 90.117111305234374;
35 const double c110 = 84.187291202413675;
36 const double c93 = 76.852130744696993;
37 const double c73 = 72.908332857088425;
38 const double c58 = 70.593189738812626;
39 const double c64 = 57.639098058522741;
40 const double c45 = 56.995065575889988;
41 const double c147 = 56.124860801609124;
42 const double c35 = 55.185234947855392;
43 const double c115 = 53.244718047896548;
44 const double c23 = 52.029138470668528;
45 const double c101 = 51.553976568253198;
46 const double c95 = 48.605555238058955;
47 const double c88 = 47.062126492541751;
48 const double c39 = 45.058555652617187;
49 const double c82 = 44.647053374214963;
50 const double c163 = 44.37059837324712;
51 const double c189 = 43.571062644833439;
52 const double c106 = 42.093645601206838;
53 const double c7 = 39.021853853001396;
54 const double c91 = 38.426065372348496;
55 const double c149 = 35.496478698597699;
56 const double c52 = 34.902207129349286;
57 const double c144 = 34.369317712168801;
58 const double c26 = 32.906116452720461;
59 const double c124 = 32.605597678926237;
60 const double c19 = 31.861210252437054;
61 const double c112 = 31.57023420090513;
62 const double c81 = 29.764702249476645;
63 const double c188 = 29.047375096555626;
64 const double c47 = 28.497532787944994;
65 const double c109 = 28.062430400804562;
66 const double c37 = 27.592617473927696;
67 const double c198 = 27.556759606310752;
68 const double c155 = 27.171331399105199;
69 const double c177 = 26.6817177576707;
70 const double c21 = 26.014569235334264;
71 const double c10 = 24.679587339540344;
72 const double c3 = 23.895907689327789;
73 const double c57 = 23.531063246270875;
74 const double c51 = 23.268138086232856;
75 const double c40 = 22.529277826308594;
76 const double c160 = 22.18529918662356;
77 const double c184 = 21.78553132241672;
78 const double c123 = 21.737065119284157;
79 const double c31 = 20.150798681441884;
80 const double c119 = 19.966769267961205;
81 const double c97 = 19.843134832984429;
82 const double c5 = 19.510926926500698;
83 const double c104 = 19.332741213094948;
84 const double c67 = 19.213032686174248;
85 const double c34 = 18.395078315951796;
86 const double c194 = 18.371173070873837;
87 const double c74 = 18.227083214272106;
88 const double c173 = 17.787811838447134;
89 const double c113 = 17.748239349298849;
90 const double c54 = 17.451103564674643;
91 const double c100 = 17.1846588560844;
92 const double c209 = 16.875;
93 const double c108 = 15.785117100452565;
94 const double c87 = 15.687375497513916;
95 const double c22 = 15.608741541200558;
96 const double c15 = 15.113099011081413;
97 const double c182 = 14.523687548277813;
98 const double c151 = 14.491376746189438;
99 const double c46 = 14.248766393972497;
100 const double c105 = 14.031215200402281;
101 const double c196 = 13.778379803155376;
102 const double c159 = 13.5856656995526;
103 const double c30 = 13.433865787627923;
104 const double c175 = 13.34085887883535;
105 const double c116 = 13.311179511974137;
106 const double c128 = 12.227099129597338;
107 const double c71 = 12.151388809514739;
108 const double c56 = 11.765531623135438;
109 const double c53 = 11.634069043116428;
110 const double c70 = 11.527819611704547;
111 const double c143 = 11.456439237389599;
112 const double c206 = 11.25;
113 const double c164 = 11.224972160321824;
114 const double c162 = 11.09264959331178;
115 const double c183 = 10.89276566120836;
116 const double c122 = 10.868532559642079;
117 const double c18 = 10.620403417479018;
118 const double c111 = 10.523411400301709;
119 const double c14 = 10.075399340720942;
120 const double c24 = 9.8718349358161372;
121 const double c63 = 9.6065163430871241;
122 const double c17 = 9.5583630757311155;
123 const double c36 = 9.197539157975898;
124 const double c154 = 9.0571104663683997;
125 const double c41 = 9.0117111305234374;
126 const double c176 = 8.8939059192235668;
127 const double c150 = 8.8741196746494246;
128 const double c169 = 8.5923294280422002;
129 const double c208 = 8.4375;
130 const double c27 = 8.2265291131801153;
131 const double c127 = 8.1513994197315593;
132 const double c2 = 7.9653025631092635;
133 const double c20 = 7.8043707706002792;
134 const double c94 = 7.6852130744696989;
135 const double c205 = 7.5;
136 const double c80 = 7.4411755623691613;
137 const double c77 = 7.2908332857088425;
138 const double c121 = 7.245688373094719;
139 const double c48 = 7.1243831969862486;
140 const double c62 = 7.0593189738812621;
141 const double c148 = 7.0156076002011405;
142 const double c199 = 6.8891899015776881;
143 const double c167 = 6.8738635424337602;
144 const double c157 = 6.7928328497762998;
145 const double c117 = 6.6555897559870685;
146 const double c103 = 6.4442470710316497;
147 const double c11 = 6.169896834885086;
148 const double c29 = 6.0452396044325658;
149 const double c172 = 5.9292706128157109;
150 const double c66 = 5.7639098058522737;
151 const double c99 = 5.7282196186947996;
152 const double c43 = 5.6995065575889985;
153 const double c207 = 5.625;
154 const double c161 = 5.54632479665589;
155 const double c33 = 5.5185234947855388;
156 const double c107 = 5.2617057001508547;
157 const double c120 = 4.9916923169903011;
158 const double c79 = 4.9607837082461073;
159 const double c96 = 4.8605555238058953;
160 const double c90 = 4.7062126492541747;
161 const double c195 = 4.5927932677184593;
162 const double c166 = 4.5825756949558398;
163 const double c158 = 4.5285552331841998;
164 const double c38 = 4.5058555652617187;
165 const double c86 = 4.4647053374214964;
166 const double c174 = 4.4469529596117834;
167 const double c114 = 4.4370598373247123;
168 const double c146 = 4.2961647140211001;
169 const double c126 = 4.0756997098657797;
170 const double c28 = 4.0301597362883772;
171 const double c55 = 3.9218438743784789;
172 const double c187 = 3.872983346207417;
173 const double c92 = 3.8426065372348495;
174 const double c191 = 3.6309218870694533;
175 const double c153 = 3.6228441865473595;
176 const double c134 = 3.5078038001005702;
177 const double c50 = 3.4902207129349283;
178 const double c197 = 3.444594950788844;
179 const double c16 = 3.1861210252437053;
180 const double c72 = 3.0378472023786847;
181 const double c85 = 2.9764702249476644;
182 const double c168 = 2.8641098093473998;
183 const double c165 = 2.8062430400804561;
184 const double c125 = 2.7171331399105196;
185 const double c6 = 2.6014569235334264;
186 const double c25 = 2.4679587339540343;
187 const double c192 = 2.4494897427831779;
188 const double c171 = 2.3717082451262845;
189 const double c61 = 2.3531063246270874;
190 const double c49 = 2.3268138086232857;
191 const double c202 = 2.2963966338592297;
192 const double c156 = 2.2642776165920999;
193 const double c180 = 2.2234764798058917;
194 const double c137 = 2.2185299186623562;
195 const double c102 = 2.1480823570105501;
196 const double c98 = 1.984313483298443;
197 const double c181 = 1.9364916731037085;
198 const double c69 = 1.9213032686174247;
199 const double c32 = 1.8395078315951796;
200 const double c78 = 1.8227083214272106;
201 const double c186 = 1.8154609435347266;
202 const double c152 = 1.8114220932736798;
203 const double c133 = 1.7539019000502851;
204 const double c118 = 1.6638974389967671;
205 const double c8 = 1.6453058226360229;
206 const double c1 = 1.5930605126218527;
207 const double c89 = 1.5687375497513916;
208 const double c204 = 1.5;
209 const double c145 = 1.4320549046736999;
210 const double c44 = 1.4248766393972496;
211 const double c213 = 1.40625;
212 const double c142 = 1.3585665699552598;
213 const double c4 = 1.3007284617667132;
214 const double c75 = 1.2151388809514738;
215 const double c190 = 1.2103072956898178;
216 const double c60 = 1.1765531623135437;
217 const double c135 = 1.1092649593311781;
218 const double c130 = 1.074041178505275;
219 const double c13 = 1.0075399340720943;
220 const double c65 = 0.96065163430871237;
221 const double c212 = 0.9375;
222 const double c141 = 0.90571104663683988;
223 const double c132 = 0.87695095002514256;
224 const double c170 = 0.79056941504209488;
225 const double c200 = 0.76546554461974314;
226 const double c84 = 0.74411755623691611;
227 const double c179 = 0.74115882660196386;
228 const double c131 = 0.71602745233684995;
229 const double c140 = 0.67928328497762991;
230 const double c12 = 0.67169328938139616;
231 const double c193 = 0.61237243569579447;
232 const double c185 = 0.60515364784490888;
233 const double c203 = 0.57409915846480741;
234 const double c138 = 0.55463247966558904;
235 const double c0 = 0.53102017087395093;
236 const double c83 = 0.49607837082461076;
237 const double c211 = 0.46875;
238 const double c139 = 0.45285552331841994;
239 const double c9 = 0.41132645565900572;
240 const double c59 = 0.39218438743784789;
241 const double c129 = 0.35801372616842497;
242 const double c210 = 0.3125;
243 const double c76 = 0.30378472023786846;
244 const double c136 = 0.27731623983279452;
245 const double c178 = 0.24705294220065463;
246 const double c201 = 0.19136638615493579;
247 for (int iloop = 0; iloop != nloop; ++iloop, target += 91, source += 280) {
248 target[0] = c0 * source[0] - c1 * source[2] - c2 * source[20]
249 + c3 * source[22] + c2 * source[40] - c3 * source[42]
250 - c0 * source[60] + c1 * source[62];
251 target[1] = c1 * source[1] - c0 * source[3] - c3 * source[21]
252 + c2 * source[23] + c3 * source[41] - c2 * source[43]
253 - c1 * source[61] + c0 * source[63];
254 target[2] = c4 * source[4] - c4 * source[6] - c5 * source[24]
255 + c5 * source[26] + c5 * source[44] - c5 * source[46]
256 - c4 * source[64] + c4 * source[66];
257 target[3] = c6 * source[5] - c7 * source[25] + c7 * source[45]
258 - c6 * source[65];
259 target[4] = c8 * source[7] - c9 * source[0] - c9 * source[2]
260 - c10 * source[27] + c11 * source[20] + c11 * source[22]
261 + c10 * source[47] - c11 * source[40] - c11 * source[42]
262 - c8 * source[67] + c9 * source[60] + c9 * source[62];
263 target[5] = c8 * source[8] - c9 * source[1] - c9 * source[3]
264 - c10 * source[28] + c11 * source[21] + c11 * source[23]
265 + c10 * source[48] - c11 * source[41] - c11 * source[43]
266 - c8 * source[68] + c9 * source[61] + c9 * source[63];
267 target[6] = c12 * source[9] - c13 * source[4] - c13 * source[6]
268 - c14 * source[29] + c15 * source[24] + c15 * source[26]
269 + c14 * source[49] - c15 * source[44] - c15 * source[46]
270 - c12 * source[69] + c13 * source[64] + c13 * source[66];
271 target[7] = c16 * source[10] - c17 * source[12] - c18 * source[30]
272 + c19 * source[32] + c16 * source[50] - c17 * source[52];
273 target[8] = c17 * source[11] - c16 * source[13] - c19 * source[31]
274 + c18 * source[33] + c17 * source[51] - c16 * source[53];
275 target[9] = c20 * source[14] - c20 * source[16] - c21 * source[34]
276 + c21 * source[36] + c20 * source[54] - c20 * source[56];
277 target[10] = c22 * source[15] - c23 * source[35] + c22 * source[55];
278 target[11] = c24 * source[17] - c25 * source[10] - c25 * source[12]
279 - c26 * source[37] + c27 * source[30] + c27 * source[32]
280 + c24 * source[57] - c25 * source[50] - c25 * source[52];
281 target[12] = c24 * source[18] - c25 * source[11] - c25 * source[13]
282 - c26 * source[38] + c27 * source[31] + c27 * source[33]
283 + c24 * source[58] - c25 * source[51] - c25 * source[53];
284 target[13] = c28 * source[19] - c29 * source[14] - c29 * source[16]
285 - c30 * source[39] + c31 * source[34] + c31 * source[36]
286 + c28 * source[59] - c29 * source[54] - c29 * source[56];
287 target[14] = c32 * source[70] - c33 * source[72] - c34 * source[90]
288 + c35 * source[92] + c36 * source[110] - c37 * source[112];
289 target[15] = c33 * source[71] - c32 * source[73] - c35 * source[91]
290 + c34 * source[93] + c37 * source[111] - c36 * source[113];
291 target[16] = c38 * source[74] - c38 * source[76] - c39 * source[94]
292 + c39 * source[96] + c40 * source[114] - c40 * source[116];
293 target[17] = c41 * source[75] - c42 * source[95] + c39 * source[115];
294 target[18] = c43 * source[77] - c44 * source[70] - c44 * source[72]
295 - c45 * source[97] + c46 * source[90] + c46 * source[92]
296 + c47 * source[117] - c48 * source[110] - c48 * source[112];
297 target[19] = c43 * source[78] - c44 * source[71] - c44 * source[73]
298 - c45 * source[98] + c46 * source[91] + c46 * source[93]
299 + c47 * source[118] - c48 * source[111] - c48 * source[113];
300 target[20] = c49 * source[79] - c50 * source[74] - c50 * source[76]
301 - c51 * source[99] + c52 * source[94] + c52 * source[96]
302 + c53 * source[119] - c54 * source[114] - c54 * source[116];
303 target[21] = c36 * source[80] - c37 * source[82] - c34 * source[100]
304 + c35 * source[102] + c32 * source[120] - c33 * source[122];
305 target[22] = c37 * source[81] - c36 * source[83] - c35 * source[101]
306 + c34 * source[103] + c33 * source[121] - c32 * source[123];
307 target[23] = c40 * source[84] - c40 * source[86] - c39 * source[104]
308 + c39 * source[106] + c38 * source[124] - c38 * source[126];
309 target[24] = c39 * source[85] - c42 * source[105] + c41 * source[125];
310 target[25] = c47 * source[87] - c48 * source[80] - c48 * source[82]
311 - c45 * source[107] + c46 * source[100] + c46 * source[102]
312 + c43 * source[127] - c44 * source[120] - c44 * source[122];
313 target[26] = c47 * source[88] - c48 * source[81] - c48 * source[83]
314 - c45 * source[108] + c46 * source[101] + c46 * source[103]
315 + c43 * source[128] - c44 * source[121] - c44 * source[123];
316 target[27] = c53 * source[89] - c54 * source[84] - c54 * source[86]
317 - c51 * source[109] + c52 * source[104] + c52 * source[106]
318 + c49 * source[129] - c50 * source[124] - c50 * source[126];
319 target[28] = c55 * source[130] - c56 * source[132] - c57 * source[150]
320 + c58 * source[152] + c55 * source[170] - c56 * source[172]
321 - c59 * source[0] + c60 * source[2] + c61 * source[20]
322 - c62 * source[22] - c59 * source[40] + c60 * source[42]
323 - c59 * source[20] + c60 * source[22] + c61 * source[40]
324 - c62 * source[42] - c59 * source[60] + c60 * source[62];
325 target[29] = c56 * source[131] - c55 * source[133] - c58 * source[151]
326 + c57 * source[153] + c56 * source[171] - c55 * source[173]
327 - c60 * source[1] + c59 * source[3] + c62 * source[21]
328 - c61 * source[23] - c60 * source[41] + c59 * source[43]
329 - c60 * source[21] + c59 * source[23] + c62 * source[41]
330 - c61 * source[43] - c60 * source[61] + c59 * source[63];
331 target[30] = c63 * source[134] - c63 * source[136] - c64 * source[154]
332 + c64 * source[156] + c63 * source[174] - c63 * source[176]
333 - c65 * source[4] + c65 * source[6] + c66 * source[24]
334 - c66 * source[26] - c65 * source[44] + c65 * source[46]
335 - c65 * source[24] + c65 * source[26] + c66 * source[44]
336 - c66 * source[46] - c65 * source[64] + c65 * source[66];
337 target[31] = c67 * source[135] - c68 * source[155] + c67 * source[175]
338 - c69 * source[5] + c70 * source[25] - c69 * source[45]
339 - c69 * source[25] + c70 * source[45] - c69 * source[65];
340 target[32] = c71 * source[137] - c72 * source[130] - c72 * source[132]
341 - c73 * source[157] + c74 * source[150] + c74 * source[152]
342 + c71 * source[177] - c72 * source[170] - c72 * source[172]
343 - c75 * source[7] + c76 * source[0] + c76 * source[2]
344 + c77 * source[27] - c78 * source[20] - c78 * source[22]
345 - c75 * source[47] + c76 * source[40] + c76 * source[42]
346 - c75 * source[27] + c76 * source[20] + c76 * source[22]
347 + c77 * source[47] - c78 * source[40] - c78 * source[42]
348 - c75 * source[67] + c76 * source[60] + c76 * source[62];
349 target[33] = c71 * source[138] - c72 * source[131] - c72 * source[133]
350 - c73 * source[158] + c74 * source[151] + c74 * source[153]
351 + c71 * source[178] - c72 * source[171] - c72 * source[173]
352 - c75 * source[8] + c76 * source[1] + c76 * source[3]
353 + c77 * source[28] - c78 * source[21] - c78 * source[23]
354 - c75 * source[48] + c76 * source[41] + c76 * source[43]
355 - c75 * source[28] + c76 * source[21] + c76 * source[23]
356 + c77 * source[48] - c78 * source[41] - c78 * source[43]
357 - c75 * source[68] + c76 * source[61] + c76 * source[63];
358 target[34] = c79 * source[139] - c80 * source[134] - c80 * source[136]
359 - c81 * source[159] + c82 * source[154] + c82 * source[156]
360 + c79 * source[179] - c80 * source[174] - c80 * source[176]
361 - c83 * source[9] + c84 * source[4] + c84 * source[6]
362 + c85 * source[29] - c86 * source[24] - c86 * source[26]
363 - c83 * source[49] + c84 * source[44] + c84 * source[46]
364 - c83 * source[29] + c84 * source[24] + c84 * source[26]
365 + c85 * source[49] - c86 * source[44] - c86 * source[46]
366 - c83 * source[69] + c84 * source[64] + c84 * source[66];
367 target[35] = c87 * source[140] - c88 * source[142] - c87 * source[160]
368 + c88 * source[162] - c89 * source[10] + c90 * source[12]
369 + c89 * source[30] - c90 * source[32] - c89 * source[30]
370 + c90 * source[32] + c89 * source[50] - c90 * source[52];
371 target[36] = c88 * source[141] - c87 * source[143] - c88 * source[161]
372 + c87 * source[163] - c90 * source[11] + c89 * source[13]
373 + c90 * source[31] - c89 * source[33] - c90 * source[31]
374 + c89 * source[33] + c90 * source[51] - c89 * source[53];
375 target[37] = c91 * source[144] - c91 * source[146] - c91 * source[164]
376 + c91 * source[166] - c92 * source[14] + c92 * source[16]
377 + c92 * source[34] - c92 * source[36] - c92 * source[34]
378 + c92 * source[36] + c92 * source[54] - c92 * source[56];
379 target[38] = c93 * source[145] - c93 * source[165] - c94 * source[15]
380 + c94 * source[35] - c94 * source[35] + c94 * source[55];
381 target[39] = c95 * source[147] - c71 * source[140] - c71 * source[142]
382 - c95 * source[167] + c71 * source[160] + c71 * source[162]
383 - c96 * source[17] + c75 * source[10] + c75 * source[12]
384 + c96 * source[37] - c75 * source[30] - c75 * source[32]
385 - c96 * source[37] + c75 * source[30] + c75 * source[32]
386 + c96 * source[57] - c75 * source[50] - c75 * source[52];
387 target[40] = c95 * source[148] - c71 * source[141] - c71 * source[143]
388 - c95 * source[168] + c71 * source[161] + c71 * source[163]
389 - c96 * source[18] + c75 * source[11] + c75 * source[13]
390 + c96 * source[38] - c75 * source[31] - c75 * source[33]
391 - c96 * source[38] + c75 * source[31] + c75 * source[33]
392 + c96 * source[58] - c75 * source[51] - c75 * source[53];
393 target[41] = c97 * source[149] - c81 * source[144] - c81 * source[146]
394 - c97 * source[169] + c81 * source[164] + c81 * source[166]
395 - c98 * source[19] + c85 * source[14] + c85 * source[16]
396 + c98 * source[39] - c85 * source[34] - c85 * source[36]
397 - c98 * source[39] + c85 * source[34] + c85 * source[36]
398 + c98 * source[59] - c85 * source[54] - c85 * source[56];
399 target[42] = c99 * source[180] - c100 * source[182] - c100 * source[200]
400 + c101 * source[202] - c102 * source[70] + c103 * source[72]
401 + c103 * source[90] - c104 * source[92] - c102 * source[90]
402 + c103 * source[92] + c103 * source[110] - c104 * source[112];
403 target[43] = c100 * source[181] - c99 * source[183] - c101 * source[201]
404 + c100 * source[203] - c103 * source[71] + c102 * source[73]
405 + c104 * source[91] - c103 * source[93] - c103 * source[91]
406 + c102 * source[93] + c104 * source[111] - c103 * source[113];
407 target[44] = c105 * source[184] - c105 * source[186] - c106 * source[204]
408 + c106 * source[206] - c107 * source[74] + c107 * source[76]
409 + c108 * source[94] - c108 * source[96] - c107 * source[94]
410 + c107 * source[96] + c108 * source[114] - c108 * source[116];
411 target[45] = c109 * source[185] - c110 * source[205] - c111 * source[75]
412 + c112 * source[95] - c111 * source[95] + c112 * source[115];
413 target[46] = c113 * source[187] - c114 * source[180] - c114 * source[182]
414 - c115 * source[207] + c116 * source[200] + c116 * source[202]
415 - c117 * source[77] + c118 * source[70] + c118 * source[72]
416 + c119 * source[97] - c120 * source[90] - c120 * source[92]
417 - c117 * source[97] + c118 * source[90] + c118 * source[92]
418 + c119 * source[117] - c120 * source[110] - c120 * source[112];
419 target[47] = c113 * source[188] - c114 * source[181] - c114 * source[183]
420 - c115 * source[208] + c116 * source[201] + c116 * source[203]
421 - c117 * source[78] + c118 * source[71] + c118 * source[73]
422 + c119 * source[98] - c120 * source[91] - c120 * source[93]
423 - c117 * source[98] + c118 * source[91] + c118 * source[93]
424 + c119 * source[118] - c120 * source[111] - c120 * source[113];
425 target[48] = c121 * source[189] - c122 * source[184] - c122 * source[186]
426 - c123 * source[209] + c124 * source[204] + c124 * source[206]
427 - c125 * source[79] + c126 * source[74] + c126 * source[76]
428 + c127 * source[99] - c128 * source[94] - c128 * source[96]
429 - c125 * source[99] + c126 * source[94] + c126 * source[96]
430 + c127 * source[119] - c128 * source[114] - c128 * source[116];
431 target[49] = c100 * source[190] - c101 * source[192] - c99 * source[210]
432 + c100 * source[212] - c103 * source[80] + c104 * source[82]
433 + c102 * source[100] - c103 * source[102] - c103 * source[100]
434 + c104 * source[102] + c102 * source[120] - c103 * source[122];
435 target[50] = c101 * source[191] - c100 * source[193] - c100 * source[211]
436 + c99 * source[213] - c104 * source[81] + c103 * source[83]
437 + c103 * source[101] - c102 * source[103] - c104 * source[101]
438 + c103 * source[103] + c103 * source[121] - c102 * source[123];
439 target[51] = c106 * source[194] - c106 * source[196] - c105 * source[214]
440 + c105 * source[216] - c108 * source[84] + c108 * source[86]
441 + c107 * source[104] - c107 * source[106] - c108 * source[104]
442 + c108 * source[106] + c107 * source[124] - c107 * source[126];
443 target[52] = c110 * source[195] - c109 * source[215] - c112 * source[85]
444 + c111 * source[105] - c112 * source[105] + c111 * source[125];
445 target[53] = c115 * source[197] - c116 * source[190] - c116 * source[192]
446 - c113 * source[217] + c114 * source[210] + c114 * source[212]
447 - c119 * source[87] + c120 * source[80] + c120 * source[82]
448 + c117 * source[107] - c118 * source[100] - c118 * source[102]
449 - c119 * source[107] + c120 * source[100] + c120 * source[102]
450 + c117 * source[127] - c118 * source[120] - c118 * source[122];
451 target[54] = c115 * source[198] - c116 * source[191] - c116 * source[193]
452 - c113 * source[218] + c114 * source[211] + c114 * source[213]
453 - c119 * source[88] + c120 * source[81] + c120 * source[83]
454 + c117 * source[108] - c118 * source[101] - c118 * source[103]
455 - c119 * source[108] + c120 * source[101] + c120 * source[103]
456 + c117 * source[128] - c118 * source[121] - c118 * source[123];
457 target[55] = c123 * source[199] - c124 * source[194] - c124 * source[196]
458 - c121 * source[219] + c122 * source[214] + c122 * source[216]
459 - c127 * source[89] + c128 * source[84] + c128 * source[86]
460 + c125 * source[109] - c126 * source[104] - c126 * source[106]
461 - c127 * source[109] + c128 * source[104] + c128 * source[106]
462 + c125 * source[129] - c126 * source[124] - c126 * source[126];
463 target[56] = c99 * source[220] - c100 * source[222] - c99 * source[240]
464 + c100 * source[242] - c99 * source[130] + c100 * source[132]
465 + c99 * source[150] - c100 * source[152] - c99 * source[150]
466 + c100 * source[152] + c99 * source[170] - c100 * source[172]
467 + c129 * source[0] - c130 * source[2] - c129 * source[20]
468 + c130 * source[22] + c131 * source[20] - c102 * source[22]
469 - c131 * source[40] + c102 * source[42] + c129 * source[40]
470 - c130 * source[42] - c129 * source[60] + c130 * source[62];
471 target[57] = c100 * source[221] - c99 * source[223] - c100 * source[241]
472 + c99 * source[243] - c100 * source[131] + c99 * source[133]
473 + c100 * source[151] - c99 * source[153] - c100 * source[151]
474 + c99 * source[153] + c100 * source[171] - c99 * source[173]
475 + c130 * source[1] - c129 * source[3] - c130 * source[21]
476 + c129 * source[23] + c102 * source[21] - c131 * source[23]
477 - c102 * source[41] + c131 * source[43] + c130 * source[41]
478 - c129 * source[43] - c130 * source[61] + c129 * source[63];
479 target[58] = c105 * source[224] - c105 * source[226] - c105 * source[244]
480 + c105 * source[246] - c105 * source[134] + c105 * source[136]
481 + c105 * source[154] - c105 * source[156] - c105 * source[154]
482 + c105 * source[156] + c105 * source[174] - c105 * source[176]
483 + c132 * source[4] - c132 * source[6] - c132 * source[24]
484 + c132 * source[26] + c133 * source[24] - c133 * source[26]
485 - c133 * source[44] + c133 * source[46] + c132 * source[44]
486 - c132 * source[46] - c132 * source[64] + c132 * source[66];
487 target[59] = c109 * source[225] - c109 * source[245] - c109 * source[135]
488 + c109 * source[155] - c109 * source[155] + c109 * source[175]
489 + c133 * source[5] - c133 * source[25] + c134 * source[25]
490 - c134 * source[45] + c133 * source[45] - c133 * source[65];
491 target[60] = c113 * source[227] - c114 * source[220] - c114 * source[222]
492 - c113 * source[247] + c114 * source[240] + c114 * source[242]
493 - c113 * source[137] + c114 * source[130] + c114 * source[132]
494 + c113 * source[157] - c114 * source[150] - c114 * source[152]
495 - c113 * source[157] + c114 * source[150] + c114 * source[152]
496 + c113 * source[177] - c114 * source[170] - c114 * source[172]
497 + c135 * source[7] - c136 * source[0] - c136 * source[2]
498 - c135 * source[27] + c136 * source[20] + c136 * source[22]
499 + c137 * source[27] - c138 * source[20] - c138 * source[22]
500 - c137 * source[47] + c138 * source[40] + c138 * source[42]
501 + c135 * source[47] - c136 * source[40] - c136 * source[42]
502 - c135 * source[67] + c136 * source[60] + c136 * source[62];
503 target[61] = c113 * source[228] - c114 * source[221] - c114 * source[223]
504 - c113 * source[248] + c114 * source[241] + c114 * source[243]
505 - c113 * source[138] + c114 * source[131] + c114 * source[133]
506 + c113 * source[158] - c114 * source[151] - c114 * source[153]
507 - c113 * source[158] + c114 * source[151] + c114 * source[153]
508 + c113 * source[178] - c114 * source[171] - c114 * source[173]
509 + c135 * source[8] - c136 * source[1] - c136 * source[3]
510 - c135 * source[28] + c136 * source[21] + c136 * source[23]
511 + c137 * source[28] - c138 * source[21] - c138 * source[23]
512 - c137 * source[48] + c138 * source[41] + c138 * source[43]
513 + c135 * source[48] - c136 * source[41] - c136 * source[43]
514 - c135 * source[68] + c136 * source[61] + c136 * source[63];
515 target[62] = c121 * source[229] - c122 * source[224] - c122 * source[226]
516 - c121 * source[249] + c122 * source[244] + c122 * source[246]
517 - c121 * source[139] + c122 * source[134] + c122 * source[136]
518 + c121 * source[159] - c122 * source[154] - c122 * source[156]
519 - c121 * source[159] + c122 * source[154] + c122 * source[156]
520 + c121 * source[179] - c122 * source[174] - c122 * source[176]
521 + c139 * source[9] - c140 * source[4] - c140 * source[6]
522 - c139 * source[29] + c140 * source[24] + c140 * source[26]
523 + c141 * source[29] - c142 * source[24] - c142 * source[26]
524 - c141 * source[49] + c142 * source[44] + c142 * source[46]
525 + c139 * source[49] - c140 * source[44] - c140 * source[46]
526 - c139 * source[69] + c140 * source[64] + c140 * source[66];
527 target[63] = c143 * source[230] - c144 * source[232] - c143 * source[140]
528 + c144 * source[142] - c143 * source[160] + c144 * source[162]
529 + c131 * source[10] - c102 * source[12] + c145 * source[30]
530 - c146 * source[32] + c131 * source[50] - c102 * source[52];
531 target[64] = c144 * source[231] - c143 * source[233] - c144 * source[141]
532 + c143 * source[143] - c144 * source[161] + c143 * source[163]
533 + c102 * source[11] - c131 * source[13] + c146 * source[31]
534 - c145 * source[33] + c102 * source[51] - c131 * source[53];
535 target[65] = c109 * source[234] - c109 * source[236] - c109 * source[144]
536 + c109 * source[146] - c109 * source[164] + c109 * source[166]
537 + c133 * source[14] - c133 * source[16] + c134 * source[34]
538 - c134 * source[36] + c133 * source[54] - c133 * source[56];
539 target[66] = c147 * source[235] - c147 * source[145] - c147 * source[165]
540 + c134 * source[15] + c148 * source[35] + c134 * source[55];
541 target[67] = c149 * source[237] - c150 * source[230] - c150 * source[232]
542 - c149 * source[147] + c150 * source[140] + c150 * source[142]
543 - c149 * source[167] + c150 * source[160] + c150 * source[162]
544 + c137 * source[17] - c138 * source[10] - c138 * source[12]
545 + c114 * source[37] - c135 * source[30] - c135 * source[32]
546 + c137 * source[57] - c138 * source[50] - c138 * source[52];
547 target[68] = c149 * source[238] - c150 * source[231] - c150 * source[233]
548 - c149 * source[148] + c150 * source[141] + c150 * source[143]
549 - c149 * source[168] + c150 * source[161] + c150 * source[163]
550 + c137 * source[18] - c138 * source[11] - c138 * source[13]
551 + c114 * source[38] - c135 * source[31] - c135 * source[33]
552 + c137 * source[58] - c138 * source[51] - c138 * source[53];
553 target[69] = c151 * source[239] - c123 * source[234] - c123 * source[236]
554 - c151 * source[149] + c123 * source[144] + c123 * source[146]
555 - c151 * source[169] + c123 * source[164] + c123 * source[166]
556 + c141 * source[19] - c142 * source[14] - c142 * source[16]
557 + c152 * source[39] - c125 * source[34] - c125 * source[36]
558 + c141 * source[59] - c142 * source[54] - c142 * source[56];
559 target[70] = c153 * source[250] - c122 * source[252] - c154 * source[180]
560 + c155 * source[182] - c154 * source[200] + c155 * source[202]
561 + c156 * source[70] - c157 * source[72] + c158 * source[90]
562 - c159 * source[92] + c156 * source[110] - c157 * source[112];
563 target[71] = c122 * source[251] - c153 * source[253] - c155 * source[181]
564 + c154 * source[183] - c155 * source[201] + c154 * source[203]
565 + c157 * source[71] - c156 * source[73] + c159 * source[91]
566 - c158 * source[93] + c157 * source[111] - c156 * source[113];
567 target[72] = c150 * source[254] - c150 * source[256] - c160 * source[184]
568 + c160 * source[186] - c160 * source[204] + c160 * source[206]
569 + c161 * source[74] - c161 * source[76] + c162 * source[94]
570 - c162 * source[96] + c161 * source[114] - c161 * source[116];
571 target[73] = c113 * source[255] - c163 * source[185] - c163 * source[205]
572 + c162 * source[75] + c160 * source[95] + c162 * source[115];
573 target[74] = c164 * source[257] - c165 * source[250] - c165 * source[252]
574 - c109 * source[187] + c148 * source[180] + c148 * source[182]
575 - c109 * source[207] + c148 * source[200] + c148 * source[202]
576 + c148 * source[77] - c133 * source[70] - c133 * source[72]
577 + c105 * source[97] - c134 * source[90] - c134 * source[92]
578 + c148 * source[117] - c133 * source[110] - c133 * source[112];
579 target[75] = c164 * source[258] - c165 * source[251] - c165 * source[253]
580 - c109 * source[188] + c148 * source[181] + c148 * source[183]
581 - c109 * source[208] + c148 * source[201] + c148 * source[203]
582 + c148 * source[78] - c133 * source[71] - c133 * source[73]
583 + c105 * source[98] - c134 * source[91] - c134 * source[93]
584 + c148 * source[118] - c133 * source[111] - c133 * source[113];
585 target[76] = c166 * source[259] - c167 * source[254] - c167 * source[256]
586 - c143 * source[189] + c100 * source[184] + c100 * source[186]
587 - c143 * source[209] + c100 * source[204] + c100 * source[206]
588 + c168 * source[79] - c146 * source[74] - c146 * source[76]
589 + c99 * source[99] - c169 * source[94] - c169 * source[96]
590 + c168 * source[119] - c146 * source[114] - c146 * source[116];
591 target[77] = c153 * source[260] - c122 * source[262] - c154 * source[190]
592 + c155 * source[192] - c154 * source[210] + c155 * source[212]
593 + c156 * source[80] - c157 * source[82] + c158 * source[100]
594 - c159 * source[102] + c156 * source[120] - c157 * source[122];
595 target[78] = c122 * source[261] - c153 * source[263] - c155 * source[191]
596 + c154 * source[193] - c155 * source[211] + c154 * source[213]
597 + c157 * source[81] - c156 * source[83] + c159 * source[101]
598 - c158 * source[103] + c157 * source[121] - c156 * source[123];
599 target[79] = c150 * source[264] - c150 * source[266] - c160 * source[194]
600 + c160 * source[196] - c160 * source[214] + c160 * source[216]
601 + c161 * source[84] - c161 * source[86] + c162 * source[104]
602 - c162 * source[106] + c161 * source[124] - c161 * source[126];
603 target[80] = c113 * source[265] - c163 * source[195] - c163 * source[215]
604 + c162 * source[85] + c160 * source[105] + c162 * source[125];
605 target[81] = c164 * source[267] - c165 * source[260] - c165 * source[262]
606 - c109 * source[197] + c148 * source[190] + c148 * source[192]
607 - c109 * source[217] + c148 * source[210] + c148 * source[212]
608 + c148 * source[87] - c133 * source[80] - c133 * source[82]
609 + c105 * source[107] - c134 * source[100] - c134 * source[102]
610 + c148 * source[127] - c133 * source[120] - c133 * source[122];
611 target[82] = c164 * source[268] - c165 * source[261] - c165 * source[263]
612 - c109 * source[198] + c148 * source[191] + c148 * source[193]
613 - c109 * source[218] + c148 * source[211] + c148 * source[213]
614 + c148 * source[88] - c133 * source[81] - c133 * source[83]
615 + c105 * source[108] - c134 * source[101] - c134 * source[103]
616 + c148 * source[128] - c133 * source[121] - c133 * source[123];
617 target[83] = c166 * source[269] - c167 * source[264] - c167 * source[266]
618 - c143 * source[199] + c100 * source[194] + c100 * source[196]
619 - c143 * source[219] + c100 * source[214] + c100 * source[216]
620 + c168 * source[89] - c146 * source[84] - c146 * source[86]
621 + c99 * source[109] - c169 * source[104] - c169 * source[106]
622 + c168 * source[129] - c146 * source[124] - c146 * source[126];
623 target[84] = c170 * source[270] - c171 * source[272] - c172 * source[220]
624 + c173 * source[222] - c172 * source[240] + c173 * source[242]
625 + c174 * source[130] - c175 * source[132] + c176 * source[150]
626 - c177 * source[152] + c174 * source[170] - c175 * source[172]
627 - c178 * source[0] + c179 * source[2] - c179 * source[20]
628 + c180 * source[22] - c179 * source[40] + c180 * source[42]
629 - c178 * source[60] + c179 * source[62];
630 target[85] = c171 * source[271] - c170 * source[273] - c173 * source[221]
631 + c172 * source[223] - c173 * source[241] + c172 * source[243]
632 + c175 * source[131] - c174 * source[133] + c177 * source[151]
633 - c176 * source[153] + c175 * source[171] - c174 * source[173]
634 - c179 * source[1] + c178 * source[3] - c180 * source[21]
635 + c179 * source[23] - c180 * source[41] + c179 * source[43]
636 - c179 * source[61] + c178 * source[63];
637 target[86] = c181 * source[274] - c181 * source[276] - c182 * source[224]
638 + c182 * source[226] - c182 * source[244] + c182 * source[246]
639 + c183 * source[134] - c183 * source[136] + c184 * source[154]
640 - c184 * source[156] + c183 * source[174] - c183 * source[176]
641 - c185 * source[4] + c185 * source[6] - c186 * source[24]
642 + c186 * source[26] - c186 * source[44] + c186 * source[46]
643 - c185 * source[64] + c185 * source[66];
644 target[87] = c187 * source[275] - c188 * source[225] - c188 * source[245]
645 + c184 * source[135] + c189 * source[155] + c184 * source[175]
646 - c190 * source[5] - c191 * source[25] - c191 * source[45]
647 - c190 * source[65];
648 target[88] = c192 * source[277] - c193 * source[270] - c193 * source[272]
649 - c194 * source[227] + c195 * source[220] + c195 * source[222]
650 - c194 * source[247] + c195 * source[240] + c195 * source[242]
651 + c196 * source[137] - c197 * source[130] - c197 * source[132]
652 + c198 * source[157] - c199 * source[150] - c199 * source[152]
653 + c196 * source[177] - c197 * source[170] - c197 * source[172]
654 - c200 * source[7] + c201 * source[0] + c201 * source[2]
655 - c202 * source[27] + c203 * source[20] + c203 * source[22]
656 - c202 * source[47] + c203 * source[40] + c203 * source[42]
657 - c200 * source[67] + c201 * source[60] + c201 * source[62];
658 target[89] = c192 * source[278] - c193 * source[271] - c193 * source[273]
659 - c194 * source[228] + c195 * source[221] + c195 * source[223]
660 - c194 * source[248] + c195 * source[241] + c195 * source[243]
661 + c196 * source[138] - c197 * source[131] - c197 * source[133]
662 + c198 * source[158] - c199 * source[151] - c199 * source[153]
663 + c196 * source[178] - c197 * source[171] - c197 * source[173]
664 - c200 * source[8] + c201 * source[1] + c201 * source[3]
665 - c202 * source[28] + c203 * source[21] + c203 * source[23]
666 - c202 * source[48] + c203 * source[41] + c203 * source[43]
667 - c200 * source[68] + c201 * source[61] + c201 * source[63];
668 target[90] = source[279] - c204 * source[274] - c204 * source[276]
669 - c205 * source[229] + c206 * source[224] + c206 * source[226]
670 - c205 * source[249] + c206 * source[244] + c206 * source[246]
671 + c207 * source[139] - c208 * source[134] - c208 * source[136]
672 + c206 * source[159] - c209 * source[154] - c209 * source[156]
673 + c207 * source[179] - c208 * source[174] - c208 * source[176]
674 - c210 * source[9] + c211 * source[4] + c211 * source[6]
675 - c212 * source[29] + c213 * source[24] + c213 * source[26]
676 - c212 * source[49] + c213 * source[44] + c213 * source[46]
677 - c210 * source[69] + c211 * source[64] + c211 * source[66];
678 }
679 }
680
carsph_63(const int nloop,const complex<double> * source,complex<double> * target)681 void CCarSphList::carsph_63(const int nloop, const complex<double>* source, complex<double>* target) {
682 const double c68 = 115.27819611704548;
683 const double c42 = 90.117111305234374;
684 const double c110 = 84.187291202413675;
685 const double c93 = 76.852130744696993;
686 const double c73 = 72.908332857088425;
687 const double c58 = 70.593189738812626;
688 const double c64 = 57.639098058522741;
689 const double c45 = 56.995065575889988;
690 const double c147 = 56.124860801609124;
691 const double c35 = 55.185234947855392;
692 const double c115 = 53.244718047896548;
693 const double c23 = 52.029138470668528;
694 const double c101 = 51.553976568253198;
695 const double c95 = 48.605555238058955;
696 const double c88 = 47.062126492541751;
697 const double c39 = 45.058555652617187;
698 const double c82 = 44.647053374214963;
699 const double c163 = 44.37059837324712;
700 const double c189 = 43.571062644833439;
701 const double c106 = 42.093645601206838;
702 const double c7 = 39.021853853001396;
703 const double c91 = 38.426065372348496;
704 const double c149 = 35.496478698597699;
705 const double c52 = 34.902207129349286;
706 const double c144 = 34.369317712168801;
707 const double c26 = 32.906116452720461;
708 const double c124 = 32.605597678926237;
709 const double c19 = 31.861210252437054;
710 const double c112 = 31.57023420090513;
711 const double c81 = 29.764702249476645;
712 const double c188 = 29.047375096555626;
713 const double c47 = 28.497532787944994;
714 const double c109 = 28.062430400804562;
715 const double c37 = 27.592617473927696;
716 const double c198 = 27.556759606310752;
717 const double c155 = 27.171331399105199;
718 const double c177 = 26.6817177576707;
719 const double c21 = 26.014569235334264;
720 const double c10 = 24.679587339540344;
721 const double c3 = 23.895907689327789;
722 const double c57 = 23.531063246270875;
723 const double c51 = 23.268138086232856;
724 const double c40 = 22.529277826308594;
725 const double c160 = 22.18529918662356;
726 const double c184 = 21.78553132241672;
727 const double c123 = 21.737065119284157;
728 const double c31 = 20.150798681441884;
729 const double c119 = 19.966769267961205;
730 const double c97 = 19.843134832984429;
731 const double c5 = 19.510926926500698;
732 const double c104 = 19.332741213094948;
733 const double c67 = 19.213032686174248;
734 const double c34 = 18.395078315951796;
735 const double c194 = 18.371173070873837;
736 const double c74 = 18.227083214272106;
737 const double c173 = 17.787811838447134;
738 const double c113 = 17.748239349298849;
739 const double c54 = 17.451103564674643;
740 const double c100 = 17.1846588560844;
741 const double c209 = 16.875;
742 const double c108 = 15.785117100452565;
743 const double c87 = 15.687375497513916;
744 const double c22 = 15.608741541200558;
745 const double c15 = 15.113099011081413;
746 const double c182 = 14.523687548277813;
747 const double c151 = 14.491376746189438;
748 const double c46 = 14.248766393972497;
749 const double c105 = 14.031215200402281;
750 const double c196 = 13.778379803155376;
751 const double c159 = 13.5856656995526;
752 const double c30 = 13.433865787627923;
753 const double c175 = 13.34085887883535;
754 const double c116 = 13.311179511974137;
755 const double c128 = 12.227099129597338;
756 const double c71 = 12.151388809514739;
757 const double c56 = 11.765531623135438;
758 const double c53 = 11.634069043116428;
759 const double c70 = 11.527819611704547;
760 const double c143 = 11.456439237389599;
761 const double c206 = 11.25;
762 const double c164 = 11.224972160321824;
763 const double c162 = 11.09264959331178;
764 const double c183 = 10.89276566120836;
765 const double c122 = 10.868532559642079;
766 const double c18 = 10.620403417479018;
767 const double c111 = 10.523411400301709;
768 const double c14 = 10.075399340720942;
769 const double c24 = 9.8718349358161372;
770 const double c63 = 9.6065163430871241;
771 const double c17 = 9.5583630757311155;
772 const double c36 = 9.197539157975898;
773 const double c154 = 9.0571104663683997;
774 const double c41 = 9.0117111305234374;
775 const double c176 = 8.8939059192235668;
776 const double c150 = 8.8741196746494246;
777 const double c169 = 8.5923294280422002;
778 const double c208 = 8.4375;
779 const double c27 = 8.2265291131801153;
780 const double c127 = 8.1513994197315593;
781 const double c2 = 7.9653025631092635;
782 const double c20 = 7.8043707706002792;
783 const double c94 = 7.6852130744696989;
784 const double c205 = 7.5;
785 const double c80 = 7.4411755623691613;
786 const double c77 = 7.2908332857088425;
787 const double c121 = 7.245688373094719;
788 const double c48 = 7.1243831969862486;
789 const double c62 = 7.0593189738812621;
790 const double c148 = 7.0156076002011405;
791 const double c199 = 6.8891899015776881;
792 const double c167 = 6.8738635424337602;
793 const double c157 = 6.7928328497762998;
794 const double c117 = 6.6555897559870685;
795 const double c103 = 6.4442470710316497;
796 const double c11 = 6.169896834885086;
797 const double c29 = 6.0452396044325658;
798 const double c172 = 5.9292706128157109;
799 const double c66 = 5.7639098058522737;
800 const double c99 = 5.7282196186947996;
801 const double c43 = 5.6995065575889985;
802 const double c207 = 5.625;
803 const double c161 = 5.54632479665589;
804 const double c33 = 5.5185234947855388;
805 const double c107 = 5.2617057001508547;
806 const double c120 = 4.9916923169903011;
807 const double c79 = 4.9607837082461073;
808 const double c96 = 4.8605555238058953;
809 const double c90 = 4.7062126492541747;
810 const double c195 = 4.5927932677184593;
811 const double c166 = 4.5825756949558398;
812 const double c158 = 4.5285552331841998;
813 const double c38 = 4.5058555652617187;
814 const double c86 = 4.4647053374214964;
815 const double c174 = 4.4469529596117834;
816 const double c114 = 4.4370598373247123;
817 const double c146 = 4.2961647140211001;
818 const double c126 = 4.0756997098657797;
819 const double c28 = 4.0301597362883772;
820 const double c55 = 3.9218438743784789;
821 const double c187 = 3.872983346207417;
822 const double c92 = 3.8426065372348495;
823 const double c191 = 3.6309218870694533;
824 const double c153 = 3.6228441865473595;
825 const double c134 = 3.5078038001005702;
826 const double c50 = 3.4902207129349283;
827 const double c197 = 3.444594950788844;
828 const double c16 = 3.1861210252437053;
829 const double c72 = 3.0378472023786847;
830 const double c85 = 2.9764702249476644;
831 const double c168 = 2.8641098093473998;
832 const double c165 = 2.8062430400804561;
833 const double c125 = 2.7171331399105196;
834 const double c6 = 2.6014569235334264;
835 const double c25 = 2.4679587339540343;
836 const double c192 = 2.4494897427831779;
837 const double c171 = 2.3717082451262845;
838 const double c61 = 2.3531063246270874;
839 const double c49 = 2.3268138086232857;
840 const double c202 = 2.2963966338592297;
841 const double c156 = 2.2642776165920999;
842 const double c180 = 2.2234764798058917;
843 const double c137 = 2.2185299186623562;
844 const double c102 = 2.1480823570105501;
845 const double c98 = 1.984313483298443;
846 const double c181 = 1.9364916731037085;
847 const double c69 = 1.9213032686174247;
848 const double c32 = 1.8395078315951796;
849 const double c78 = 1.8227083214272106;
850 const double c186 = 1.8154609435347266;
851 const double c152 = 1.8114220932736798;
852 const double c133 = 1.7539019000502851;
853 const double c118 = 1.6638974389967671;
854 const double c8 = 1.6453058226360229;
855 const double c1 = 1.5930605126218527;
856 const double c89 = 1.5687375497513916;
857 const double c204 = 1.5;
858 const double c145 = 1.4320549046736999;
859 const double c44 = 1.4248766393972496;
860 const double c213 = 1.40625;
861 const double c142 = 1.3585665699552598;
862 const double c4 = 1.3007284617667132;
863 const double c75 = 1.2151388809514738;
864 const double c190 = 1.2103072956898178;
865 const double c60 = 1.1765531623135437;
866 const double c135 = 1.1092649593311781;
867 const double c130 = 1.074041178505275;
868 const double c13 = 1.0075399340720943;
869 const double c65 = 0.96065163430871237;
870 const double c212 = 0.9375;
871 const double c141 = 0.90571104663683988;
872 const double c132 = 0.87695095002514256;
873 const double c170 = 0.79056941504209488;
874 const double c200 = 0.76546554461974314;
875 const double c84 = 0.74411755623691611;
876 const double c179 = 0.74115882660196386;
877 const double c131 = 0.71602745233684995;
878 const double c140 = 0.67928328497762991;
879 const double c12 = 0.67169328938139616;
880 const double c193 = 0.61237243569579447;
881 const double c185 = 0.60515364784490888;
882 const double c203 = 0.57409915846480741;
883 const double c138 = 0.55463247966558904;
884 const double c0 = 0.53102017087395093;
885 const double c83 = 0.49607837082461076;
886 const double c211 = 0.46875;
887 const double c139 = 0.45285552331841994;
888 const double c9 = 0.41132645565900572;
889 const double c59 = 0.39218438743784789;
890 const double c129 = 0.35801372616842497;
891 const double c210 = 0.3125;
892 const double c76 = 0.30378472023786846;
893 const double c136 = 0.27731623983279452;
894 const double c178 = 0.24705294220065463;
895 const double c201 = 0.19136638615493579;
896 for (int iloop = 0; iloop != nloop; ++iloop, target += 91, source += 280) {
897 target[0] = c0 * source[0] - c1 * source[2] - c2 * source[20]
898 + c3 * source[22] + c2 * source[40] - c3 * source[42]
899 - c0 * source[60] + c1 * source[62];
900 target[1] = c1 * source[1] - c0 * source[3] - c3 * source[21]
901 + c2 * source[23] + c3 * source[41] - c2 * source[43]
902 - c1 * source[61] + c0 * source[63];
903 target[2] = c4 * source[4] - c4 * source[6] - c5 * source[24]
904 + c5 * source[26] + c5 * source[44] - c5 * source[46]
905 - c4 * source[64] + c4 * source[66];
906 target[3] = c6 * source[5] - c7 * source[25] + c7 * source[45]
907 - c6 * source[65];
908 target[4] = c8 * source[7] - c9 * source[0] - c9 * source[2]
909 - c10 * source[27] + c11 * source[20] + c11 * source[22]
910 + c10 * source[47] - c11 * source[40] - c11 * source[42]
911 - c8 * source[67] + c9 * source[60] + c9 * source[62];
912 target[5] = c8 * source[8] - c9 * source[1] - c9 * source[3]
913 - c10 * source[28] + c11 * source[21] + c11 * source[23]
914 + c10 * source[48] - c11 * source[41] - c11 * source[43]
915 - c8 * source[68] + c9 * source[61] + c9 * source[63];
916 target[6] = c12 * source[9] - c13 * source[4] - c13 * source[6]
917 - c14 * source[29] + c15 * source[24] + c15 * source[26]
918 + c14 * source[49] - c15 * source[44] - c15 * source[46]
919 - c12 * source[69] + c13 * source[64] + c13 * source[66];
920 target[7] = c16 * source[10] - c17 * source[12] - c18 * source[30]
921 + c19 * source[32] + c16 * source[50] - c17 * source[52];
922 target[8] = c17 * source[11] - c16 * source[13] - c19 * source[31]
923 + c18 * source[33] + c17 * source[51] - c16 * source[53];
924 target[9] = c20 * source[14] - c20 * source[16] - c21 * source[34]
925 + c21 * source[36] + c20 * source[54] - c20 * source[56];
926 target[10] = c22 * source[15] - c23 * source[35] + c22 * source[55];
927 target[11] = c24 * source[17] - c25 * source[10] - c25 * source[12]
928 - c26 * source[37] + c27 * source[30] + c27 * source[32]
929 + c24 * source[57] - c25 * source[50] - c25 * source[52];
930 target[12] = c24 * source[18] - c25 * source[11] - c25 * source[13]
931 - c26 * source[38] + c27 * source[31] + c27 * source[33]
932 + c24 * source[58] - c25 * source[51] - c25 * source[53];
933 target[13] = c28 * source[19] - c29 * source[14] - c29 * source[16]
934 - c30 * source[39] + c31 * source[34] + c31 * source[36]
935 + c28 * source[59] - c29 * source[54] - c29 * source[56];
936 target[14] = c32 * source[70] - c33 * source[72] - c34 * source[90]
937 + c35 * source[92] + c36 * source[110] - c37 * source[112];
938 target[15] = c33 * source[71] - c32 * source[73] - c35 * source[91]
939 + c34 * source[93] + c37 * source[111] - c36 * source[113];
940 target[16] = c38 * source[74] - c38 * source[76] - c39 * source[94]
941 + c39 * source[96] + c40 * source[114] - c40 * source[116];
942 target[17] = c41 * source[75] - c42 * source[95] + c39 * source[115];
943 target[18] = c43 * source[77] - c44 * source[70] - c44 * source[72]
944 - c45 * source[97] + c46 * source[90] + c46 * source[92]
945 + c47 * source[117] - c48 * source[110] - c48 * source[112];
946 target[19] = c43 * source[78] - c44 * source[71] - c44 * source[73]
947 - c45 * source[98] + c46 * source[91] + c46 * source[93]
948 + c47 * source[118] - c48 * source[111] - c48 * source[113];
949 target[20] = c49 * source[79] - c50 * source[74] - c50 * source[76]
950 - c51 * source[99] + c52 * source[94] + c52 * source[96]
951 + c53 * source[119] - c54 * source[114] - c54 * source[116];
952 target[21] = c36 * source[80] - c37 * source[82] - c34 * source[100]
953 + c35 * source[102] + c32 * source[120] - c33 * source[122];
954 target[22] = c37 * source[81] - c36 * source[83] - c35 * source[101]
955 + c34 * source[103] + c33 * source[121] - c32 * source[123];
956 target[23] = c40 * source[84] - c40 * source[86] - c39 * source[104]
957 + c39 * source[106] + c38 * source[124] - c38 * source[126];
958 target[24] = c39 * source[85] - c42 * source[105] + c41 * source[125];
959 target[25] = c47 * source[87] - c48 * source[80] - c48 * source[82]
960 - c45 * source[107] + c46 * source[100] + c46 * source[102]
961 + c43 * source[127] - c44 * source[120] - c44 * source[122];
962 target[26] = c47 * source[88] - c48 * source[81] - c48 * source[83]
963 - c45 * source[108] + c46 * source[101] + c46 * source[103]
964 + c43 * source[128] - c44 * source[121] - c44 * source[123];
965 target[27] = c53 * source[89] - c54 * source[84] - c54 * source[86]
966 - c51 * source[109] + c52 * source[104] + c52 * source[106]
967 + c49 * source[129] - c50 * source[124] - c50 * source[126];
968 target[28] = c55 * source[130] - c56 * source[132] - c57 * source[150]
969 + c58 * source[152] + c55 * source[170] - c56 * source[172]
970 - c59 * source[0] + c60 * source[2] + c61 * source[20]
971 - c62 * source[22] - c59 * source[40] + c60 * source[42]
972 - c59 * source[20] + c60 * source[22] + c61 * source[40]
973 - c62 * source[42] - c59 * source[60] + c60 * source[62];
974 target[29] = c56 * source[131] - c55 * source[133] - c58 * source[151]
975 + c57 * source[153] + c56 * source[171] - c55 * source[173]
976 - c60 * source[1] + c59 * source[3] + c62 * source[21]
977 - c61 * source[23] - c60 * source[41] + c59 * source[43]
978 - c60 * source[21] + c59 * source[23] + c62 * source[41]
979 - c61 * source[43] - c60 * source[61] + c59 * source[63];
980 target[30] = c63 * source[134] - c63 * source[136] - c64 * source[154]
981 + c64 * source[156] + c63 * source[174] - c63 * source[176]
982 - c65 * source[4] + c65 * source[6] + c66 * source[24]
983 - c66 * source[26] - c65 * source[44] + c65 * source[46]
984 - c65 * source[24] + c65 * source[26] + c66 * source[44]
985 - c66 * source[46] - c65 * source[64] + c65 * source[66];
986 target[31] = c67 * source[135] - c68 * source[155] + c67 * source[175]
987 - c69 * source[5] + c70 * source[25] - c69 * source[45]
988 - c69 * source[25] + c70 * source[45] - c69 * source[65];
989 target[32] = c71 * source[137] - c72 * source[130] - c72 * source[132]
990 - c73 * source[157] + c74 * source[150] + c74 * source[152]
991 + c71 * source[177] - c72 * source[170] - c72 * source[172]
992 - c75 * source[7] + c76 * source[0] + c76 * source[2]
993 + c77 * source[27] - c78 * source[20] - c78 * source[22]
994 - c75 * source[47] + c76 * source[40] + c76 * source[42]
995 - c75 * source[27] + c76 * source[20] + c76 * source[22]
996 + c77 * source[47] - c78 * source[40] - c78 * source[42]
997 - c75 * source[67] + c76 * source[60] + c76 * source[62];
998 target[33] = c71 * source[138] - c72 * source[131] - c72 * source[133]
999 - c73 * source[158] + c74 * source[151] + c74 * source[153]
1000 + c71 * source[178] - c72 * source[171] - c72 * source[173]
1001 - c75 * source[8] + c76 * source[1] + c76 * source[3]
1002 + c77 * source[28] - c78 * source[21] - c78 * source[23]
1003 - c75 * source[48] + c76 * source[41] + c76 * source[43]
1004 - c75 * source[28] + c76 * source[21] + c76 * source[23]
1005 + c77 * source[48] - c78 * source[41] - c78 * source[43]
1006 - c75 * source[68] + c76 * source[61] + c76 * source[63];
1007 target[34] = c79 * source[139] - c80 * source[134] - c80 * source[136]
1008 - c81 * source[159] + c82 * source[154] + c82 * source[156]
1009 + c79 * source[179] - c80 * source[174] - c80 * source[176]
1010 - c83 * source[9] + c84 * source[4] + c84 * source[6]
1011 + c85 * source[29] - c86 * source[24] - c86 * source[26]
1012 - c83 * source[49] + c84 * source[44] + c84 * source[46]
1013 - c83 * source[29] + c84 * source[24] + c84 * source[26]
1014 + c85 * source[49] - c86 * source[44] - c86 * source[46]
1015 - c83 * source[69] + c84 * source[64] + c84 * source[66];
1016 target[35] = c87 * source[140] - c88 * source[142] - c87 * source[160]
1017 + c88 * source[162] - c89 * source[10] + c90 * source[12]
1018 + c89 * source[30] - c90 * source[32] - c89 * source[30]
1019 + c90 * source[32] + c89 * source[50] - c90 * source[52];
1020 target[36] = c88 * source[141] - c87 * source[143] - c88 * source[161]
1021 + c87 * source[163] - c90 * source[11] + c89 * source[13]
1022 + c90 * source[31] - c89 * source[33] - c90 * source[31]
1023 + c89 * source[33] + c90 * source[51] - c89 * source[53];
1024 target[37] = c91 * source[144] - c91 * source[146] - c91 * source[164]
1025 + c91 * source[166] - c92 * source[14] + c92 * source[16]
1026 + c92 * source[34] - c92 * source[36] - c92 * source[34]
1027 + c92 * source[36] + c92 * source[54] - c92 * source[56];
1028 target[38] = c93 * source[145] - c93 * source[165] - c94 * source[15]
1029 + c94 * source[35] - c94 * source[35] + c94 * source[55];
1030 target[39] = c95 * source[147] - c71 * source[140] - c71 * source[142]
1031 - c95 * source[167] + c71 * source[160] + c71 * source[162]
1032 - c96 * source[17] + c75 * source[10] + c75 * source[12]
1033 + c96 * source[37] - c75 * source[30] - c75 * source[32]
1034 - c96 * source[37] + c75 * source[30] + c75 * source[32]
1035 + c96 * source[57] - c75 * source[50] - c75 * source[52];
1036 target[40] = c95 * source[148] - c71 * source[141] - c71 * source[143]
1037 - c95 * source[168] + c71 * source[161] + c71 * source[163]
1038 - c96 * source[18] + c75 * source[11] + c75 * source[13]
1039 + c96 * source[38] - c75 * source[31] - c75 * source[33]
1040 - c96 * source[38] + c75 * source[31] + c75 * source[33]
1041 + c96 * source[58] - c75 * source[51] - c75 * source[53];
1042 target[41] = c97 * source[149] - c81 * source[144] - c81 * source[146]
1043 - c97 * source[169] + c81 * source[164] + c81 * source[166]
1044 - c98 * source[19] + c85 * source[14] + c85 * source[16]
1045 + c98 * source[39] - c85 * source[34] - c85 * source[36]
1046 - c98 * source[39] + c85 * source[34] + c85 * source[36]
1047 + c98 * source[59] - c85 * source[54] - c85 * source[56];
1048 target[42] = c99 * source[180] - c100 * source[182] - c100 * source[200]
1049 + c101 * source[202] - c102 * source[70] + c103 * source[72]
1050 + c103 * source[90] - c104 * source[92] - c102 * source[90]
1051 + c103 * source[92] + c103 * source[110] - c104 * source[112];
1052 target[43] = c100 * source[181] - c99 * source[183] - c101 * source[201]
1053 + c100 * source[203] - c103 * source[71] + c102 * source[73]
1054 + c104 * source[91] - c103 * source[93] - c103 * source[91]
1055 + c102 * source[93] + c104 * source[111] - c103 * source[113];
1056 target[44] = c105 * source[184] - c105 * source[186] - c106 * source[204]
1057 + c106 * source[206] - c107 * source[74] + c107 * source[76]
1058 + c108 * source[94] - c108 * source[96] - c107 * source[94]
1059 + c107 * source[96] + c108 * source[114] - c108 * source[116];
1060 target[45] = c109 * source[185] - c110 * source[205] - c111 * source[75]
1061 + c112 * source[95] - c111 * source[95] + c112 * source[115];
1062 target[46] = c113 * source[187] - c114 * source[180] - c114 * source[182]
1063 - c115 * source[207] + c116 * source[200] + c116 * source[202]
1064 - c117 * source[77] + c118 * source[70] + c118 * source[72]
1065 + c119 * source[97] - c120 * source[90] - c120 * source[92]
1066 - c117 * source[97] + c118 * source[90] + c118 * source[92]
1067 + c119 * source[117] - c120 * source[110] - c120 * source[112];
1068 target[47] = c113 * source[188] - c114 * source[181] - c114 * source[183]
1069 - c115 * source[208] + c116 * source[201] + c116 * source[203]
1070 - c117 * source[78] + c118 * source[71] + c118 * source[73]
1071 + c119 * source[98] - c120 * source[91] - c120 * source[93]
1072 - c117 * source[98] + c118 * source[91] + c118 * source[93]
1073 + c119 * source[118] - c120 * source[111] - c120 * source[113];
1074 target[48] = c121 * source[189] - c122 * source[184] - c122 * source[186]
1075 - c123 * source[209] + c124 * source[204] + c124 * source[206]
1076 - c125 * source[79] + c126 * source[74] + c126 * source[76]
1077 + c127 * source[99] - c128 * source[94] - c128 * source[96]
1078 - c125 * source[99] + c126 * source[94] + c126 * source[96]
1079 + c127 * source[119] - c128 * source[114] - c128 * source[116];
1080 target[49] = c100 * source[190] - c101 * source[192] - c99 * source[210]
1081 + c100 * source[212] - c103 * source[80] + c104 * source[82]
1082 + c102 * source[100] - c103 * source[102] - c103 * source[100]
1083 + c104 * source[102] + c102 * source[120] - c103 * source[122];
1084 target[50] = c101 * source[191] - c100 * source[193] - c100 * source[211]
1085 + c99 * source[213] - c104 * source[81] + c103 * source[83]
1086 + c103 * source[101] - c102 * source[103] - c104 * source[101]
1087 + c103 * source[103] + c103 * source[121] - c102 * source[123];
1088 target[51] = c106 * source[194] - c106 * source[196] - c105 * source[214]
1089 + c105 * source[216] - c108 * source[84] + c108 * source[86]
1090 + c107 * source[104] - c107 * source[106] - c108 * source[104]
1091 + c108 * source[106] + c107 * source[124] - c107 * source[126];
1092 target[52] = c110 * source[195] - c109 * source[215] - c112 * source[85]
1093 + c111 * source[105] - c112 * source[105] + c111 * source[125];
1094 target[53] = c115 * source[197] - c116 * source[190] - c116 * source[192]
1095 - c113 * source[217] + c114 * source[210] + c114 * source[212]
1096 - c119 * source[87] + c120 * source[80] + c120 * source[82]
1097 + c117 * source[107] - c118 * source[100] - c118 * source[102]
1098 - c119 * source[107] + c120 * source[100] + c120 * source[102]
1099 + c117 * source[127] - c118 * source[120] - c118 * source[122];
1100 target[54] = c115 * source[198] - c116 * source[191] - c116 * source[193]
1101 - c113 * source[218] + c114 * source[211] + c114 * source[213]
1102 - c119 * source[88] + c120 * source[81] + c120 * source[83]
1103 + c117 * source[108] - c118 * source[101] - c118 * source[103]
1104 - c119 * source[108] + c120 * source[101] + c120 * source[103]
1105 + c117 * source[128] - c118 * source[121] - c118 * source[123];
1106 target[55] = c123 * source[199] - c124 * source[194] - c124 * source[196]
1107 - c121 * source[219] + c122 * source[214] + c122 * source[216]
1108 - c127 * source[89] + c128 * source[84] + c128 * source[86]
1109 + c125 * source[109] - c126 * source[104] - c126 * source[106]
1110 - c127 * source[109] + c128 * source[104] + c128 * source[106]
1111 + c125 * source[129] - c126 * source[124] - c126 * source[126];
1112 target[56] = c99 * source[220] - c100 * source[222] - c99 * source[240]
1113 + c100 * source[242] - c99 * source[130] + c100 * source[132]
1114 + c99 * source[150] - c100 * source[152] - c99 * source[150]
1115 + c100 * source[152] + c99 * source[170] - c100 * source[172]
1116 + c129 * source[0] - c130 * source[2] - c129 * source[20]
1117 + c130 * source[22] + c131 * source[20] - c102 * source[22]
1118 - c131 * source[40] + c102 * source[42] + c129 * source[40]
1119 - c130 * source[42] - c129 * source[60] + c130 * source[62];
1120 target[57] = c100 * source[221] - c99 * source[223] - c100 * source[241]
1121 + c99 * source[243] - c100 * source[131] + c99 * source[133]
1122 + c100 * source[151] - c99 * source[153] - c100 * source[151]
1123 + c99 * source[153] + c100 * source[171] - c99 * source[173]
1124 + c130 * source[1] - c129 * source[3] - c130 * source[21]
1125 + c129 * source[23] + c102 * source[21] - c131 * source[23]
1126 - c102 * source[41] + c131 * source[43] + c130 * source[41]
1127 - c129 * source[43] - c130 * source[61] + c129 * source[63];
1128 target[58] = c105 * source[224] - c105 * source[226] - c105 * source[244]
1129 + c105 * source[246] - c105 * source[134] + c105 * source[136]
1130 + c105 * source[154] - c105 * source[156] - c105 * source[154]
1131 + c105 * source[156] + c105 * source[174] - c105 * source[176]
1132 + c132 * source[4] - c132 * source[6] - c132 * source[24]
1133 + c132 * source[26] + c133 * source[24] - c133 * source[26]
1134 - c133 * source[44] + c133 * source[46] + c132 * source[44]
1135 - c132 * source[46] - c132 * source[64] + c132 * source[66];
1136 target[59] = c109 * source[225] - c109 * source[245] - c109 * source[135]
1137 + c109 * source[155] - c109 * source[155] + c109 * source[175]
1138 + c133 * source[5] - c133 * source[25] + c134 * source[25]
1139 - c134 * source[45] + c133 * source[45] - c133 * source[65];
1140 target[60] = c113 * source[227] - c114 * source[220] - c114 * source[222]
1141 - c113 * source[247] + c114 * source[240] + c114 * source[242]
1142 - c113 * source[137] + c114 * source[130] + c114 * source[132]
1143 + c113 * source[157] - c114 * source[150] - c114 * source[152]
1144 - c113 * source[157] + c114 * source[150] + c114 * source[152]
1145 + c113 * source[177] - c114 * source[170] - c114 * source[172]
1146 + c135 * source[7] - c136 * source[0] - c136 * source[2]
1147 - c135 * source[27] + c136 * source[20] + c136 * source[22]
1148 + c137 * source[27] - c138 * source[20] - c138 * source[22]
1149 - c137 * source[47] + c138 * source[40] + c138 * source[42]
1150 + c135 * source[47] - c136 * source[40] - c136 * source[42]
1151 - c135 * source[67] + c136 * source[60] + c136 * source[62];
1152 target[61] = c113 * source[228] - c114 * source[221] - c114 * source[223]
1153 - c113 * source[248] + c114 * source[241] + c114 * source[243]
1154 - c113 * source[138] + c114 * source[131] + c114 * source[133]
1155 + c113 * source[158] - c114 * source[151] - c114 * source[153]
1156 - c113 * source[158] + c114 * source[151] + c114 * source[153]
1157 + c113 * source[178] - c114 * source[171] - c114 * source[173]
1158 + c135 * source[8] - c136 * source[1] - c136 * source[3]
1159 - c135 * source[28] + c136 * source[21] + c136 * source[23]
1160 + c137 * source[28] - c138 * source[21] - c138 * source[23]
1161 - c137 * source[48] + c138 * source[41] + c138 * source[43]
1162 + c135 * source[48] - c136 * source[41] - c136 * source[43]
1163 - c135 * source[68] + c136 * source[61] + c136 * source[63];
1164 target[62] = c121 * source[229] - c122 * source[224] - c122 * source[226]
1165 - c121 * source[249] + c122 * source[244] + c122 * source[246]
1166 - c121 * source[139] + c122 * source[134] + c122 * source[136]
1167 + c121 * source[159] - c122 * source[154] - c122 * source[156]
1168 - c121 * source[159] + c122 * source[154] + c122 * source[156]
1169 + c121 * source[179] - c122 * source[174] - c122 * source[176]
1170 + c139 * source[9] - c140 * source[4] - c140 * source[6]
1171 - c139 * source[29] + c140 * source[24] + c140 * source[26]
1172 + c141 * source[29] - c142 * source[24] - c142 * source[26]
1173 - c141 * source[49] + c142 * source[44] + c142 * source[46]
1174 + c139 * source[49] - c140 * source[44] - c140 * source[46]
1175 - c139 * source[69] + c140 * source[64] + c140 * source[66];
1176 target[63] = c143 * source[230] - c144 * source[232] - c143 * source[140]
1177 + c144 * source[142] - c143 * source[160] + c144 * source[162]
1178 + c131 * source[10] - c102 * source[12] + c145 * source[30]
1179 - c146 * source[32] + c131 * source[50] - c102 * source[52];
1180 target[64] = c144 * source[231] - c143 * source[233] - c144 * source[141]
1181 + c143 * source[143] - c144 * source[161] + c143 * source[163]
1182 + c102 * source[11] - c131 * source[13] + c146 * source[31]
1183 - c145 * source[33] + c102 * source[51] - c131 * source[53];
1184 target[65] = c109 * source[234] - c109 * source[236] - c109 * source[144]
1185 + c109 * source[146] - c109 * source[164] + c109 * source[166]
1186 + c133 * source[14] - c133 * source[16] + c134 * source[34]
1187 - c134 * source[36] + c133 * source[54] - c133 * source[56];
1188 target[66] = c147 * source[235] - c147 * source[145] - c147 * source[165]
1189 + c134 * source[15] + c148 * source[35] + c134 * source[55];
1190 target[67] = c149 * source[237] - c150 * source[230] - c150 * source[232]
1191 - c149 * source[147] + c150 * source[140] + c150 * source[142]
1192 - c149 * source[167] + c150 * source[160] + c150 * source[162]
1193 + c137 * source[17] - c138 * source[10] - c138 * source[12]
1194 + c114 * source[37] - c135 * source[30] - c135 * source[32]
1195 + c137 * source[57] - c138 * source[50] - c138 * source[52];
1196 target[68] = c149 * source[238] - c150 * source[231] - c150 * source[233]
1197 - c149 * source[148] + c150 * source[141] + c150 * source[143]
1198 - c149 * source[168] + c150 * source[161] + c150 * source[163]
1199 + c137 * source[18] - c138 * source[11] - c138 * source[13]
1200 + c114 * source[38] - c135 * source[31] - c135 * source[33]
1201 + c137 * source[58] - c138 * source[51] - c138 * source[53];
1202 target[69] = c151 * source[239] - c123 * source[234] - c123 * source[236]
1203 - c151 * source[149] + c123 * source[144] + c123 * source[146]
1204 - c151 * source[169] + c123 * source[164] + c123 * source[166]
1205 + c141 * source[19] - c142 * source[14] - c142 * source[16]
1206 + c152 * source[39] - c125 * source[34] - c125 * source[36]
1207 + c141 * source[59] - c142 * source[54] - c142 * source[56];
1208 target[70] = c153 * source[250] - c122 * source[252] - c154 * source[180]
1209 + c155 * source[182] - c154 * source[200] + c155 * source[202]
1210 + c156 * source[70] - c157 * source[72] + c158 * source[90]
1211 - c159 * source[92] + c156 * source[110] - c157 * source[112];
1212 target[71] = c122 * source[251] - c153 * source[253] - c155 * source[181]
1213 + c154 * source[183] - c155 * source[201] + c154 * source[203]
1214 + c157 * source[71] - c156 * source[73] + c159 * source[91]
1215 - c158 * source[93] + c157 * source[111] - c156 * source[113];
1216 target[72] = c150 * source[254] - c150 * source[256] - c160 * source[184]
1217 + c160 * source[186] - c160 * source[204] + c160 * source[206]
1218 + c161 * source[74] - c161 * source[76] + c162 * source[94]
1219 - c162 * source[96] + c161 * source[114] - c161 * source[116];
1220 target[73] = c113 * source[255] - c163 * source[185] - c163 * source[205]
1221 + c162 * source[75] + c160 * source[95] + c162 * source[115];
1222 target[74] = c164 * source[257] - c165 * source[250] - c165 * source[252]
1223 - c109 * source[187] + c148 * source[180] + c148 * source[182]
1224 - c109 * source[207] + c148 * source[200] + c148 * source[202]
1225 + c148 * source[77] - c133 * source[70] - c133 * source[72]
1226 + c105 * source[97] - c134 * source[90] - c134 * source[92]
1227 + c148 * source[117] - c133 * source[110] - c133 * source[112];
1228 target[75] = c164 * source[258] - c165 * source[251] - c165 * source[253]
1229 - c109 * source[188] + c148 * source[181] + c148 * source[183]
1230 - c109 * source[208] + c148 * source[201] + c148 * source[203]
1231 + c148 * source[78] - c133 * source[71] - c133 * source[73]
1232 + c105 * source[98] - c134 * source[91] - c134 * source[93]
1233 + c148 * source[118] - c133 * source[111] - c133 * source[113];
1234 target[76] = c166 * source[259] - c167 * source[254] - c167 * source[256]
1235 - c143 * source[189] + c100 * source[184] + c100 * source[186]
1236 - c143 * source[209] + c100 * source[204] + c100 * source[206]
1237 + c168 * source[79] - c146 * source[74] - c146 * source[76]
1238 + c99 * source[99] - c169 * source[94] - c169 * source[96]
1239 + c168 * source[119] - c146 * source[114] - c146 * source[116];
1240 target[77] = c153 * source[260] - c122 * source[262] - c154 * source[190]
1241 + c155 * source[192] - c154 * source[210] + c155 * source[212]
1242 + c156 * source[80] - c157 * source[82] + c158 * source[100]
1243 - c159 * source[102] + c156 * source[120] - c157 * source[122];
1244 target[78] = c122 * source[261] - c153 * source[263] - c155 * source[191]
1245 + c154 * source[193] - c155 * source[211] + c154 * source[213]
1246 + c157 * source[81] - c156 * source[83] + c159 * source[101]
1247 - c158 * source[103] + c157 * source[121] - c156 * source[123];
1248 target[79] = c150 * source[264] - c150 * source[266] - c160 * source[194]
1249 + c160 * source[196] - c160 * source[214] + c160 * source[216]
1250 + c161 * source[84] - c161 * source[86] + c162 * source[104]
1251 - c162 * source[106] + c161 * source[124] - c161 * source[126];
1252 target[80] = c113 * source[265] - c163 * source[195] - c163 * source[215]
1253 + c162 * source[85] + c160 * source[105] + c162 * source[125];
1254 target[81] = c164 * source[267] - c165 * source[260] - c165 * source[262]
1255 - c109 * source[197] + c148 * source[190] + c148 * source[192]
1256 - c109 * source[217] + c148 * source[210] + c148 * source[212]
1257 + c148 * source[87] - c133 * source[80] - c133 * source[82]
1258 + c105 * source[107] - c134 * source[100] - c134 * source[102]
1259 + c148 * source[127] - c133 * source[120] - c133 * source[122];
1260 target[82] = c164 * source[268] - c165 * source[261] - c165 * source[263]
1261 - c109 * source[198] + c148 * source[191] + c148 * source[193]
1262 - c109 * source[218] + c148 * source[211] + c148 * source[213]
1263 + c148 * source[88] - c133 * source[81] - c133 * source[83]
1264 + c105 * source[108] - c134 * source[101] - c134 * source[103]
1265 + c148 * source[128] - c133 * source[121] - c133 * source[123];
1266 target[83] = c166 * source[269] - c167 * source[264] - c167 * source[266]
1267 - c143 * source[199] + c100 * source[194] + c100 * source[196]
1268 - c143 * source[219] + c100 * source[214] + c100 * source[216]
1269 + c168 * source[89] - c146 * source[84] - c146 * source[86]
1270 + c99 * source[109] - c169 * source[104] - c169 * source[106]
1271 + c168 * source[129] - c146 * source[124] - c146 * source[126];
1272 target[84] = c170 * source[270] - c171 * source[272] - c172 * source[220]
1273 + c173 * source[222] - c172 * source[240] + c173 * source[242]
1274 + c174 * source[130] - c175 * source[132] + c176 * source[150]
1275 - c177 * source[152] + c174 * source[170] - c175 * source[172]
1276 - c178 * source[0] + c179 * source[2] - c179 * source[20]
1277 + c180 * source[22] - c179 * source[40] + c180 * source[42]
1278 - c178 * source[60] + c179 * source[62];
1279 target[85] = c171 * source[271] - c170 * source[273] - c173 * source[221]
1280 + c172 * source[223] - c173 * source[241] + c172 * source[243]
1281 + c175 * source[131] - c174 * source[133] + c177 * source[151]
1282 - c176 * source[153] + c175 * source[171] - c174 * source[173]
1283 - c179 * source[1] + c178 * source[3] - c180 * source[21]
1284 + c179 * source[23] - c180 * source[41] + c179 * source[43]
1285 - c179 * source[61] + c178 * source[63];
1286 target[86] = c181 * source[274] - c181 * source[276] - c182 * source[224]
1287 + c182 * source[226] - c182 * source[244] + c182 * source[246]
1288 + c183 * source[134] - c183 * source[136] + c184 * source[154]
1289 - c184 * source[156] + c183 * source[174] - c183 * source[176]
1290 - c185 * source[4] + c185 * source[6] - c186 * source[24]
1291 + c186 * source[26] - c186 * source[44] + c186 * source[46]
1292 - c185 * source[64] + c185 * source[66];
1293 target[87] = c187 * source[275] - c188 * source[225] - c188 * source[245]
1294 + c184 * source[135] + c189 * source[155] + c184 * source[175]
1295 - c190 * source[5] - c191 * source[25] - c191 * source[45]
1296 - c190 * source[65];
1297 target[88] = c192 * source[277] - c193 * source[270] - c193 * source[272]
1298 - c194 * source[227] + c195 * source[220] + c195 * source[222]
1299 - c194 * source[247] + c195 * source[240] + c195 * source[242]
1300 + c196 * source[137] - c197 * source[130] - c197 * source[132]
1301 + c198 * source[157] - c199 * source[150] - c199 * source[152]
1302 + c196 * source[177] - c197 * source[170] - c197 * source[172]
1303 - c200 * source[7] + c201 * source[0] + c201 * source[2]
1304 - c202 * source[27] + c203 * source[20] + c203 * source[22]
1305 - c202 * source[47] + c203 * source[40] + c203 * source[42]
1306 - c200 * source[67] + c201 * source[60] + c201 * source[62];
1307 target[89] = c192 * source[278] - c193 * source[271] - c193 * source[273]
1308 - c194 * source[228] + c195 * source[221] + c195 * source[223]
1309 - c194 * source[248] + c195 * source[241] + c195 * source[243]
1310 + c196 * source[138] - c197 * source[131] - c197 * source[133]
1311 + c198 * source[158] - c199 * source[151] - c199 * source[153]
1312 + c196 * source[178] - c197 * source[171] - c197 * source[173]
1313 - c200 * source[8] + c201 * source[1] + c201 * source[3]
1314 - c202 * source[28] + c203 * source[21] + c203 * source[23]
1315 - c202 * source[48] + c203 * source[41] + c203 * source[43]
1316 - c200 * source[68] + c201 * source[61] + c201 * source[63];
1317 target[90] = source[279] - c204 * source[274] - c204 * source[276]
1318 - c205 * source[229] + c206 * source[224] + c206 * source[226]
1319 - c205 * source[249] + c206 * source[244] + c206 * source[246]
1320 + c207 * source[139] - c208 * source[134] - c208 * source[136]
1321 + c206 * source[159] - c209 * source[154] - c209 * source[156]
1322 + c207 * source[179] - c208 * source[174] - c208 * source[176]
1323 - c210 * source[9] + c211 * source[4] + c211 * source[6]
1324 - c212 * source[29] + c213 * source[24] + c213 * source[26]
1325 - c212 * source[49] + c213 * source[44] + c213 * source[46]
1326 - c210 * source[69] + c211 * source[64] + c211 * source[66];
1327 }
1328 }
1329
1330