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