1 /*
2   This file was generated automatically with ./scripts/maple2c.pl.
3   Do not edit this file directly as it can be overwritten!!
4 
5   This Source Code Form is subject to the terms of the Mozilla Public
6   License, v. 2.0. If a copy of the MPL was not distributed with this
7   file, You can obtain one at http://mozilla.org/MPL/2.0/.
8 
9   Maple version     : Maple 2016 (X86 64 LINUX)
10   Maple source      : ./maple/mgga_exc/mgga_x_edmgga.mpl
11   Type of functional: mgga_exc
12 */
13 
14 #define maple2c_order 4
15 #define MAPLE2C_FLAGS (XC_FLAGS_I_HAVE_EXC | XC_FLAGS_I_HAVE_VXC | XC_FLAGS_I_HAVE_FXC | XC_FLAGS_I_HAVE_KXC | XC_FLAGS_I_HAVE_LXC)
16 
17 
18 static inline void
func_unpol(const xc_func_type * p,int order,const double * rho,const double * sigma,const double * lapl,const double * tau,double * zk,MGGA_OUT_PARAMS_NO_EXC (double *))19 func_unpol(const xc_func_type *p, int order, const double *rho, const double *sigma, const double *lapl, const double *tau, double *zk, MGGA_OUT_PARAMS_NO_EXC(double *))
20 {
21 
22 #ifndef XC_DONT_COMPILE_EXC
23   double t2, t4, t6, t7, t8, t9, t10, t11;
24   double t12, t13, t15, t16, t18, t19, t20, t21;
25   double t23, t25, t26, t28, t31, t35, t37, t38;
26   double t39, t40, t42, t43, t45, t46, t47, t48;
27   double t49, t50, t51, t52, t57, t58, t62, t66;
28   double t67, t69, t71;
29 
30 #ifndef XC_DONT_COMPILE_VXC
31   double t76, t77, t80, t82, t87, t89, t91, t92;
32   double t95, t96, t98, t99, t100, t101, t105, t106;
33   double t107, t108, t109, t111, t113, t116, t117, t118;
34   double t122, t123, t125, t129, t130, t131, t133, t135;
35   double t136, t138, t139, t148, t149, t152, t155, t156;
36   double t159, t160, t162, t163, t172, t173, t176, t181;
37   double t182, t191, t192, t195;
38 
39 #ifndef XC_DONT_COMPILE_FXC
40   double t198, t199, t208, t210, t215, t217, t220, t221;
41   double t222, t223, t226, t231, t236, t237, t242, t243;
42   double t244, t248, t249, t250, t254, t266, t267, t268;
43   double t269, t270, t272, t273, t277, t278, t280, t285;
44   double t288, t289, t291, t292, t293, t295, t297, t298;
45   double t299, t300, t301, t305, t307, t308, t312, t313;
46   double t316, t317, t321, t322, t333, t334, t335, t338;
47   double t339, t342, t348, t350, t352, t353, t356, t357;
48   double t361, t362, t365, t379, t380, t383, t384, t387;
49   double t396, t397, t401, t402, t405, t419, t420, t423;
50   double t424, t427, t430, t431, t433, t435, t436, t438;
51   double t439, t441, t442, t446, t447, t450, t465, t469;
52   double t470, t473, t477, t479, t480, t482, t484, t485;
53   double t489, t495, t506, t507, t510, t511, t514, t519;
54   double t520, t524, t540, t543, t544, t547, t551, t553;
55   double t554, t556, t558, t559, t563, t564, t567, t582;
56   double t586, t587, t590, t595, t596, t600, t606, t617;
57   double t618, t621, t622, t625, t630, t631, t635, t636;
58   double t639, t654, t658, t659, t662;
59 
60 #ifndef XC_DONT_COMPILE_KXC
61   double t677, t682, t684, t686, t688, t690, t691, t694;
62   double t695, t696, t700, t701, t704, t711, t712, t720;
63   double t721, t722, t723, t726, t727, t730, t732, t733;
64   double t734, t738, t743, t750, t751, t752, t763, t768;
65   double t769, t770, t771, t772, t773, t775, t776, t784;
66   double t785, t787, t792, t798, t801, t803, t804, t806;
67   double t808, t810, t812, t814, t816, t818, t821, t822;
68   double t824, t825, t829, t831, t832, t845, t848, t849;
69   double t852, t855, t859, t860, t864, t871, t888, t889;
70   double t892, t893, t900, t904, t905, t907, t908, t917;
71   double t919, t921, t925, t928, t930, t934, t935, t947;
72   double t948, t951, t952, t955, t964, t987, t988, t991;
73   double t992, t998, t1001, t1002, t1004, t1005, t1021, t1022;
74   double t1034, t1035, t1038, t1039, t1042, t1051, t1061, t1075;
75   double t1076, t1079, t1080, t1086, t1089, t1090, t1092, t1093;
76   double t1098, t1100, t1102, t1103, t1105, t1107, t1109, t1111;
77   double t1112, t1114, t1115, t1117, t1119, t1121, t1122, t1133;
78   double t1134, t1137, t1141, t1142, t1145, t1161, t1175, t1176;
79   double t1179, t1183, t1184, t1191, t1192, t1194, t1195, t1200;
80   double t1202, t1204, t1206, t1209, t1211, t1214, t1215, t1228;
81   double t1229, t1230, t1233, t1236, t1240, t1241, t1244, t1248;
82   double t1258, t1262, t1263, t1269, t1283, t1284, t1287, t1290;
83   double t1291, t1292, t1293, t1299, t1302, t1303, t1305, t1306;
84   double t1316, t1317, t1330, t1331, t1334, t1337, t1341, t1342;
85   double t1348, t1366, t1380, t1381, t1384, t1388, t1391, t1394;
86   double t1397, t1398, t1400, t1401, t1406, t1408, t1410, t1412;
87   double t1415, t1417, t1420, t1421, t1432, t1433, t1436, t1440;
88   double t1441, t1444, t1457, t1460, t1474, t1475, t1478, t1482;
89   double t1489, t1490, t1492, t1493, t1503, t1504, t1517, t1518;
90   double t1521, t1524, t1528, t1529, t1532, t1536, t1546, t1550;
91   double t1551, t1557, t1571, t1572, t1575, t1578, t1584, t1587;
92   double t1588, t1590, t1591, t1601, t1602, t1613, t1614, t1617;
93   double t1621, t1622, t1625, t1635, t1639, t1642, t1656, t1657;
94   double t1660, t1664, t1671, t1672, t1674, t1675, t1678, t1679;
95   double t1680, t1683, t1685, t1686, t1688, t1689, t1697, t1698;
96   double t1701, t1704, t1718, t1732, t1740, t1741, t1744, t1747;
97   double t1748, t1749, t1752, t1754, t1755, t1757, t1758, t1770;
98   double t1773, t1776, t1782, t1792, t1809, t1812, t1819, t1823;
99   double t1824, t1826, t1827, t1833, t1834, t1846, t1849, t1852;
100   double t1883, t1886, t1892, t1895, t1896, t1898, t1899, t1902;
101   double t1903, t1906, t1908, t1909, t1911, t1912, t1923, t1926;
102   double t1930, t1961, t1964, t1968, t1975, t1976, t1978, t1979;
103   double t1985, t1986, t1999, t2002, t2005, t2009, t2015, t2024;
104   double t2046, t2049, t2052, t2058, t2061, t2062, t2064, t2065;
105   double t2071, t2072, t2083, t2086, t2090, t2105, t2121, t2124;
106   double t2134, t2135, t2137, t2138, t2141, t2142, t2145, t2147;
107   double t2148, t2150, t2151, t2159, t2160, t2163, t2166, t2180;
108   double t2194, t2202, t2203, t2206, t2212, t2213, t2225, t2228;
109   double t2231, t2237, t2247, t2264, t2267, t2274, t2278, t2279;
110   double t2281, t2282, t2288, t2289, t2300, t2303, t2307, t2338;
111   double t2341, t2345, t2352, t2353, t2355, t2356, t2362, t2363;
112   double t2371, t2372, t2375, t2378, t2392, t2406, t2414, t2415;
113   double t2418;
114 
115 #ifndef XC_DONT_COMPILE_LXC
116   double t2435, t2442, t2447, t2448, t2449, t2451, t2454, t2460;
117   double t2461, t2468, t2473, t2488, t2504, t2505, t2513, t2520;
118   double t2523, t2524, t2525, t2526, t2529, t2531, t2539, t2540;
119   double t2541, t2552, t2557, t2573, t2574, t2585, t2586, t2612;
120   double t2615, t2620, t2630, t2634, t2641, t2643, t2646, t2653;
121   double t2657, t2658, t2665, t2680, t2685, t2686, t2695, t2703;
122   double t2727, t2731, t2736, t2743, t2747, t2748, t2765, t2766;
123   double t2782, t2789, t2790, t2791, t2795, t2798, t2827, t2851;
124   double t2868, t2875, t2885, t2895, t2902, t2918, t2928, t2952;
125   double t2956, t2958, t2960, t2963, t2966, t2969, t2972, t2973;
126   double t2975, t2986, t2998, t3004, t3023, t3027, t3041, t3068;
127   double t3078, t3085, t3092, t3105, t3112, t3155, t3167, t3171;
128   double t3175, t3198, t3202, t3214, t3230, t3256, t3277, t3281;
129   double t3294, t3298, t3302, t3306, t3310, t3315, t3322, t3341;
130   double t3376, t3381, t3383, t3386, t3396, t3397, t3411, t3420;
131   double t3428, t3443, t3448, t3459, t3472, t3487, t3488, t3490;
132   double t3494, t3497, t3501, t3506, t3509, t3512, t3517, t3538;
133   double t3545, t3552, t3559, t3563, t3585, t3595, t3603, t3624;
134   double t3628, t3629, t3630, t3631, t3634, t3635, t3643, t3647;
135   double t3650, t3651, t3668, t3672, t3686, t3697, t3720, t3730;
136   double t3774, t3787, t3791, t3815, t3828, t3832, t3842, t3849;
137   double t3859, t3867, t3875, t3888, t3916, t3923, t3927, t3959;
138   double t3973, t3986, t3990, t4000, t4004, t4011, t4039, t4046;
139   double t4047, t4059, t4060, t4062, t4066, t4069, t4073, t4078;
140   double t4081, t4084, t4099, t4103, t4128, t4133, t4148, t4152;
141   double t4161, t4162, t4190, t4194, t4219, t4226, t4248, t4264;
142   double t4268, t4291, t4313, t4324, t4328, t4352, t4357, t4380;
143   double t4384, t4395, t4414, t4421, t4431, t4439, t4450, t4479;
144   double t4480, t4484, t4500, t4513, t4517, t4524, t4531, t4553;
145   double t4570, t4578, t4590, t4600, t4604, t4614, t4621, t4640;
146   double t4649, t4662, t4663, t4666, t4679, t4773, t4783, t4790;
147   double t4798, t4805, t4818, t4822, t4826, t4862, t4876, t4890;
148   double t4910, t4913, t4918, t4922, t4924, t4930, t4936, t4939;
149   double t4942, t4943, t4953, t4956, t4960, t4965, t4979, t4989;
150   double t5002, t5013, t5020, t5030, t5040, t5053, t5063, t5076;
151   double t5081, t5098, t5113, t5124, t5127, t5142, t5149, t5159;
152   double t5163, t5174, t5178, t5200, t5228, t5235, t5273, t5312;
153   double t5316, t5324, t5327, t5332, t5336, t5338, t5369, t5380;
154   double t5385, t5427, t5431, t5435, t5442, t5455, t5462, t5466;
155   double t5492, t5497, t5528, t5532, t5535, t5538, t5540, t5545;
156   double t5551, t5558, t5561, t5564, t5570, t5605, t5606, t5617;
157   double t5625, t5639, t5648, t5669, t5701, t5705, t5715, t5722;
158   double t5732, t5764, t5778, t5792, t5818, t5832, t5855, t5863;
159   double t5878, t5888, t5905, t5933, t5937, t5944, t5955, t5963;
160   double t5979, t5983, t5990, t6008, t6009, t6015, t6024, t6025;
161   double t6029, t6044, t6061, t6090, t6132, t6140, t6143, t6148;
162   double t6152, t6154, t6179, t6188, t6199, t6207, t6211, t6218;
163   double t6225, t6235, t6248, t6286, t6290, t6294, t6298, t6308;
164   double t6342, t6345, t6349, t6363, t6368, t6416, t6423, t6441;
165   double t6457, t6465, t6475, t6488, t6495, t6496, t6517, t6521;
166   double t6530, t6540, t6548, t6552, t6556, t6587, t6597, t6610;
167   double t6629, t6634, t6650, t6654, t6667, t6690, t6702, t6723;
168   double t6733, t6741, t6768, t6778, t6792, t6817, t6826, t6837;
169   double t6859, t6863, t6873, t6884, t6891, t6909, t6919, t6933;
170   double t6937, t6944, t6947, t6953, t6960, t6975, t6982, t6992;
171   double t6993, t7003, t7059, t7062, t7081, t7102, t7105, t7115;
172   double t7116, t7138, t7146, t7148, t7151, t7154, t7157, t7159;
173   double t7167, t7177, t7220, t7257, t7301, t7342, t7363, t7382;
174   double t7400, t7419, t7421, t7424, t7427, t7430, t7432, t7436;
175   double t7463, t7482, t7486, t7493, t7543, t7548, t7560, t7573;
176   double t7608, t7649, t7682, t7711, t7747, t7781, t7807, t7810;
177   double t7857, t7871, t7927, t7933, t7966, t7972, t7974, t7977;
178   double t7980, t7983, t7985, t8046, t8059, t8075, t8117, t8121;
179   double t8164, t8197, t8239, t8274, t8311, t8327, t8340, t8345;
180   double t8356, t8395, t8454, t8488, t8511, t8525, t8553, t8568;
181   double t8577, t8666, t8708, t8712, t8718, t8721, t8724, t8727;
182   double t8729, t8744, t8751, t8758, t8759, t8769, t8828, t8831;
183   double t8841, t8888, t8934, t8979, t8994, t9016, t9035, t9041;
184   double t9095, t9153, t9166, t9175, t9265, t9309, t9313, t9322;
185   double t9337, t9344, t9351, t9360, t9364, t9422, t9425;
186 #endif
187 
188 #endif
189 
190 #endif
191 
192 #endif
193 
194 #endif
195 
196 
197 
198   t2 = M_CBRT3;
199   t4 = POW_1_3(0.1e1 / M_PI);
200   t6 = M_CBRT4;
201   t7 = t6 * t6;
202   t8 = t2 * t4 * t7;
203   t9 = M_CBRT2;
204   t10 = t9 * t9;
205   t11 = POW_1_3(rho[0]);
206   t12 = t10 * t11;
207   t13 = t2 * t2;
208   t15 = M_PI * M_PI;
209   t16 = POW_1_3(t15);
210   t18 = t6 * t13 * t16 / 0.9e1;
211   t19 = 0.1e1 - t18;
212   t20 = tau[0] * t10;
213   t21 = t11 * t11;
214   t23 = 0.1e1 / t21 / rho[0];
215   t25 = sigma[0] * t10;
216   t26 = rho[0] * rho[0];
217   t28 = 0.1e1 / t21 / t26;
218   t31 = lapl[0] * t10;
219   t35 = M_CBRT6;
220   t37 = t16 * t16;
221   t38 = 0.1e1 / t37;
222   t39 = (t20 * t23 - t25 * t28 / 0.8e1 - t31 * t23 / 0.4e1) * t35 * t38;
223   t40 = 0.39111111111111111111e0 * t39;
224   t42 = 0.1e1 - 0.5e1 / 0.9e1 * t39;
225   t43 = t42 * t42;
226   t45 = 0.1e1 + 0.495616e0 * t43;
227   t46 = sqrt(t45);
228   t47 = 0.704e0 - t40 + t46;
229   t48 = t19 * t47;
230   t49 = sqrt(0.30e2);
231   t50 = t19 * t49;
232   t51 = sqrt(t47);
233   t52 = t19 * t19;
234   t57 = 0.60184783083548636238e0 * t52 - 0.206514e-1;
235   t58 = -0.296e0 - t40 + t46;
236   t62 = log(0.39102932048925120047e0 / t52 / t19 * t49 * t57 * t58 + sqrt(POW_2(0.39102932048925120047e0 / t52 / t19 * t49 * t57 * t58) + 0.1e1));
237   t66 = 0.1e1 + 0.14163895778062926267e0 * t50 * t51 * t62;
238   t67 = 0.1e1 / t66;
239   t69 = t48 * t67 + t18;
240   t71 = t8 * t12 * t69;
241   if(zk != NULL && (p->info->flags & XC_FLAGS_HAVE_EXC))
242     zk[0] = -0.3e1 / 0.16e2 * t71;
243 
244 #ifndef XC_DONT_COMPILE_VXC
245 
246   if(order < 1) return;
247 
248 
249   t76 = t11 * rho[0] * t2 * t4;
250   t77 = t7 * t10;
251   t80 = t26 * rho[0];
252   t82 = 0.1e1 / t21 / t80;
253   t87 = -0.5e1 / 0.3e1 * t20 * t28 + t25 * t82 / 0.3e1 + 0.5e1 / 0.12e2 * t31 * t28;
254   t89 = t87 * t35 * t38;
255   t91 = 0.1e1 / t46;
256   t92 = t91 * t42;
257   t95 = -0.39111111111111111111e0 * t89 - 0.27534222222222222222e0 * t92 * t89;
258   t96 = t19 * t95;
259   t98 = t66 * t66;
260   t99 = 0.1e1 / t98;
261   t100 = 0.1e1 / t51;
262   t101 = t100 * t62;
263   t105 = 0.1e1 / t52;
264   t106 = t105 * t51;
265   t107 = t57 * t95;
266   t108 = t52 * t52;
267   t109 = t108 * t52;
268   t111 = t57 * t57;
269   t113 = t58 * t58;
270   t116 = 0.45871178844685658610e1 / t109 * t111 * t113 + 0.1e1;
271   t117 = sqrt(t116);
272   t118 = 0.1e1 / t117;
273   t122 = 0.70819478890314631335e-1 * t50 * t101 * t95 + 0.16615495624729559964e1 * t106 * t107 * t118;
274   t123 = t99 * t122;
275   t125 = -t48 * t123 + t96 * t67;
276   if(vrho != NULL && (p->info->flags & XC_FLAGS_HAVE_VXC))
277     vrho[0] = -t71 / 0.4e1 - 0.3e1 / 0.16e2 * t76 * t77 * t125;
278 
279   t129 = t10 * t28;
280   t130 = t35 * t38;
281   t131 = t129 * t130;
282   t133 = t92 * t10;
283   t135 = t28 * t35 * t38;
284   t136 = t133 * t135;
285   t138 = 0.48888888888888888889e-1 * t131 + 0.34417777777777777778e-1 * t136;
286   t139 = t19 * t138;
287   t148 = 0.70819478890314631335e-1 * t50 * t101 * t138 + 0.16615495624729559964e1 * t106 * t57 * t138 * t118;
288   t149 = t99 * t148;
289   t152 = t77 * (t139 * t67 - t48 * t149);
290   if(vrho != NULL && (p->info->flags & XC_FLAGS_HAVE_VXC))
291     vsigma[0] = -0.3e1 / 0.16e2 * t76 * t152;
292 
293   t155 = t10 * t23;
294   t156 = t155 * t130;
295   t159 = t23 * t35 * t38;
296   t160 = t133 * t159;
297   t162 = 0.97777777777777777778e-1 * t156 + 0.68835555555555555555e-1 * t160;
298   t163 = t19 * t162;
299   t172 = 0.70819478890314631335e-1 * t50 * t101 * t162 + 0.16615495624729559964e1 * t106 * t57 * t162 * t118;
300   t173 = t99 * t172;
301   t176 = t77 * (t163 * t67 - t48 * t173);
302   if(vrho != NULL && (p->info->flags & XC_FLAGS_NEEDS_LAPLACIAN) && (p->info->flags & XC_FLAGS_HAVE_VXC))
303     vlapl[0] = -0.3e1 / 0.16e2 * t76 * t176;
304 
305   t181 = -0.39111111111111111111e0 * t156 - 0.27534222222222222222e0 * t160;
306   t182 = t19 * t181;
307   t191 = 0.70819478890314631335e-1 * t50 * t101 * t181 + 0.16615495624729559964e1 * t106 * t57 * t181 * t118;
308   t192 = t99 * t191;
309   t195 = t77 * (t182 * t67 - t48 * t192);
310   if(vrho != NULL && (p->info->flags & XC_FLAGS_HAVE_VXC))
311     vtau[0] = -0.3e1 / 0.16e2 * t76 * t195;
312 
313 #ifndef XC_DONT_COMPILE_FXC
314 
315   if(order < 2) return;
316 
317 
318   t198 = 0.1e1 / t21;
319   t199 = t10 * t198;
320   t208 = t26 * t26;
321   t210 = 0.1e1 / t21 / t208;
322   t215 = 0.40e2 / 0.9e1 * t20 * t82 - 0.11e2 / 0.9e1 * t25 * t210 - 0.10e2 / 0.9e1 * t31 * t82;
323   t217 = t215 * t35 * t38;
324   t220 = 0.1e1 / t46 / t45;
325   t221 = t220 * t43;
326   t222 = t87 * t87;
327   t223 = t35 * t35;
328   t226 = 0.1e1 / t16 / t15;
329   t231 = t223 * t226;
330   t236 = -0.39111111111111111111e0 * t217 - 0.75813339338271604937e-1 * t221 * t222 * t223 * t226 + 0.15296790123456790123e0 * t91 * t222 * t231 - 0.27534222222222222222e0 * t92 * t217;
331   t237 = t19 * t236;
332   t242 = 0.1e1 / t98 / t66;
333   t243 = t122 * t122;
334   t244 = t242 * t243;
335   t248 = 0.1e1 / t51 / t47;
336   t249 = t248 * t62;
337   t250 = t95 * t95;
338   t254 = t105 * t100;
339   t266 = t108 * t108;
340   t267 = 0.1e1 / t266;
341   t268 = t267 * t51;
342   t269 = t111 * t57;
343   t270 = t268 * t269;
344   t272 = 0.1e1 / t117 / t116;
345   t273 = t250 * t272;
346   t277 = -0.35409739445157315668e-1 * t50 * t249 * t250 + 0.16615495624729559964e1 * t254 * t57 * t250 * t118 + 0.70819478890314631335e-1 * t50 * t101 * t236 + 0.16615495624729559964e1 * t106 * t57 * t236 * t118 - 0.76217237139506171188e1 * t270 * t273 * t58;
347   t278 = t99 * t277;
348   t280 = -0.2e1 * t96 * t123 + t237 * t67 + 0.2e1 * t48 * t244 - t48 * t278;
349   if(v2rho2 != NULL && (p->info->flags & XC_FLAGS_HAVE_FXC))
350     v2rho2[0] = -t8 * t199 * t69 / 0.12e2 - t8 * t12 * t125 / 0.2e1 - 0.3e1 / 0.16e2 * t76 * t77 * t280;
351 
352   t285 = t11 * t2 * t4;
353   t288 = t10 * t82;
354   t289 = t288 * t130;
355   t291 = t221 * t10;
356   t292 = t28 * t223;
357   t293 = t226 * t87;
358   t295 = t291 * t292 * t293;
359   t297 = t91 * t87;
360   t298 = t297 * t223;
361   t299 = t226 * t10;
362   t300 = t299 * t28;
363   t301 = t298 * t300;
364   t305 = t133 * t82 * t35 * t38;
365   t307 = -0.13037037037037037037e0 * t289 + 0.94766674172839506173e-2 * t295 - 0.19120987654320987654e-1 * t301 - 0.91780740740740740741e-1 * t305;
366   t308 = t19 * t307;
367   t312 = t242 * t148;
368   t313 = t312 * t122;
369   t316 = t50 * t248;
370   t317 = t62 * t138;
371   t321 = t254 * t57;
372   t322 = t95 * t118;
373   t333 = t138 * t272;
374   t334 = t58 * t95;
375   t335 = t333 * t334;
376   t338 = -0.35409739445157315668e-1 * t316 * t317 * t95 + 0.16615495624729559964e1 * t321 * t322 * t138 + 0.70819478890314631335e-1 * t50 * t101 * t307 + 0.16615495624729559964e1 * t106 * t57 * t307 * t118 - 0.76217237139506171188e1 * t270 * t335;
377   t339 = t99 * t338;
378   t342 = t77 * (-t139 * t123 - t96 * t149 + t308 * t67 + 0.2e1 * t48 * t313 - t48 * t339);
379   if(v2rho2 != NULL && (p->info->flags & XC_FLAGS_HAVE_FXC))
380     v2rhosigma[0] = -t285 * t152 / 0.4e1 - 0.3e1 / 0.16e2 * t76 * t342;
381 
382   t348 = t23 * t223;
383   t350 = t291 * t348 * t293;
384   t352 = t299 * t23;
385   t353 = t298 * t352;
386   t356 = -0.16296296296296296296e0 * t131 + 0.18953334834567901234e-1 * t350 - 0.38241975308641975308e-1 * t353 - 0.11472592592592592593e0 * t136;
387   t357 = t19 * t356;
388   t361 = t242 * t172;
389   t362 = t361 * t122;
390   t365 = t62 * t162;
391   t379 = t162 * t272;
392   t380 = t379 * t334;
393   t383 = -0.35409739445157315668e-1 * t316 * t365 * t95 + 0.16615495624729559964e1 * t321 * t322 * t162 + 0.70819478890314631335e-1 * t50 * t101 * t356 + 0.16615495624729559964e1 * t106 * t57 * t356 * t118 - 0.76217237139506171188e1 * t270 * t380;
394   t384 = t99 * t383;
395   t387 = t77 * (-t163 * t123 - t96 * t173 + t357 * t67 + 0.2e1 * t48 * t362 - t48 * t384);
396   if(v2rho2 != NULL && (p->info->flags & XC_FLAGS_NEEDS_LAPLACIAN) && (p->info->flags & XC_FLAGS_HAVE_FXC))
397     v2rholapl[0] = -t285 * t176 / 0.4e1 - 0.3e1 / 0.16e2 * t76 * t387;
398 
399   t396 = 0.65185185185185185185e0 * t131 - 0.75813339338271604937e-1 * t350 + 0.15296790123456790123e0 * t353 + 0.45890370370370370370e0 * t136;
400   t397 = t19 * t396;
401   t401 = t242 * t191;
402   t402 = t401 * t122;
403   t405 = t62 * t181;
404   t419 = t181 * t272;
405   t420 = t419 * t334;
406   t423 = -0.35409739445157315668e-1 * t316 * t405 * t95 + 0.16615495624729559964e1 * t321 * t322 * t181 + 0.70819478890314631335e-1 * t50 * t101 * t396 + 0.16615495624729559964e1 * t106 * t57 * t396 * t118 - 0.76217237139506171188e1 * t270 * t420;
407   t424 = t99 * t423;
408   t427 = t77 * (-t182 * t123 - t96 * t192 + t397 * t67 + 0.2e1 * t48 * t402 - t48 * t424);
409   if(v2rho2 != NULL && (p->info->flags & XC_FLAGS_HAVE_FXC))
410     v2rhotau[0] = -t285 * t195 / 0.4e1 - 0.3e1 / 0.16e2 * t76 * t427;
411 
412   t430 = t221 * t9;
413   t431 = t208 * rho[0];
414   t433 = 0.1e1 / t11 / t431;
415   t435 = t433 * t223 * t226;
416   t436 = t430 * t435;
417   t438 = t91 * t9;
418   t439 = t438 * t435;
419   t441 = -0.23691668543209876543e-2 * t436 + 0.47802469135802469136e-2 * t439;
420   t442 = t19 * t441;
421   t446 = t148 * t148;
422   t447 = t242 * t446;
423   t450 = t138 * t138;
424   t465 = t450 * t272;
425   t469 = -0.35409739445157315668e-1 * t50 * t249 * t450 + 0.16615495624729559964e1 * t254 * t57 * t450 * t118 + 0.70819478890314631335e-1 * t50 * t101 * t441 + 0.16615495624729559964e1 * t106 * t57 * t441 * t118 - 0.76217237139506171188e1 * t270 * t465 * t58;
426   t470 = t99 * t469;
427   t473 = t77 * (-0.2e1 * t139 * t149 + t442 * t67 + 0.2e1 * t48 * t447 - t48 * t470);
428   if(v2rho2 != NULL && (p->info->flags & XC_FLAGS_HAVE_FXC))
429     v2sigma2[0] = -0.3e1 / 0.16e2 * t76 * t473;
430 
431   t477 = 0.1e1 / t11 / t208;
432   t479 = t477 * t223 * t226;
433   t480 = t430 * t479;
434   t482 = t438 * t479;
435   t484 = -0.47383337086419753086e-2 * t480 + 0.95604938271604938271e-2 * t482;
436   t485 = t19 * t484;
437   t489 = t361 * t148;
438   t495 = t138 * t118;
439   t506 = t58 * t138;
440   t507 = t379 * t506;
441   t510 = -0.35409739445157315668e-1 * t316 * t365 * t138 + 0.16615495624729559964e1 * t321 * t495 * t162 + 0.70819478890314631335e-1 * t50 * t101 * t484 + 0.16615495624729559964e1 * t106 * t57 * t484 * t118 - 0.76217237139506171188e1 * t270 * t507;
442   t511 = t99 * t510;
443   t514 = t77 * (-t139 * t173 - t163 * t149 + 0.2e1 * t48 * t489 - t48 * t511 + t485 * t67);
444   if(v2rho2 != NULL && (p->info->flags & XC_FLAGS_NEEDS_LAPLACIAN) && (p->info->flags & XC_FLAGS_HAVE_FXC))
445     v2sigmalapl[0] = -0.3e1 / 0.16e2 * t76 * t514;
446 
447   t519 = 0.18953334834567901234e-1 * t480 - 0.38241975308641975308e-1 * t482;
448   t520 = t19 * t519;
449   t524 = t401 * t148;
450   t540 = t419 * t506;
451   t543 = -0.35409739445157315668e-1 * t316 * t405 * t138 + 0.16615495624729559964e1 * t321 * t495 * t181 + 0.70819478890314631335e-1 * t50 * t101 * t519 + 0.16615495624729559964e1 * t106 * t57 * t519 * t118 - 0.76217237139506171188e1 * t270 * t540;
452   t544 = t99 * t543;
453   t547 = t77 * (-t139 * t192 - t182 * t149 + 0.2e1 * t48 * t524 - t48 * t544 + t520 * t67);
454   if(v2rho2 != NULL && (p->info->flags & XC_FLAGS_HAVE_FXC))
455     v2sigmatau[0] = -0.3e1 / 0.16e2 * t76 * t547;
456 
457   t551 = 0.1e1 / t11 / t80;
458   t553 = t551 * t223 * t226;
459   t554 = t430 * t553;
460   t556 = t438 * t553;
461   t558 = -0.94766674172839506171e-2 * t554 + 0.19120987654320987654e-1 * t556;
462   t559 = t19 * t558;
463   t563 = t172 * t172;
464   t564 = t242 * t563;
465   t567 = t162 * t162;
466   t582 = t567 * t272;
467   t586 = -0.35409739445157315668e-1 * t50 * t249 * t567 + 0.16615495624729559964e1 * t254 * t57 * t567 * t118 + 0.70819478890314631335e-1 * t50 * t101 * t558 + 0.16615495624729559964e1 * t106 * t57 * t558 * t118 - 0.76217237139506171188e1 * t270 * t582 * t58;
468   t587 = t99 * t586;
469   t590 = t77 * (-0.2e1 * t163 * t173 + 0.2e1 * t48 * t564 - t48 * t587 + t559 * t67);
470   if(v2rho2 != NULL && (p->info->flags & XC_FLAGS_NEEDS_LAPLACIAN) && (p->info->flags & XC_FLAGS_HAVE_FXC))
471     v2lapl2[0] = -0.3e1 / 0.16e2 * t76 * t590;
472 
473   t595 = 0.37906669669135802469e-1 * t554 - 0.76483950617283950617e-1 * t556;
474   t596 = t19 * t595;
475   t600 = t401 * t172;
476   t606 = t162 * t118;
477   t617 = t58 * t162;
478   t618 = t419 * t617;
479   t621 = -0.35409739445157315668e-1 * t316 * t405 * t162 + 0.16615495624729559964e1 * t321 * t606 * t181 + 0.70819478890314631335e-1 * t50 * t101 * t595 + 0.16615495624729559964e1 * t106 * t57 * t595 * t118 - 0.76217237139506171188e1 * t270 * t618;
480   t622 = t99 * t621;
481   t625 = t77 * (-t163 * t192 - t182 * t173 + 0.2e1 * t48 * t600 - t48 * t622 + t596 * t67);
482   if(v2rho2 != NULL && (p->info->flags & XC_FLAGS_NEEDS_LAPLACIAN) && (p->info->flags & XC_FLAGS_HAVE_FXC))
483     v2lapltau[0] = -0.3e1 / 0.16e2 * t76 * t625;
484 
485   t630 = -0.15162667867654320988e0 * t554 + 0.30593580246913580247e0 * t556;
486   t631 = t19 * t630;
487   t635 = t191 * t191;
488   t636 = t242 * t635;
489   t639 = t181 * t181;
490   t654 = t639 * t272;
491   t658 = -0.35409739445157315668e-1 * t50 * t249 * t639 + 0.16615495624729559964e1 * t254 * t57 * t639 * t118 + 0.70819478890314631335e-1 * t50 * t101 * t630 + 0.16615495624729559964e1 * t106 * t57 * t630 * t118 - 0.76217237139506171188e1 * t270 * t654 * t58;
492   t659 = t99 * t658;
493   t662 = t77 * (-0.2e1 * t182 * t192 + 0.2e1 * t48 * t636 - t48 * t659 + t631 * t67);
494   if(v2rho2 != NULL && (p->info->flags & XC_FLAGS_HAVE_FXC))
495     v2tau2[0] = -0.3e1 / 0.16e2 * t76 * t662;
496 
497 #ifndef XC_DONT_COMPILE_KXC
498 
499   if(order < 3) return;
500 
501 
502   t677 = 0.1e1 / t21 / t431;
503   t682 = -0.440e3 / 0.27e2 * t20 * t210 + 0.154e3 / 0.27e2 * t25 * t677 + 0.110e3 / 0.27e2 * t31 * t210;
504   t684 = t682 * t35 * t38;
505   t686 = t45 * t45;
506   t688 = 0.1e1 / t46 / t686;
507   t690 = t688 * t43 * t42;
508   t691 = t222 * t87;
509   t694 = t220 * t42;
510   t695 = t15 * t15;
511   t696 = 0.1e1 / t695;
512   t700 = t221 * t87;
513   t701 = t231 * t215;
514   t704 = t220 * t691;
515   t711 = -0.39111111111111111111e0 * t684 - 0.38573713798808385273e-2 * t690 * t691 + 0.50542226225514403291e0 * t694 * t691 * t696 - 0.22744001801481481481e0 * t700 * t701 + 0.25943279877168604506e-2 * t704 * t42 + 0.45890370370370370369e0 * t297 * t701 - 0.27534222222222222222e0 * t92 * t684;
516   t712 = t19 * t711;
517   t720 = t98 * t98;
518   t721 = 0.1e1 / t720;
519   t722 = t243 * t122;
520   t723 = t721 * t722;
521   t726 = t242 * t122;
522   t727 = t726 * t277;
523   t730 = t47 * t47;
524   t732 = 0.1e1 / t51 / t730;
525   t733 = t732 * t62;
526   t734 = t250 * t95;
527   t738 = t105 * t248;
528   t743 = t62 * t95;
529   t750 = t267 * t100;
530   t751 = t750 * t269;
531   t752 = t734 * t272;
532   t763 = t236 * t272;
533   t768 = 0.1e1 / t266 / t109;
534   t769 = t768 * t51;
535   t770 = t111 * t111;
536   t771 = t770 * t57;
537   t772 = t769 * t771;
538   t773 = t116 * t116;
539   t775 = 0.1e1 / t117 / t773;
540   t776 = t734 * t775;
541   t784 = 0.53114609167735973502e-1 * t50 * t733 * t734 - 0.12461621718547169973e1 * t738 * t57 * t734 * t118 - 0.10622921833547194700e0 * t316 * t743 * t236 + 0.49846486874188679892e1 * t321 * t322 * t236 - 0.11432585570925925678e2 * t751 * t752 * t58 + 0.70819478890314631335e-1 * t50 * t101 * t711 + 0.16615495624729559964e1 * t106 * t57 * t711 * t118 - 0.22865171141851851357e2 * t270 * t763 * t334 + 0.10488523547622316684e3 * t772 * t776 * t113 - 0.76217237139506171188e1 * t268 * t269 * t734 * t272;
542   t785 = t99 * t784;
543   t787 = -0.3e1 * t237 * t123 + 0.6e1 * t96 * t244 - 0.3e1 * t96 * t278 - 0.6e1 * t48 * t723 + 0.6e1 * t48 * t727 - t48 * t785 + t712 * t67;
544   if(v3rho3 != NULL && (p->info->flags & XC_FLAGS_HAVE_KXC))
545     v3rho3[0] = t8 * t155 * t69 / 0.18e2 - t8 * t199 * t125 / 0.4e1 - 0.3e1 / 0.4e1 * t8 * t12 * t280 - 0.3e1 / 0.16e2 * t76 * t77 * t787;
546 
547   t792 = t198 * t2 * t4;
548   t798 = t10 * t210 * t130;
549   t801 = t690 * t129 * t222;
550   t803 = t694 * t10;
551   t804 = t28 * t696;
552   t806 = t803 * t804 * t222;
553   t808 = t82 * t223;
554   t810 = t291 * t808 * t293;
555   t812 = t226 * t215;
556   t814 = t291 * t292 * t812;
557   t816 = t220 * t222;
558   t818 = t816 * t129 * t42;
559   t821 = t91 * t215 * t223;
560   t822 = t821 * t300;
561   t824 = t299 * t82;
562   t825 = t298 * t824;
563   t829 = t133 * t210 * t35 * t38;
564   t831 = 0.47802469135802469136e0 * t798 + 0.48217142248510481592e-3 * t801 - 0.63177782781893004115e-1 * t806 - 0.50542226225514403292e-1 * t810 + 0.94766674172839506173e-2 * t814 - 0.32429099846460755633e-3 * t818 - 0.19120987654320987654e-1 * t822 + 0.10197860082304526749e0 * t825 + 0.33652938271604938272e0 * t829;
565   t832 = t19 * t831;
566   t845 = t721 * t148 * t243;
567   t848 = t242 * t338;
568   t849 = t848 * t122;
569   t852 = t312 * t277;
570   t855 = t50 * t732;
571   t859 = t738 * t57;
572   t860 = t250 * t118;
573   t864 = t62 * t307;
574   t871 = t236 * t118;
575   t888 = t307 * t272;
576   t889 = t888 * t334;
577   t892 = t138 * t775;
578   t893 = t113 * t250;
579   t900 = t58 * t236;
580   t904 = 0.53114609167735973502e-1 * t855 * t317 * t250 - 0.12461621718547169973e1 * t859 * t860 * t138 - 0.70819478890314631336e-1 * t316 * t864 * t95 - 0.35409739445157315668e-1 * t316 * t317 * t236 + 0.16615495624729559964e1 * t321 * t871 * t138 - 0.11432585570925925678e2 * t751 * t273 * t506 + 0.33230991249459119928e1 * t321 * t322 * t307 + 0.70819478890314631335e-1 * t50 * t101 * t831 + 0.16615495624729559964e1 * t106 * t57 * t831 * t118 - 0.15243447427901234238e2 * t270 * t889 + 0.10488523547622316684e3 * t772 * t892 * t893 - 0.76217237139506171188e1 * t270 * t333 * t250 - 0.76217237139506171188e1 * t270 * t333 * t900;
581   t905 = t99 * t904;
582   t907 = -0.2e1 * t308 * t123 + 0.2e1 * t139 * t244 - t139 * t278 - t237 * t149 + 0.4e1 * t96 * t313 - 0.2e1 * t96 * t339 - 0.6e1 * t48 * t845 + 0.4e1 * t48 * t849 + 0.2e1 * t48 * t852 - t48 * t905 + t832 * t67;
583   t908 = t77 * t907;
584   if(v3rho3 != NULL && (p->info->flags & XC_FLAGS_HAVE_KXC))
585     v3rho2sigma[0] = -t792 * t152 / 0.12e2 - t285 * t342 / 0.2e1 - 0.3e1 / 0.16e2 * t76 * t908;
586 
587   t917 = t690 * t155 * t222;
588   t919 = t23 * t696;
589   t921 = t803 * t919 * t222;
590   t925 = t291 * t348 * t812;
591   t928 = t816 * t155 * t42;
592   t930 = t821 * t352;
593   t934 = 0.43456790123456790123e0 * t289 + 0.96434284497020963181e-3 * t917 - 0.12635556556378600823e0 * t921 - 0.63177782781893004115e-1 * t295 + 0.18953334834567901234e-1 * t925 - 0.64858199692921511265e-3 * t928 - 0.38241975308641975308e-1 * t930 + 0.12747325102880658436e0 * t301 + 0.30593580246913580248e0 * t305;
594   t935 = t19 * t934;
595   t947 = t721 * t172;
596   t948 = t947 * t243;
597   t951 = t242 * t383;
598   t952 = t951 * t122;
599   t955 = t361 * t277;
600   t964 = t62 * t356;
601   t987 = t356 * t272;
602   t988 = t987 * t334;
603   t991 = t162 * t775;
604   t992 = t991 * t893;
605   t998 = t379 * t900;
606   t1001 = 0.53114609167735973502e-1 * t855 * t365 * t250 - 0.12461621718547169973e1 * t859 * t860 * t162 - 0.70819478890314631336e-1 * t316 * t964 * t95 - 0.35409739445157315668e-1 * t316 * t365 * t236 + 0.16615495624729559964e1 * t321 * t871 * t162 - 0.11432585570925925678e2 * t751 * t273 * t617 + 0.33230991249459119928e1 * t321 * t322 * t356 + 0.70819478890314631335e-1 * t50 * t101 * t934 + 0.16615495624729559964e1 * t106 * t57 * t934 * t118 - 0.15243447427901234238e2 * t270 * t988 + 0.10488523547622316684e3 * t772 * t992 - 0.76217237139506171188e1 * t270 * t379 * t250 - 0.76217237139506171188e1 * t270 * t998;
607   t1002 = t99 * t1001;
608   t1004 = -t48 * t1002 - 0.2e1 * t357 * t123 + 0.2e1 * t163 * t244 - t163 * t278 - t237 * t173 + 0.4e1 * t96 * t362 - 0.2e1 * t96 * t384 - 0.6e1 * t48 * t948 + 0.4e1 * t48 * t952 + 0.2e1 * t48 * t955 + t935 * t67;
609   t1005 = t77 * t1004;
610   if(v3rho3 != NULL && (p->info->flags & XC_FLAGS_NEEDS_LAPLACIAN) && (p->info->flags & XC_FLAGS_HAVE_KXC))
611     v3rho2lapl[0] = -t792 * t176 / 0.12e2 - t285 * t387 / 0.2e1 - 0.3e1 / 0.16e2 * t76 * t1005;
612 
613   t1021 = -0.17382716049382716049e1 * t289 - 0.38573713798808385273e-2 * t917 + 0.50542226225514403291e0 * t921 + 0.25271113112757201646e0 * t295 - 0.75813339338271604937e-1 * t925 + 0.25943279877168604506e-2 * t928 + 0.15296790123456790123e0 * t930 - 0.50989300411522633744e0 * t301 - 0.12237432098765432099e1 * t305;
614   t1022 = t19 * t1021;
615   t1034 = t721 * t191;
616   t1035 = t1034 * t243;
617   t1038 = t242 * t423;
618   t1039 = t1038 * t122;
619   t1042 = t401 * t277;
620   t1051 = t62 * t396;
621   t1061 = t181 * t58;
622   t1075 = t396 * t272;
623   t1076 = t1075 * t334;
624   t1079 = t181 * t775;
625   t1080 = t1079 * t893;
626   t1086 = t419 * t900;
627   t1089 = 0.53114609167735973502e-1 * t855 * t405 * t250 - 0.12461621718547169973e1 * t859 * t860 * t181 - 0.70819478890314631336e-1 * t316 * t1051 * t95 - 0.35409739445157315668e-1 * t316 * t405 * t236 + 0.16615495624729559964e1 * t321 * t871 * t181 - 0.11432585570925925678e2 * t751 * t273 * t1061 + 0.33230991249459119928e1 * t321 * t322 * t396 + 0.70819478890314631335e-1 * t50 * t101 * t1021 + 0.16615495624729559964e1 * t106 * t57 * t1021 * t118 - 0.15243447427901234238e2 * t270 * t1076 + 0.10488523547622316684e3 * t772 * t1080 - 0.76217237139506171188e1 * t270 * t419 * t250 - 0.76217237139506171188e1 * t270 * t1086;
628   t1090 = t99 * t1089;
629   t1092 = t1022 * t67 - 0.6e1 * t48 * t1035 + 0.4e1 * t48 * t1039 + 0.2e1 * t48 * t1042 - t48 * t1090 - 0.2e1 * t397 * t123 + 0.2e1 * t182 * t244 - t182 * t278 - t237 * t192 + 0.4e1 * t96 * t402 - 0.2e1 * t96 * t424;
630   t1093 = t77 * t1092;
631   if(v3rho3 != NULL && (p->info->flags & XC_FLAGS_HAVE_KXC))
632     v3rho2tau[0] = -t792 * t195 / 0.12e2 - t285 * t427 / 0.2e1 - 0.3e1 / 0.16e2 * t76 * t1093;
633 
634   t1098 = t9 * t433;
635   t1100 = t690 * t1098 * t87;
636   t1102 = t694 * t9;
637   t1103 = t433 * t696;
638   t1105 = t1102 * t1103 * t87;
639   t1107 = t208 * t26;
640   t1109 = 0.1e1 / t11 / t1107;
641   t1111 = t1109 * t223 * t226;
642   t1112 = t430 * t1111;
643   t1114 = t220 * t9;
644   t1115 = t433 * t42;
645   t1117 = t1114 * t1115 * t87;
646   t1119 = t438 * t1111;
647   t1121 = -0.12054285562127620398e-3 * t1100 + 0.15794445695473251029e-1 * t1105 + 0.12635556556378600823e-1 * t1112 + 0.81072749616151889083e-4 * t1117 - 0.25494650205761316873e-1 * t1119;
648   t1122 = t19 * t1121;
649   t1133 = t721 * t446;
650   t1134 = t1133 * t122;
651   t1137 = t312 * t338;
652   t1141 = t242 * t469;
653   t1142 = t1141 * t122;
654   t1145 = t62 * t450;
655   t1161 = t62 * t441;
656   t1175 = t441 * t272;
657   t1176 = t1175 * t334;
658   t1179 = t58 * t307;
659   t1183 = t450 * t775;
660   t1184 = t113 * t95;
661   t1191 = 0.53114609167735973502e-1 * t855 * t1145 * t95 - 0.12461621718547169973e1 * t859 * t322 * t450 - 0.70819478890314631336e-1 * t316 * t317 * t307 + 0.33230991249459119928e1 * t321 * t495 * t307 - 0.11432585570925925678e2 * t751 * t465 * t334 - 0.35409739445157315668e-1 * t316 * t1161 * t95 + 0.16615495624729559964e1 * t321 * t322 * t441 + 0.70819478890314631335e-1 * t50 * t101 * t1121 + 0.16615495624729559964e1 * t106 * t57 * t1121 * t118 - 0.76217237139506171188e1 * t270 * t1176 - 0.15243447427901234238e2 * t270 * t333 * t1179 + 0.10488523547622316684e3 * t772 * t1183 * t1184 - 0.76217237139506171188e1 * t270 * t465 * t95;
662   t1192 = t99 * t1191;
663   t1194 = t1122 * t67 - 0.6e1 * t48 * t1134 + 0.4e1 * t48 * t1137 + 0.2e1 * t48 * t1142 - t48 * t1192 - t442 * t123 + 0.4e1 * t139 * t313 - 0.2e1 * t139 * t339 - 0.2e1 * t308 * t149 + 0.2e1 * t96 * t447 - t96 * t470;
664   t1195 = t77 * t1194;
665   if(v3rho3 != NULL && (p->info->flags & XC_FLAGS_HAVE_KXC))
666     v3rhosigma2[0] = -t285 * t473 / 0.4e1 - 0.3e1 / 0.16e2 * t76 * t1195;
667 
668   t1200 = t9 * t477;
669   t1202 = t690 * t1200 * t87;
670   t1204 = t477 * t696;
671   t1206 = t1102 * t1204 * t87;
672   t1209 = t477 * t42;
673   t1211 = t1114 * t1209 * t87;
674   t1214 = -0.24108571124255240796e-3 * t1202 + 0.31588891390946502057e-1 * t1206 + 0.20532779404115226337e-1 * t436 + 0.16214549923230377817e-3 * t1211 - 0.41428806584362139917e-1 * t439;
675   t1215 = t19 * t1214;
676   t1228 = t48 * t721;
677   t1229 = t172 * t148;
678   t1230 = t1229 * t122;
679   t1233 = t951 * t148;
680   t1236 = t361 * t338;
681   t1240 = t242 * t510;
682   t1241 = t1240 * t122;
683   t1244 = t138 * t95;
684   t1248 = t162 * t138;
685   t1258 = t307 * t118;
686   t1262 = t269 * t138;
687   t1263 = t750 * t1262;
688   t1269 = t62 * t484;
689   t1283 = t484 * t272;
690   t1284 = t1283 * t334;
691   t1287 = t987 * t506;
692   t1290 = t771 * t162;
693   t1291 = t769 * t1290;
694   t1292 = t775 * t113;
695   t1293 = t1292 * t1244;
696   t1299 = t379 * t1179;
697   t1302 = 0.53114609167735973502e-1 * t855 * t365 * t1244 - 0.12461621718547169973e1 * t859 * t322 * t1248 - 0.35409739445157315668e-1 * t316 * t964 * t138 - 0.35409739445157315668e-1 * t316 * t365 * t307 + 0.16615495624729559964e1 * t321 * t1258 * t162 - 0.11432585570925925678e2 * t1263 * t380 + 0.16615495624729559964e1 * t321 * t495 * t356 - 0.35409739445157315668e-1 * t316 * t1269 * t95 + 0.16615495624729559964e1 * t321 * t322 * t484 + 0.70819478890314631335e-1 * t50 * t101 * t1214 + 0.16615495624729559964e1 * t106 * t57 * t1214 * t118 - 0.76217237139506171188e1 * t270 * t1284 - 0.76217237139506171188e1 * t270 * t1287 + 0.10488523547622316684e3 * t1291 * t1293 - 0.76217237139506171188e1 * t270 * t379 * t1244 - 0.76217237139506171188e1 * t270 * t1299;
698   t1303 = t99 * t1302;
699   t1305 = t1215 * t67 - 0.6e1 * t1228 * t1230 - t485 * t123 + 0.2e1 * t48 * t1233 + 0.2e1 * t48 * t1236 + 0.2e1 * t48 * t1241 - t48 * t1303 + 0.2e1 * t139 * t362 - t139 * t384 - t357 * t149 + 0.2e1 * t163 * t313 - t163 * t339 - t308 * t173 + 0.2e1 * t96 * t489 - t96 * t511;
700   t1306 = t77 * t1305;
701   if(v3rho3 != NULL && (p->info->flags & XC_FLAGS_NEEDS_LAPLACIAN) && (p->info->flags & XC_FLAGS_HAVE_KXC))
702     v3rhosigmalapl[0] = -t285 * t514 / 0.4e1 - 0.3e1 / 0.16e2 * t76 * t1306;
703 
704   t1316 = 0.96434284497020963181e-3 * t1202 - 0.12635556556378600823e0 * t1206 - 0.82131117616460905347e-1 * t436 - 0.64858199692921511265e-3 * t1211 + 0.16571522633744855967e0 * t439;
705   t1317 = t19 * t1316;
706   t1330 = t191 * t148;
707   t1331 = t1330 * t122;
708   t1334 = t1038 * t148;
709   t1337 = t401 * t338;
710   t1341 = t242 * t543;
711   t1342 = t1341 * t122;
712   t1348 = t181 * t138;
713   t1366 = t62 * t519;
714   t1380 = t519 * t272;
715   t1381 = t1380 * t334;
716   t1384 = t1075 * t506;
717   t1388 = t769 * t771 * t181;
718   t1391 = t419 * t1244;
719   t1394 = t419 * t1179;
720   t1397 = 0.53114609167735973502e-1 * t855 * t405 * t1244 - 0.12461621718547169973e1 * t859 * t322 * t1348 - 0.35409739445157315668e-1 * t316 * t1051 * t138 - 0.35409739445157315668e-1 * t316 * t405 * t307 + 0.16615495624729559964e1 * t321 * t1258 * t181 - 0.11432585570925925678e2 * t1263 * t420 + 0.16615495624729559964e1 * t321 * t495 * t396 - 0.35409739445157315668e-1 * t316 * t1366 * t95 + 0.16615495624729559964e1 * t321 * t322 * t519 + 0.70819478890314631335e-1 * t50 * t101 * t1316 + 0.16615495624729559964e1 * t106 * t57 * t1316 * t118 - 0.76217237139506171188e1 * t270 * t1381 - 0.76217237139506171188e1 * t270 * t1384 + 0.10488523547622316684e3 * t1388 * t1293 - 0.76217237139506171188e1 * t270 * t1391 - 0.76217237139506171188e1 * t270 * t1394;
721   t1398 = t99 * t1397;
722   t1400 = -0.6e1 * t1228 * t1331 - t520 * t123 + t1317 * t67 + 0.2e1 * t48 * t1334 + 0.2e1 * t48 * t1337 + 0.2e1 * t48 * t1342 + 0.2e1 * t139 * t402 - t139 * t424 - t48 * t1398 - t397 * t149 + 0.2e1 * t182 * t313 - t182 * t339 - t308 * t192 + 0.2e1 * t96 * t524 - t96 * t544;
723   t1401 = t77 * t1400;
724   if(v3rho3 != NULL && (p->info->flags & XC_FLAGS_HAVE_KXC))
725     v3rhosigmatau[0] = -t285 * t547 / 0.4e1 - 0.3e1 / 0.16e2 * t76 * t1401;
726 
727   t1406 = t9 * t551;
728   t1408 = t690 * t1406 * t87;
729   t1410 = t551 * t696;
730   t1412 = t1102 * t1410 * t87;
731   t1415 = t551 * t42;
732   t1417 = t1114 * t1415 * t87;
733   t1420 = -0.48217142248510481591e-3 * t1408 + 0.63177782781893004114e-1 * t1412 + 0.31588891390946502057e-1 * t480 + 0.32429099846460755633e-3 * t1417 - 0.63736625514403292180e-1 * t482;
734   t1421 = t19 * t1420;
735   t1432 = t721 * t563;
736   t1433 = t1432 * t122;
737   t1436 = t361 * t383;
738   t1440 = t242 * t586;
739   t1441 = t1440 * t122;
740   t1444 = t62 * t567;
741   t1457 = t582 * t334;
742   t1460 = t62 * t558;
743   t1474 = t558 * t272;
744   t1475 = t1474 * t334;
745   t1478 = t58 * t356;
746   t1482 = t567 * t775;
747   t1489 = 0.53114609167735973502e-1 * t855 * t1444 * t95 - 0.12461621718547169973e1 * t859 * t322 * t567 - 0.70819478890314631336e-1 * t316 * t365 * t356 + 0.33230991249459119928e1 * t321 * t606 * t356 - 0.11432585570925925678e2 * t751 * t1457 - 0.35409739445157315668e-1 * t316 * t1460 * t95 + 0.16615495624729559964e1 * t321 * t322 * t558 + 0.70819478890314631335e-1 * t50 * t101 * t1420 + 0.16615495624729559964e1 * t106 * t57 * t1420 * t118 - 0.76217237139506171188e1 * t270 * t1475 - 0.15243447427901234238e2 * t270 * t379 * t1478 + 0.10488523547622316684e3 * t772 * t1482 * t1184 - 0.76217237139506171188e1 * t270 * t582 * t95;
748   t1490 = t99 * t1489;
749   t1492 = -t559 * t123 + t1421 * t67 - 0.6e1 * t48 * t1433 + 0.4e1 * t48 * t1436 + 0.2e1 * t48 * t1441 - t48 * t1490 + 0.4e1 * t163 * t362 - 0.2e1 * t163 * t384 - 0.2e1 * t357 * t173 + 0.2e1 * t96 * t564 - t96 * t587;
750   t1493 = t77 * t1492;
751   if(v3rho3 != NULL && (p->info->flags & XC_FLAGS_NEEDS_LAPLACIAN) && (p->info->flags & XC_FLAGS_HAVE_KXC))
752     v3rholapl2[0] = -t285 * t590 / 0.4e1 - 0.3e1 / 0.16e2 * t76 * t1493;
753 
754   t1503 = 0.19286856899404192637e-2 * t1408 - 0.25271113112757201646e0 * t1412 - 0.12635556556378600823e0 * t480 - 0.12971639938584302253e-2 * t1417 + 0.25494650205761316872e0 * t482;
755   t1504 = t19 * t1503;
756   t1517 = t191 * t172;
757   t1518 = t1517 * t122;
758   t1521 = t1038 * t172;
759   t1524 = t401 * t383;
760   t1528 = t242 * t621;
761   t1529 = t1528 * t122;
762   t1532 = t162 * t95;
763   t1536 = t181 * t162;
764   t1546 = t356 * t118;
765   t1550 = t269 * t162;
766   t1551 = t750 * t1550;
767   t1557 = t62 * t595;
768   t1571 = t595 * t272;
769   t1572 = t1571 * t334;
770   t1575 = t1075 * t617;
771   t1578 = t1292 * t1532;
772   t1584 = t419 * t1478;
773   t1587 = 0.53114609167735973502e-1 * t855 * t405 * t1532 - 0.12461621718547169973e1 * t859 * t322 * t1536 - 0.35409739445157315668e-1 * t316 * t1051 * t162 - 0.35409739445157315668e-1 * t316 * t405 * t356 + 0.16615495624729559964e1 * t321 * t1546 * t181 - 0.11432585570925925678e2 * t1551 * t420 + 0.16615495624729559964e1 * t321 * t606 * t396 - 0.35409739445157315668e-1 * t316 * t1557 * t95 + 0.16615495624729559964e1 * t321 * t322 * t595 + 0.70819478890314631335e-1 * t50 * t101 * t1503 + 0.16615495624729559964e1 * t106 * t57 * t1503 * t118 - 0.76217237139506171188e1 * t270 * t1572 - 0.76217237139506171188e1 * t270 * t1575 + 0.10488523547622316684e3 * t1388 * t1578 - 0.76217237139506171188e1 * t270 * t419 * t1532 - 0.76217237139506171188e1 * t270 * t1584;
774   t1588 = t99 * t1587;
775   t1590 = -0.6e1 * t1228 * t1518 - t596 * t123 + t1504 * t67 + 0.2e1 * t48 * t1521 + 0.2e1 * t48 * t1524 + 0.2e1 * t48 * t1529 - t48 * t1588 + 0.2e1 * t163 * t402 - t163 * t424 - t397 * t173 + 0.2e1 * t182 * t362 - t182 * t384 - t357 * t192 + 0.2e1 * t96 * t600 - t96 * t622;
776   t1591 = t77 * t1590;
777   if(v3rho3 != NULL && (p->info->flags & XC_FLAGS_NEEDS_LAPLACIAN) && (p->info->flags & XC_FLAGS_HAVE_KXC))
778     v3rholapltau[0] = -t285 * t625 / 0.4e1 - 0.3e1 / 0.16e2 * t76 * t1591;
779 
780   t1601 = -0.77147427597616770549e-2 * t1408 + 0.10108445245102880659e1 * t1412 + 0.50542226225514403293e0 * t480 + 0.51886559754337209013e-2 * t1417 - 0.10197860082304526749e1 * t482;
781   t1602 = t19 * t1601;
782   t1613 = t721 * t635;
783   t1614 = t1613 * t122;
784   t1617 = t401 * t423;
785   t1621 = t242 * t658;
786   t1622 = t1621 * t122;
787   t1625 = t62 * t639;
788   t1635 = t181 * t118;
789   t1639 = t654 * t334;
790   t1642 = t62 * t630;
791   t1656 = t630 * t272;
792   t1657 = t1656 * t334;
793   t1660 = t58 * t396;
794   t1664 = t639 * t775;
795   t1671 = 0.53114609167735973502e-1 * t855 * t1625 * t95 - 0.12461621718547169973e1 * t859 * t322 * t639 - 0.70819478890314631336e-1 * t316 * t405 * t396 + 0.33230991249459119928e1 * t321 * t1635 * t396 - 0.11432585570925925678e2 * t751 * t1639 - 0.35409739445157315668e-1 * t316 * t1642 * t95 + 0.16615495624729559964e1 * t321 * t322 * t630 + 0.70819478890314631335e-1 * t50 * t101 * t1601 + 0.16615495624729559964e1 * t106 * t57 * t1601 * t118 - 0.76217237139506171188e1 * t270 * t1657 - 0.15243447427901234238e2 * t270 * t419 * t1660 + 0.10488523547622316684e3 * t772 * t1664 * t1184 - 0.76217237139506171188e1 * t270 * t654 * t95;
796   t1672 = t99 * t1671;
797   t1674 = -t631 * t123 + t1602 * t67 - 0.6e1 * t48 * t1614 + 0.4e1 * t48 * t1617 + 0.2e1 * t48 * t1622 - t48 * t1672 + 0.4e1 * t182 * t402 - 0.2e1 * t182 * t424 - 0.2e1 * t397 * t192 + 0.2e1 * t96 * t636 - t96 * t659;
798   t1675 = t77 * t1674;
799   if(v3rho3 != NULL && (p->info->flags & XC_FLAGS_HAVE_KXC))
800     v3rhotau2[0] = -t285 * t662 / 0.4e1 - 0.3e1 / 0.16e2 * t76 * t1675;
801 
802   t1678 = t208 * t208;
803   t1679 = 0.1e1 / t1678;
804   t1680 = t690 * t1679;
805   t1683 = t694 * t1679 * t696;
806   t1685 = t220 * t1679;
807   t1686 = t1685 * t42;
808   t1688 = 0.30135713905319050995e-4 * t1680 - 0.39486114238683127572e-2 * t1683 - 0.20268187404037972271e-4 * t1686;
809   t1689 = t19 * t1688;
810   t1697 = t446 * t148;
811   t1698 = t721 * t1697;
812   t1701 = t312 * t469;
813   t1704 = t450 * t138;
814   t1718 = t1704 * t272;
815   t1732 = t1704 * t775;
816   t1740 = 0.53114609167735973502e-1 * t50 * t733 * t1704 - 0.12461621718547169973e1 * t738 * t57 * t1704 * t118 - 0.10622921833547194700e0 * t316 * t317 * t441 + 0.49846486874188679892e1 * t321 * t495 * t441 - 0.11432585570925925678e2 * t751 * t1718 * t58 + 0.70819478890314631335e-1 * t50 * t101 * t1688 + 0.16615495624729559964e1 * t106 * t57 * t1688 * t118 - 0.22865171141851851357e2 * t270 * t1175 * t506 + 0.10488523547622316684e3 * t772 * t1732 * t113 - 0.76217237139506171188e1 * t268 * t269 * t1704 * t272;
817   t1741 = t99 * t1740;
818   t1744 = t77 * (0.6e1 * t139 * t447 - 0.3e1 * t139 * t470 - 0.3e1 * t442 * t149 + t1689 * t67 - 0.6e1 * t48 * t1698 + 0.6e1 * t48 * t1701 - t48 * t1741);
819   if(v3rho3 != NULL && (p->info->flags & XC_FLAGS_HAVE_KXC))
820     v3sigma3[0] = -0.3e1 / 0.16e2 * t76 * t1744;
821 
822   t1747 = t208 * t80;
823   t1748 = 0.1e1 / t1747;
824   t1749 = t690 * t1748;
825   t1752 = t694 * t1748 * t696;
826   t1754 = t220 * t1748;
827   t1755 = t1754 * t42;
828   t1757 = 0.60271427810638101989e-4 * t1749 - 0.78972228477366255143e-2 * t1752 - 0.40536374808075944541e-4 * t1755;
829   t1758 = t19 * t1757;
830   t1770 = t947 * t446;
831   t1773 = t1240 * t148;
832   t1776 = t361 * t469;
833   t1782 = t450 * t118;
834   t1792 = t441 * t118;
835   t1809 = t1283 * t506;
836   t1812 = t113 * t450;
837   t1819 = t58 * t441;
838   t1823 = 0.53114609167735973502e-1 * t855 * t365 * t450 - 0.12461621718547169973e1 * t859 * t1782 * t162 - 0.70819478890314631336e-1 * t316 * t1269 * t138 - 0.35409739445157315668e-1 * t316 * t365 * t441 + 0.16615495624729559964e1 * t321 * t1792 * t162 - 0.11432585570925925678e2 * t751 * t465 * t617 + 0.33230991249459119928e1 * t321 * t495 * t484 + 0.70819478890314631335e-1 * t50 * t101 * t1757 + 0.16615495624729559964e1 * t106 * t57 * t1757 * t118 - 0.15243447427901234238e2 * t270 * t1809 + 0.10488523547622316684e3 * t772 * t991 * t1812 - 0.76217237139506171188e1 * t270 * t379 * t450 - 0.76217237139506171188e1 * t270 * t379 * t1819;
839   t1824 = t99 * t1823;
840   t1826 = 0.4e1 * t139 * t489 - 0.2e1 * t139 * t511 - 0.2e1 * t485 * t149 + 0.2e1 * t163 * t447 - t163 * t470 - t442 * t173 + t1758 * t67 - 0.6e1 * t48 * t1770 + 0.4e1 * t48 * t1773 + 0.2e1 * t48 * t1776 - t48 * t1824;
841   t1827 = t77 * t1826;
842   if(v3rho3 != NULL && (p->info->flags & XC_FLAGS_NEEDS_LAPLACIAN) && (p->info->flags & XC_FLAGS_HAVE_KXC))
843     v3sigma2lapl[0] = -0.3e1 / 0.16e2 * t76 * t1827;
844 
845   t1833 = -0.24108571124255240795e-3 * t1749 + 0.31588891390946502057e-1 * t1752 + 0.16214549923230377816e-3 * t1755;
846   t1834 = t19 * t1833;
847   t1846 = t1034 * t446;
848   t1849 = t1341 * t148;
849   t1852 = t401 * t469;
850   t1883 = t1380 * t506;
851   t1886 = t1079 * t1812;
852   t1892 = t419 * t1819;
853   t1895 = 0.53114609167735973502e-1 * t855 * t405 * t450 - 0.12461621718547169973e1 * t859 * t1782 * t181 - 0.70819478890314631336e-1 * t316 * t1366 * t138 - 0.35409739445157315668e-1 * t316 * t405 * t441 + 0.16615495624729559964e1 * t321 * t1792 * t181 - 0.11432585570925925678e2 * t751 * t465 * t1061 + 0.33230991249459119928e1 * t321 * t495 * t519 + 0.70819478890314631335e-1 * t50 * t101 * t1833 + 0.16615495624729559964e1 * t106 * t57 * t1833 * t118 - 0.15243447427901234238e2 * t270 * t1883 + 0.10488523547622316684e3 * t772 * t1886 - 0.76217237139506171188e1 * t270 * t419 * t450 - 0.76217237139506171188e1 * t270 * t1892;
854   t1896 = t99 * t1895;
855   t1898 = 0.4e1 * t139 * t524 - 0.2e1 * t139 * t544 - 0.2e1 * t520 * t149 + 0.2e1 * t182 * t447 - t182 * t470 + t1834 * t67 - 0.6e1 * t48 * t1846 + 0.4e1 * t48 * t1849 + 0.2e1 * t48 * t1852 - t48 * t1896 - t442 * t192;
856   t1899 = t77 * t1898;
857   if(v3rho3 != NULL && (p->info->flags & XC_FLAGS_HAVE_KXC))
858     v3sigma2tau[0] = -0.3e1 / 0.16e2 * t76 * t1899;
859 
860   t1902 = 0.1e1 / t1107;
861   t1903 = t690 * t1902;
862   t1906 = t694 * t1902 * t696;
863   t1908 = t220 * t1902;
864   t1909 = t1908 * t42;
865   t1911 = 0.12054285562127620398e-3 * t1903 - 0.15794445695473251029e-1 * t1906 - 0.81072749616151889082e-4 * t1909;
866   t1912 = t19 * t1911;
867   t1923 = t1432 * t148;
868   t1926 = t361 * t510;
869   t1930 = t1440 * t148;
870   t1961 = t1474 * t506;
871   t1964 = t58 * t484;
872   t1968 = t113 * t138;
873   t1975 = 0.53114609167735973502e-1 * t855 * t1444 * t138 - 0.12461621718547169973e1 * t859 * t495 * t567 - 0.70819478890314631336e-1 * t316 * t365 * t484 + 0.33230991249459119928e1 * t321 * t606 * t484 - 0.11432585570925925678e2 * t751 * t582 * t506 - 0.35409739445157315668e-1 * t316 * t1460 * t138 + 0.16615495624729559964e1 * t321 * t495 * t558 + 0.70819478890314631335e-1 * t50 * t101 * t1911 + 0.16615495624729559964e1 * t106 * t57 * t1911 * t118 - 0.76217237139506171188e1 * t270 * t1961 - 0.15243447427901234238e2 * t270 * t379 * t1964 + 0.10488523547622316684e3 * t772 * t1482 * t1968 - 0.76217237139506171188e1 * t270 * t582 * t138;
874   t1976 = t99 * t1975;
875   t1978 = 0.2e1 * t139 * t564 - t139 * t587 - t559 * t149 + 0.4e1 * t163 * t489 - 0.2e1 * t163 * t511 - 0.2e1 * t485 * t173 + t1912 * t67 - 0.6e1 * t48 * t1923 + 0.4e1 * t48 * t1926 + 0.2e1 * t48 * t1930 - t48 * t1976;
876   t1979 = t77 * t1978;
877   if(v3rho3 != NULL && (p->info->flags & XC_FLAGS_NEEDS_LAPLACIAN) && (p->info->flags & XC_FLAGS_HAVE_KXC))
878     v3sigmalapl2[0] = -0.3e1 / 0.16e2 * t76 * t1979;
879 
880   t1985 = -0.48217142248510481592e-3 * t1903 + 0.63177782781893004115e-1 * t1906 + 0.32429099846460755633e-3 * t1909;
881   t1986 = t19 * t1985;
882   t1999 = t1517 * t148;
883   t2002 = t1341 * t172;
884   t2005 = t401 * t510;
885   t2009 = t1528 * t148;
886   t2015 = t495 * t1536;
887   t2024 = t484 * t118;
888   t2046 = t1571 * t506;
889   t2049 = t1380 * t617;
890   t2052 = t1292 * t1248;
891   t2058 = t419 * t1964;
892   t2061 = 0.53114609167735973502e-1 * t855 * t405 * t1248 - 0.12461621718547169973e1 * t859 * t2015 - 0.35409739445157315668e-1 * t316 * t1366 * t162 - 0.35409739445157315668e-1 * t316 * t405 * t484 + 0.16615495624729559964e1 * t321 * t2024 * t181 - 0.11432585570925925678e2 * t1551 * t540 + 0.16615495624729559964e1 * t321 * t606 * t519 - 0.35409739445157315668e-1 * t316 * t1557 * t138 + 0.16615495624729559964e1 * t321 * t495 * t595 + 0.70819478890314631335e-1 * t50 * t101 * t1985 + 0.16615495624729559964e1 * t106 * t57 * t1985 * t118 - 0.76217237139506171188e1 * t270 * t2046 - 0.76217237139506171188e1 * t270 * t2049 + 0.10488523547622316684e3 * t1388 * t2052 - 0.76217237139506171188e1 * t270 * t419 * t1248 - 0.76217237139506171188e1 * t270 * t2058;
893   t2062 = t99 * t2061;
894   t2064 = -0.6e1 * t1228 * t1999 + 0.2e1 * t139 * t600 - t139 * t622 - t596 * t149 + 0.2e1 * t163 * t524 - t163 * t544 - t520 * t173 + 0.2e1 * t182 * t489 - t182 * t511 - t485 * t192 + t1986 * t67 + 0.2e1 * t48 * t2002 + 0.2e1 * t48 * t2005 + 0.2e1 * t48 * t2009 - t48 * t2062;
895   t2065 = t77 * t2064;
896   if(v3rho3 != NULL && (p->info->flags & XC_FLAGS_NEEDS_LAPLACIAN) && (p->info->flags & XC_FLAGS_HAVE_KXC))
897     v3sigmalapltau[0] = -0.3e1 / 0.16e2 * t76 * t2065;
898 
899   t2071 = 0.19286856899404192637e-2 * t1903 - 0.25271113112757201647e0 * t1906 - 0.12971639938584302253e-2 * t1909;
900   t2072 = t19 * t2071;
901   t2083 = t1613 * t148;
902   t2086 = t401 * t543;
903   t2090 = t1621 * t148;
904   t2105 = t654 * t506;
905   t2121 = t1656 * t506;
906   t2124 = t58 * t519;
907   t2134 = 0.53114609167735973502e-1 * t855 * t1625 * t138 - 0.12461621718547169973e1 * t859 * t495 * t639 - 0.70819478890314631336e-1 * t316 * t405 * t519 + 0.33230991249459119928e1 * t321 * t1635 * t519 - 0.11432585570925925678e2 * t751 * t2105 - 0.35409739445157315668e-1 * t316 * t1642 * t138 + 0.16615495624729559964e1 * t321 * t495 * t630 + 0.70819478890314631335e-1 * t50 * t101 * t2071 + 0.16615495624729559964e1 * t106 * t57 * t2071 * t118 - 0.76217237139506171188e1 * t270 * t2121 - 0.15243447427901234238e2 * t270 * t419 * t2124 + 0.10488523547622316684e3 * t772 * t1664 * t1968 - 0.76217237139506171188e1 * t270 * t654 * t138;
908   t2135 = t99 * t2134;
909   t2137 = 0.2e1 * t139 * t636 - t139 * t659 - t631 * t149 + 0.4e1 * t182 * t524 - 0.2e1 * t182 * t544 - 0.2e1 * t520 * t192 + t2072 * t67 - 0.6e1 * t48 * t2083 + 0.4e1 * t48 * t2086 + 0.2e1 * t48 * t2090 - t48 * t2135;
910   t2138 = t77 * t2137;
911   if(v3rho3 != NULL && (p->info->flags & XC_FLAGS_HAVE_KXC))
912     v3sigmatau2[0] = -0.3e1 / 0.16e2 * t76 * t2138;
913 
914   t2141 = 0.1e1 / t431;
915   t2142 = t690 * t2141;
916   t2145 = t694 * t2141 * t696;
917   t2147 = t220 * t2141;
918   t2148 = t2147 * t42;
919   t2150 = 0.24108571124255240795e-3 * t2142 - 0.31588891390946502057e-1 * t2145 - 0.16214549923230377816e-3 * t2148;
920   t2151 = t19 * t2150;
921   t2159 = t563 * t172;
922   t2160 = t721 * t2159;
923   t2163 = t361 * t586;
924   t2166 = t567 * t162;
925   t2180 = t2166 * t272;
926   t2194 = t2166 * t775;
927   t2202 = 0.53114609167735973502e-1 * t50 * t733 * t2166 - 0.12461621718547169973e1 * t738 * t57 * t2166 * t118 - 0.10622921833547194700e0 * t316 * t365 * t558 + 0.49846486874188679892e1 * t321 * t606 * t558 - 0.11432585570925925678e2 * t751 * t2180 * t58 + 0.70819478890314631335e-1 * t50 * t101 * t2150 + 0.16615495624729559964e1 * t106 * t57 * t2150 * t118 - 0.22865171141851851357e2 * t270 * t1474 * t617 + 0.10488523547622316684e3 * t772 * t2194 * t113 - 0.76217237139506171188e1 * t268 * t269 * t2166 * t272;
928   t2203 = t99 * t2202;
929   t2206 = t77 * (0.6e1 * t163 * t564 - 0.3e1 * t163 * t587 - 0.3e1 * t559 * t173 + t2151 * t67 - 0.6e1 * t48 * t2160 + 0.6e1 * t48 * t2163 - t48 * t2203);
930   if(v3rho3 != NULL && (p->info->flags & XC_FLAGS_NEEDS_LAPLACIAN) && (p->info->flags & XC_FLAGS_HAVE_KXC))
931     v3lapl3[0] = -0.3e1 / 0.16e2 * t76 * t2206;
932 
933   t2212 = -0.96434284497020963183e-3 * t2142 + 0.12635556556378600823e0 * t2145 + 0.64858199692921511266e-3 * t2148;
934   t2213 = t19 * t2212;
935   t2225 = t1034 * t563;
936   t2228 = t1528 * t172;
937   t2231 = t401 * t586;
938   t2237 = t567 * t118;
939   t2247 = t558 * t118;
940   t2264 = t1571 * t617;
941   t2267 = t113 * t567;
942   t2274 = t58 * t558;
943   t2278 = 0.53114609167735973502e-1 * t855 * t405 * t567 - 0.12461621718547169973e1 * t859 * t2237 * t181 - 0.70819478890314631336e-1 * t316 * t1557 * t162 - 0.35409739445157315668e-1 * t316 * t405 * t558 + 0.16615495624729559964e1 * t321 * t2247 * t181 - 0.11432585570925925678e2 * t751 * t582 * t1061 + 0.33230991249459119928e1 * t321 * t606 * t595 + 0.70819478890314631335e-1 * t50 * t101 * t2212 + 0.16615495624729559964e1 * t106 * t57 * t2212 * t118 - 0.15243447427901234238e2 * t270 * t2264 + 0.10488523547622316684e3 * t772 * t1079 * t2267 - 0.76217237139506171188e1 * t270 * t419 * t567 - 0.76217237139506171188e1 * t270 * t419 * t2274;
944   t2279 = t99 * t2278;
945   t2281 = 0.4e1 * t163 * t600 - 0.2e1 * t163 * t622 - 0.2e1 * t596 * t173 + 0.2e1 * t182 * t564 - t182 * t587 - t559 * t192 + t2213 * t67 - 0.6e1 * t48 * t2225 + 0.4e1 * t48 * t2228 + 0.2e1 * t48 * t2231 - t48 * t2279;
946   t2282 = t77 * t2281;
947   if(v3rho3 != NULL && (p->info->flags & XC_FLAGS_NEEDS_LAPLACIAN) && (p->info->flags & XC_FLAGS_HAVE_KXC))
948     v3lapl2tau[0] = -0.3e1 / 0.16e2 * t76 * t2282;
949 
950   t2288 = 0.38573713798808385274e-2 * t2142 - 0.50542226225514403293e0 * t2145 - 0.25943279877168604507e-2 * t2148;
951   t2289 = t19 * t2288;
952   t2300 = t1613 * t172;
953   t2303 = t401 * t621;
954   t2307 = t1621 * t172;
955   t2338 = t1656 * t617;
956   t2341 = t58 * t595;
957   t2345 = t113 * t162;
958   t2352 = 0.53114609167735973502e-1 * t855 * t1625 * t162 - 0.12461621718547169973e1 * t859 * t606 * t639 - 0.70819478890314631336e-1 * t316 * t405 * t595 + 0.33230991249459119928e1 * t321 * t1635 * t595 - 0.11432585570925925678e2 * t751 * t654 * t617 - 0.35409739445157315668e-1 * t316 * t1642 * t162 + 0.16615495624729559964e1 * t321 * t606 * t630 + 0.70819478890314631335e-1 * t50 * t101 * t2288 + 0.16615495624729559964e1 * t106 * t57 * t2288 * t118 - 0.76217237139506171188e1 * t270 * t2338 - 0.15243447427901234238e2 * t270 * t419 * t2341 + 0.10488523547622316684e3 * t772 * t1664 * t2345 - 0.76217237139506171188e1 * t270 * t654 * t162;
959   t2353 = t99 * t2352;
960   t2355 = 0.2e1 * t163 * t636 - t163 * t659 - t631 * t173 + 0.4e1 * t182 * t600 - 0.2e1 * t182 * t622 - 0.2e1 * t596 * t192 + t2289 * t67 - 0.6e1 * t48 * t2300 + 0.4e1 * t48 * t2303 + 0.2e1 * t48 * t2307 - t48 * t2353;
961   t2356 = t77 * t2355;
962   if(v3rho3 != NULL && (p->info->flags & XC_FLAGS_NEEDS_LAPLACIAN) && (p->info->flags & XC_FLAGS_HAVE_KXC))
963     v3lapltau2[0] = -0.3e1 / 0.16e2 * t76 * t2356;
964 
965   t2362 = -0.15429485519523354110e-1 * t2142 + 0.20216890490205761317e1 * t2145 + 0.10377311950867441803e-1 * t2148;
966   t2363 = t19 * t2362;
967   t2371 = t635 * t191;
968   t2372 = t721 * t2371;
969   t2375 = t401 * t658;
970   t2378 = t639 * t181;
971   t2392 = t2378 * t272;
972   t2406 = t2378 * t775;
973   t2414 = 0.53114609167735973502e-1 * t50 * t733 * t2378 - 0.12461621718547169973e1 * t738 * t57 * t2378 * t118 - 0.10622921833547194700e0 * t316 * t405 * t630 + 0.49846486874188679892e1 * t321 * t1635 * t630 - 0.11432585570925925678e2 * t751 * t2392 * t58 + 0.70819478890314631335e-1 * t50 * t101 * t2362 + 0.16615495624729559964e1 * t106 * t57 * t2362 * t118 - 0.22865171141851851357e2 * t270 * t1656 * t1061 + 0.10488523547622316684e3 * t772 * t2406 * t113 - 0.76217237139506171188e1 * t268 * t269 * t2378 * t272;
974   t2415 = t99 * t2414;
975   t2418 = t77 * (0.6e1 * t182 * t636 - 0.3e1 * t182 * t659 - 0.3e1 * t631 * t192 + t2363 * t67 - 0.6e1 * t48 * t2372 + 0.6e1 * t48 * t2375 - t48 * t2415);
976   if(v3rho3 != NULL && (p->info->flags & XC_FLAGS_HAVE_KXC))
977     v3tau3[0] = -0.3e1 / 0.16e2 * t76 * t2418;
978 
979 #ifndef XC_DONT_COMPILE_LXC
980 
981   if(order < 4) return;
982 
983 
984   t2435 = 0.1e1 / t21 / t1107;
985   t2442 = (0.6160e4 / 0.81e2 * t20 * t677 - 0.2618e4 / 0.81e2 * t25 * t2435 - 0.1540e4 / 0.81e2 * t31 * t677) * t35 * t38;
986   t2447 = t43 * t43;
987   t2448 = 0.1e1 / t46 / t686 / t45 * t2447;
988   t2449 = t222 * t222;
989   t2451 = t2449 * t35 * t38;
990   t2454 = t688 * t43;
991   t2460 = t220 * t2449;
992   t2461 = t130 * t696;
993   t2468 = t215 * t215;
994   t2473 = t231 * t682;
995   t2488 = -0.39111111111111111111e0 * t2442 - 0.53104860383639490765e-2 * t2448 * t2451 + 0.12857904599602795091e-1 * t2454 * t2451 - 0.23144228279285031164e-1 * t690 * t222 * t215 - 0.28079014569730224051e0 * t2460 * t2461 + 0.30325335735308641974e1 * t694 * t222 * t696 * t215 - 0.22744001801481481481e0 * t221 * t2468 * t223 * t226 - 0.30325335735308641975e0 * t700 * t2473 + 0.15565967926301162704e-1 * t816 * t42 * t215 - 0.14412933265093669170e-2 * t2460 * t130 + 0.45890370370370370369e0 * t91 * t2468 * t231 + 0.61187160493827160492e0 * t297 * t2473 - 0.27534222222222222222e0 * t92 * t2442;
996   t2504 = 0.1e1 / t720 / t66;
997   t2505 = t243 * t243;
998   t2513 = t277 * t277;
999   t2520 = t266 * t266;
1000   t2523 = 0.1e1 / t2520 / t108 * t51;
1001   t2524 = t770 * t269;
1002   t2525 = t2523 * t2524;
1003   t2526 = t250 * t250;
1004   t2529 = 0.1e1 / t117 / t773 / t116;
1005   t2531 = t113 * t58;
1006   t2539 = t768 * t100;
1007   t2540 = t2539 * t771;
1008   t2541 = t2526 * t775;
1009   t2552 = t105 * t732;
1010   t2557 = t236 * t236;
1011   t2573 = 0.1e1 / t51 / t730 / t47;
1012   t2574 = t2573 * t62;
1013   t2585 = t267 * t248;
1014   t2586 = t2585 * t269;
1015   t2612 = -0.24056046973484009303e4 * t2525 * t2526 * t2529 * t2531 - 0.15243447427901234237e2 * t750 * t269 * t2526 * t272 + 0.20977047095244633367e3 * t2540 * t2541 * t113 + 0.16615495624729559964e1 * t106 * t57 * t2488 * t118 + 0.70819478890314631335e-1 * t50 * t101 * t2488 + 0.24923243437094339947e1 * t2552 * t57 * t2526 * t118 - 0.10622921833547194700e0 * t50 * t249 * t2557 - 0.14163895778062926267e0 * t316 * t743 * t711 + 0.49846486874188679892e1 * t254 * t57 * t2557 * t118 + 0.66461982498918239856e1 * t321 * t322 * t711 - 0.13278652291933993376e0 * t50 * t2574 * t2526 + 0.31868765500641584101e0 * t855 * t62 * t250 * t236 - 0.74769730311283019838e1 * t859 * t860 * t236 + 0.11432585570925925678e2 * t2586 * t2526 * t272 * t58 - 0.30486894855802468476e2 * t270 * t711 * t272 * t334 - 0.45730342283703702713e2 * t270 * t763 * t250 - 0.22865171141851851357e2 * t270 * t2557 * t272 * t58 + 0.62931141285733900104e3 * t772 * t236 * t775 * t893 + 0.31465570642866950052e3 * t772 * t2541 * t58 - 0.68595513425555554068e2 * t751 * t273 * t900;
1016   t2615 = -0.36e2 * t48 * t721 * t243 * t277 + t19 * t2488 * t67 + 0.6e1 * t48 * t242 * t2513 + 0.24e2 * t48 * t2504 * t2505 - t48 * t99 * t2612 + 0.8e1 * t48 * t726 * t784 - 0.4e1 * t712 * t123 + 0.12e2 * t237 * t244 - 0.6e1 * t237 * t278 - 0.24e2 * t96 * t723 + 0.24e2 * t96 * t727 - 0.4e1 * t96 * t785;
1017   if(v4rho4 != NULL && (p->info->flags & XC_FLAGS_HAVE_LXC))
1018     v4rho4[0] = -0.5e1 / 0.54e2 * t8 * t129 * t69 + 0.2e1 / 0.9e1 * t8 * t155 * t125 - t8 * t199 * t280 / 0.2e1 - t8 * t12 * t787 - 0.3e1 / 0.16e2 * t76 * t77 * t2615;
1019 
1020   t2620 = t23 * t2 * t4;
1021   t2630 = t704 * t10;
1022   t2634 = t91 * t682 * t223;
1023   t2641 = t2448 * t10;
1024   t2643 = t28 * t691 * t130;
1025   t2646 = t2454 * t10;
1026   t2653 = t87 * t215;
1027   t2657 = t704 * t35;
1028   t2658 = t38 * t10;
1029   t2665 = t226 * t682;
1030   t2680 = t690 * t10;
1031   t2685 = t220 * t87;
1032   t2686 = t2685 * t10;
1033   t2695 = 0.25943279877168604506e-2 * t816 * t288 * t42 + 0.18016166581367086463e-3 * t2630 * t135 - 0.19120987654320987654e-1 * t2634 * t300 - 0.15704704526748971194e1 * t133 * t677 * t35 * t38 + 0.66381075479549363457e-3 * t2641 * t2643 - 0.16072380749503493864e-2 * t2646 * t2643 + 0.50542226225514403292e0 * t803 * t82 * t696 * t222 - 0.18953334834567901234e0 * t803 * t804 * t2653 + 0.35098768212162780064e-1 * t2657 * t2658 * t804 - 0.75813339338271604938e-1 * t291 * t808 * t812 + 0.94766674172839506173e-2 * t291 * t292 * t2665 + 0.15296790123456790123e0 * t821 * t824 - 0.56088230452674897120e0 * t298 * t299 * t210 - 0.22307818930041152263e1 * t10 * t677 * t130 - 0.38573713798808385273e-2 * t690 * t288 * t222 + 0.14465142674553144478e-2 * t2680 * t28 * t87 * t215 - 0.97287299539382266899e-3 * t2686 * t28 * t42 * t215 + 0.27798224424032921811e0 * t291 * t210 * t223 * t293;
1034   t2703 = t138 * t236;
1035   t2727 = t95 * t236;
1036   t2731 = t58 * t711;
1037   t2736 = t2531 * t734;
1038   t2743 = t58 * t734;
1039   t2747 = 0.70819478890314631335e-1 * t50 * t101 * t2695 + 0.16615495624729559964e1 * t106 * t57 * t2695 * t118 - 0.37384865155641509919e1 * t859 * t322 * t2703 + 0.11432585570925925678e2 * t2586 * t752 * t506 - 0.22865171141851851357e2 * t270 * t831 * t272 * t334 - 0.22865171141851851357e2 * t270 * t888 * t900 + 0.31465570642866950052e3 * t772 * t307 * t775 * t893 - 0.34297756712777777035e2 * t751 * t273 * t1179 + 0.20977047095244633367e3 * t2540 * t776 * t1968 + 0.15934382750320792050e0 * t855 * t317 * t2727 - 0.76217237139506171188e1 * t270 * t333 * t2731 - 0.24056046973484009303e4 * t2525 * t138 * t2529 * t2736 - 0.22865171141851851357e2 * t270 * t333 * t2727 + 0.31465570642866950052e3 * t772 * t892 * t2743;
1040   t2748 = t50 * t2573;
1041   t2765 = t2552 * t57;
1042   t2766 = t734 * t118;
1043   t2782 = t711 * t118;
1044   t2789 = t771 * t138;
1045   t2790 = t769 * t2789;
1046   t2791 = t1292 * t2727;
1047   t2795 = t750 * t269 * t236;
1048   t2798 = -0.13278652291933993376e0 * t2748 * t317 * t734 - 0.37384865155641509919e1 * t859 * t860 * t307 - 0.10622921833547194700e0 * t316 * t62 * t831 * t95 - 0.10622921833547194700e0 * t316 * t864 * t236 + 0.15934382750320792050e0 * t855 * t864 * t250 + 0.24923243437094339947e1 * t2765 * t2766 * t138 - 0.22865171141851851357e2 * t270 * t888 * t250 - 0.15243447427901234237e2 * t751 * t752 * t138 + 0.49846486874188679892e1 * t321 * t322 * t831 - 0.35409739445157315668e-1 * t316 * t317 * t711 + 0.16615495624729559964e1 * t321 * t2782 * t138 + 0.49846486874188679892e1 * t321 * t871 * t307 + 0.31465570642866950052e3 * t2790 * t2791 - 0.34297756712777777034e2 * t2795 * t335;
1049   t2827 = t148 * t122;
1050   t2851 = -0.18e2 * t1228 * t2827 * t277 + t19 * t2695 * t67 - 0.3e1 * t832 * t123 - 0.6e1 * t139 * t723 + 0.6e1 * t139 * t727 + 0.6e1 * t237 * t313 + 0.6e1 * t308 * t244 - 0.3e1 * t308 * t278 - 0.18e2 * t96 * t845 + 0.12e2 * t96 * t849 + 0.6e1 * t96 * t852;
1051   if(v4rho4 != NULL && (p->info->flags & XC_FLAGS_HAVE_LXC))
1052     v4rho3sigma[0] = t2620 * t152 / 0.18e2 - t792 * t342 / 0.4e1 - 0.3e1 / 0.4e1 * t285 * t908 - 0.3e1 / 0.16e2 * t76 * t77 * (-t48 * t99 * (t2747 + t2798) + 0.2e1 * t48 * t312 * t784 + 0.6e1 * t48 * t848 * t277 + 0.6e1 * t48 * t242 * t904 * t122 - 0.18e2 * t48 * t721 * t338 * t243 - 0.3e1 * t96 * t905 - t712 * t149 - 0.3e1 * t237 * t339 - t139 * t785 + 0.24e2 * t48 * t2504 * t148 * t722 + t2851);
1053 
1054   t2868 = t242 * t1001;
1055   t2875 = t162 * t236;
1056   t2885 = t162 * t2529;
1057   t2895 = t934 * t272;
1058   t2902 = t356 * t775;
1059   t2918 = 0.15934382750320792050e0 * t855 * t365 * t2727 - 0.37384865155641509919e1 * t859 * t322 * t2875 - 0.34297756712777777035e2 * t751 * t273 * t1478 + 0.11432585570925925678e2 * t2586 * t752 * t617 - 0.24056046973484009303e4 * t2525 * t2885 * t2736 - 0.22865171141851851357e2 * t270 * t379 * t2727 - 0.76217237139506171188e1 * t270 * t379 * t2731 - 0.22865171141851851357e2 * t270 * t2895 * t334 - 0.22865171141851851357e2 * t270 * t987 * t900 + 0.31465570642866950052e3 * t772 * t2902 * t893 + 0.20977047095244633367e3 * t2540 * t776 * t2345 + 0.31465570642866950052e3 * t772 * t991 * t2743 - 0.13278652291933993376e0 * t2748 * t365 * t734 - 0.35409739445157315668e-1 * t316 * t365 * t711;
1060   t2928 = t62 * t934;
1061   t2952 = t2680 * t23 * t87 * t215;
1062   t2956 = t2686 * t23 * t42 * t215;
1063   t2958 = t2630 * t159;
1064   t2960 = t2634 * t352;
1065   t2963 = t803 * t919 * t2653;
1066   t2966 = t2657 * t2658 * t919;
1067   t2969 = t291 * t348 * t2665;
1068   t2972 = t23 * t691 * t130;
1069   t2973 = t2641 * t2972;
1070   t2975 = t2646 * t2972;
1071   t2986 = 0.28930285349106288954e-2 * t2952 - 0.19457459907876453380e-2 * t2956 + 0.36032333162734172925e-3 * t2958 - 0.38241975308641975308e-1 * t2960 - 0.37906669669135802469e0 * t2963 + 0.70197536424325560128e-1 * t2966 + 0.18953334834567901234e-1 * t2969 + 0.13276215095909872691e-2 * t2973 - 0.32144761499006987728e-2 * t2975 - 0.48217142248510481592e-2 * t801 + 0.32429099846460755633e-2 * t818 - 0.15934156378600823045e1 * t798 + 0.63177782781893004115e0 * t806 + 0.19120987654320987654e0 * t822 - 0.94766674172839506172e-1 * t814 - 0.50989300411522633745e0 * t825 - 0.11217646090534979424e1 * t829 + 0.25271113112757201647e0 * t810;
1072   t2998 = 0.15934382750320792050e0 * t855 * t964 * t250 + 0.24923243437094339947e1 * t2765 * t2766 * t162 - 0.37384865155641509919e1 * t859 * t860 * t356 - 0.10622921833547194700e0 * t316 * t2928 * t95 - 0.15243447427901234237e2 * t751 * t752 * t162 + 0.16615495624729559964e1 * t321 * t2782 * t162 + 0.49846486874188679892e1 * t321 * t871 * t356 + 0.49846486874188679892e1 * t321 * t322 * t934 - 0.10622921833547194700e0 * t316 * t964 * t236 - 0.22865171141851851357e2 * t270 * t987 * t250 + 0.16615495624729559964e1 * t106 * t57 * t2986 * t118 + 0.70819478890314631335e-1 * t50 * t101 * t2986 + 0.31465570642866950052e3 * t1291 * t2791 - 0.34297756712777777034e2 * t2795 * t380;
1073   t3004 = t721 * t383;
1074   t3023 = t172 * t122;
1075   t3027 = t2504 * t172;
1076   t3041 = -0.18e2 * t1228 * t3023 * t277 + t19 * t2986 * t67 + 0.24e2 * t48 * t3027 * t722 - 0.3e1 * t935 * t123 + 0.6e1 * t163 * t727 - t163 * t785 - t712 * t173 - 0.3e1 * t237 * t384 + 0.6e1 * t357 * t244 - 0.3e1 * t357 * t278 - 0.18e2 * t96 * t948;
1077   if(v4rho4 != NULL && (p->info->flags & XC_FLAGS_NEEDS_LAPLACIAN) && (p->info->flags & XC_FLAGS_HAVE_LXC))
1078     v4rho3lapl[0] = t2620 * t176 / 0.18e2 - t792 * t387 / 0.4e1 - 0.3e1 / 0.4e1 * t285 * t1005 - 0.3e1 / 0.16e2 * t76 * t77 * (0.2e1 * t48 * t361 * t784 + 0.6e1 * t48 * t951 * t277 + 0.6e1 * t48 * t2868 * t122 - t48 * t99 * (t2918 + t2998) - 0.3e1 * t96 * t1002 - 0.18e2 * t48 * t3004 * t243 + 0.12e2 * t96 * t952 + 0.6e1 * t96 * t955 + 0.6e1 * t237 * t362 - 0.6e1 * t163 * t723 + t3041);
1079 
1080   t3068 = t181 * t113;
1081   t3078 = t181 * t2529;
1082   t3085 = t1021 * t272;
1083   t3092 = t396 * t775;
1084   t3105 = 0.15934382750320792050e0 * t855 * t405 * t2727 - 0.37384865155641509919e1 * t859 * t322 * t181 * t236 + 0.11432585570925925678e2 * t2586 * t752 * t1061 + 0.20977047095244633367e3 * t2540 * t776 * t3068 + 0.31465570642866950052e3 * t772 * t1079 * t2743 - 0.76217237139506171188e1 * t270 * t419 * t2731 - 0.24056046973484009303e4 * t2525 * t3078 * t2736 - 0.22865171141851851357e2 * t270 * t419 * t2727 - 0.22865171141851851357e2 * t270 * t3085 * t334 - 0.22865171141851851357e2 * t270 * t1075 * t900 + 0.31465570642866950052e3 * t772 * t3092 * t893 - 0.34297756712777777035e2 * t751 * t273 * t1660 - 0.37384865155641509919e1 * t859 * t860 * t396 - 0.13278652291933993376e0 * t2748 * t405 * t734;
1085   t3112 = t62 * t1021;
1086   t3155 = -0.11572114139642515582e-1 * t2952 + 0.77829839631505813518e-2 * t2956 - 0.14412933265093669170e-2 * t2958 + 0.15296790123456790123e0 * t2960 + 0.15162667867654320987e1 * t2963 - 0.28079014569730224051e0 * t2966 - 0.75813339338271604937e-1 * t2969 - 0.53104860383639490765e-2 * t2973 + 0.12857904599602795091e-1 * t2975 + 0.19286856899404192636e-1 * t801 - 0.12971639938584302253e-1 * t818 + 0.63736625514403292180e1 * t798 - 0.25271113112757201646e1 * t806 - 0.76483950617283950616e0 * t822 + 0.37906669669135802469e0 * t814 + 0.20395720164609053498e1 * t825 + 0.44870584362139917696e1 * t829 - 0.10108445245102880658e1 * t810;
1087   t3167 = 0.16615495624729559964e1 * t321 * t2782 * t181 + 0.49846486874188679892e1 * t321 * t871 * t396 - 0.10622921833547194700e0 * t316 * t3112 * t95 - 0.10622921833547194700e0 * t316 * t1051 * t236 - 0.35409739445157315668e-1 * t316 * t405 * t711 + 0.15934382750320792050e0 * t855 * t1051 * t250 + 0.24923243437094339947e1 * t2765 * t2766 * t181 + 0.49846486874188679892e1 * t321 * t322 * t1021 - 0.22865171141851851357e2 * t270 * t1075 * t250 - 0.15243447427901234237e2 * t751 * t752 * t181 + 0.16615495624729559964e1 * t106 * t57 * t3155 * t118 + 0.70819478890314631335e-1 * t50 * t101 * t3155 + 0.31465570642866950052e3 * t1388 * t2791 - 0.34297756712777777034e2 * t2795 * t420;
1088   t3171 = t242 * t1089;
1089   t3175 = t721 * t423;
1090   t3198 = t191 * t122;
1091   t3202 = t2504 * t191;
1092   t3214 = -0.18e2 * t1228 * t3198 * t277 + t19 * t3155 * t67 + 0.24e2 * t48 * t3202 * t722 - 0.3e1 * t1022 * t123 - 0.18e2 * t96 * t1035 - 0.6e1 * t182 * t723 + 0.6e1 * t182 * t727 - t182 * t785 - 0.3e1 * t237 * t424 + 0.6e1 * t397 * t244 - 0.3e1 * t397 * t278;
1093   if(v4rho4 != NULL && (p->info->flags & XC_FLAGS_HAVE_LXC))
1094     v4rho3tau[0] = t2620 * t195 / 0.18e2 - t792 * t427 / 0.4e1 - 0.3e1 / 0.4e1 * t285 * t1093 - 0.3e1 / 0.16e2 * t76 * t77 * (0.2e1 * t48 * t401 * t784 + 0.6e1 * t48 * t1038 * t277 - t48 * t99 * (t3105 + t3167) + 0.6e1 * t48 * t3171 * t122 - 0.18e2 * t48 * t3175 * t243 + 0.6e1 * t96 * t1042 + 0.12e2 * t96 * t1039 + 0.6e1 * t237 * t402 - 0.3e1 * t96 * t1090 - t712 * t192 + t3214);
1095 
1096   t3230 = t338 * t338;
1097   t3256 = 0.4e1 * t48 * t242 * t1191 * t122 - 0.6e1 * t48 * t1133 * t277 - 0.24e2 * t1228 * t2827 * t338 + 0.4e1 * t48 * t242 * t3230 + 0.4e1 * t48 * t312 * t904 - 0.12e2 * t96 * t1134 + 0.8e1 * t96 * t1137 + 0.4e1 * t96 * t1142 + 0.8e1 * t139 * t849 + 0.4e1 * t139 * t852 - 0.2e1 * t139 * t905 + 0.2e1 * t442 * t244 + 0.8e1 * t308 * t313;
1098   t3277 = t58 * t250;
1099   t3281 = t95 * t307;
1100   t3294 = t138 * t307;
1101   t3298 = t450 * t58;
1102   t3302 = t58 * t831;
1103   t3306 = t1121 * t272;
1104   t3310 = t113 * t236;
1105   t3315 = t2531 * t250;
1106   t3322 = t441 * t775;
1107   t3341 = 0.31465570642866950052e3 * t772 * t1183 * t3277 + 0.21245843667094389400e0 * t855 * t317 * t3281 - 0.11432585570925925678e2 * t751 * t273 * t1819 - 0.11432585570925925678e2 * t751 * t465 * t900 + 0.20977047095244633367e3 * t2540 * t1183 * t893 - 0.49846486874188679892e1 * t859 * t322 * t3294 + 0.11432585570925925678e2 * t2586 * t273 * t3298 - 0.15243447427901234238e2 * t270 * t333 * t3302 - 0.15243447427901234238e2 * t270 * t3306 * t334 + 0.10488523547622316684e3 * t772 * t1183 * t3310 - 0.24056046973484009303e4 * t2525 * t450 * t2529 * t3315 - 0.76217237139506171188e1 * t270 * t1175 * t900 + 0.10488523547622316684e3 * t772 * t3322 * t893 - 0.30486894855802468476e2 * t270 * t333 * t3281 + 0.53114609167735973502e-1 * t855 * t1161 * t250 - 0.13278652291933993376e0 * t2748 * t1145 * t250 - 0.15243447427901234237e2 * t751 * t465 * t250 - 0.35409739445157315668e-1 * t316 * t1161 * t236;
1108   t3376 = t307 * t307;
1109   t3381 = t2448 * t9;
1110   t3383 = t433 * t222 * t130;
1111   t3386 = t2454 * t9;
1112   t3396 = t816 * t35;
1113   t3397 = t38 * t9;
1114   t3411 = 0.1e1 / t11 / t1747 * t223 * t226;
1115   t3420 = t222 * t35 * t38;
1116   t3428 = -0.16595268869887340864e-3 * t3381 * t3383 + 0.40180951873758734660e-3 * t3386 * t3383 + 0.12857904599602795091e-2 * t690 * t9 * t1109 * t87 - 0.12054285562127620398e-3 * t690 * t1098 * t215 - 0.87746920530406950161e-2 * t3396 * t3397 * t1103 - 0.16847408741838134431e0 * t1102 * t1109 * t696 * t87 + 0.15794445695473251029e-1 * t1102 * t1103 * t215 - 0.80025191523731138546e-1 * t430 * t3411 - 0.86477599590562015023e-3 * t1114 * t1109 * t42 * t87 - 0.45040416453417716157e-4 * t1114 * t433 * t3420 + 0.81072749616151889083e-4 * t1114 * t1115 * t215 + 0.16146611796982167353e0 * t438 * t3411;
1117   t3443 = t1292 * t3281;
1118   t3448 = -0.12461621718547169973e1 * t859 * t860 * t441 + 0.16615495624729559964e1 * t321 * t871 * t441 + 0.33230991249459119928e1 * t321 * t322 * t1121 - 0.76217237139506171188e1 * t270 * t465 * t236 + 0.53114609167735973502e-1 * t855 * t1145 * t236 + 0.24923243437094339947e1 * t2765 * t860 * t450 - 0.12461621718547169973e1 * t859 * t871 * t450 - 0.70819478890314631336e-1 * t316 * t317 * t831 + 0.33230991249459119928e1 * t321 * t495 * t831 - 0.70819478890314631336e-1 * t316 * t62 * t1121 * t95 - 0.76217237139506171188e1 * t270 * t1175 * t250 - 0.15243447427901234238e2 * t270 * t3376 * t272 * t58 + 0.70819478890314631335e-1 * t50 * t101 * t3428 + 0.16615495624729559964e1 * t106 * t57 * t3428 * t118 - 0.70819478890314631336e-1 * t50 * t249 * t3376 + 0.33230991249459119928e1 * t254 * t57 * t3376 * t118 + 0.41954094190489266736e3 * t2790 * t3443 - 0.45730342283703702713e2 * t1263 * t889;
1119   t3459 = 0.2e1 * t48 * t1141 * t277 - 0.6e1 * t48 * t721 * t469 * t243 - 0.12e2 * t139 * t845 + 0.24e2 * t48 * t2504 * t446 * t243 - t442 * t278 - 0.2e1 * t1122 * t123 - 0.2e1 * t832 * t149 - 0.4e1 * t308 * t339 - t48 * t99 * (t3341 + t3448) + 0.2e1 * t237 * t447 - 0.2e1 * t96 * t1192 - t237 * t470 + t19 * t3428 * t67;
1120   if(v4rho4 != NULL && (p->info->flags & XC_FLAGS_HAVE_LXC))
1121     v4rho2sigma2[0] = -t792 * t473 / 0.12e2 - t285 * t1195 / 0.2e1 - 0.3e1 / 0.16e2 * t76 * t77 * (t3256 + t3459);
1122 
1123   t3472 = t96 * t721;
1124   t3487 = t477 * t222 * t130;
1125   t3488 = t3381 * t3487;
1126   t3490 = t3386 * t3487;
1127   t3494 = t690 * t1200 * t215;
1128   t3497 = t3396 * t3397 * t1204;
1129   t3501 = t1102 * t1204 * t215;
1130   t3506 = t1114 * t477 * t3420;
1131   t3509 = t1114 * t1209 * t215;
1132   t3512 = -0.33190537739774681728e-3 * t3488 + 0.80361903747517469321e-3 * t3490 + 0.20894094974354542023e-2 * t1100 - 0.24108571124255240796e-3 * t3494 - 0.17549384106081390032e-1 * t3497 - 0.27377039205486968450e0 * t1105 + 0.31588891390946502057e-1 * t3501 - 0.10950815682194787380e0 * t1112 - 0.14052609933466327441e-2 * t1117 - 0.90080832906835432317e-4 * t3506 + 0.16214549923230377817e-3 * t3509 + 0.22095363511659807956e0 * t1119;
1133   t3517 = t48 * t2504;
1134   t3538 = t356 * t138;
1135   t3545 = t1214 * t272;
1136   t3552 = t484 * t775;
1137   t3559 = 0.10622921833547194700e0 * t855 * t964 * t1244 + 0.10622921833547194700e0 * t855 * t365 * t3281 + 0.53114609167735973502e-1 * t855 * t365 * t2703 + 0.24923243437094339947e1 * t2765 * t860 * t1248 - 0.12461621718547169973e1 * t859 * t871 * t1248 - 0.24923243437094339946e1 * t859 * t322 * t3538 - 0.15243447427901234238e2 * t270 * t987 * t1179 - 0.15243447427901234238e2 * t270 * t3545 * t334 - 0.76217237139506171188e1 * t270 * t1283 * t900 + 0.10488523547622316684e3 * t772 * t3552 * t893 - 0.76217237139506171188e1 * t270 * t2895 * t506;
1138   t3563 = t162 * t307;
1139   t3585 = t831 * t118;
1140   t3595 = -0.11432585570925925678e2 * t751 * t273 * t1964 - 0.24923243437094339946e1 * t859 * t322 * t3563 - 0.76217237139506171188e1 * t270 * t379 * t3302 - 0.76217237139506171188e1 * t270 * t379 * t2703 - 0.15243447427901234238e2 * t270 * t379 * t3281 - 0.15243447427901234238e2 * t270 * t987 * t1244 - 0.70819478890314631336e-1 * t316 * t964 * t307 - 0.35409739445157315668e-1 * t316 * t365 * t831 + 0.16615495624729559964e1 * t321 * t3585 * t162 + 0.33230991249459119928e1 * t321 * t322 * t1214 + 0.33230991249459119928e1 * t321 * t1258 * t356;
1141   t3603 = t62 * t1214;
1142   t3624 = t1292 * t2703;
1143   t3628 = t2523 * t2524 * t162;
1144   t3629 = t2529 * t2531;
1145   t3630 = t138 * t250;
1146   t3631 = t3629 * t3630;
1147   t3634 = 0.16615495624729559964e1 * t321 * t495 * t934 - 0.35409739445157315668e-1 * t316 * t2928 * t138 - 0.70819478890314631336e-1 * t316 * t3603 * t95 - 0.35409739445157315668e-1 * t316 * t1269 * t236 - 0.12461621718547169973e1 * t859 * t860 * t484 + 0.16615495624729559964e1 * t321 * t871 * t484 + 0.53114609167735973502e-1 * t855 * t1269 * t250 - 0.76217237139506171188e1 * t270 * t1283 * t250 + 0.20977047095244633368e3 * t1291 * t3443 + 0.10488523547622316684e3 * t1291 * t3624 - 0.24056046973484009303e4 * t3628 * t3631;
1148   t3635 = t2539 * t2789;
1149   t3643 = t750 * t269 * t307;
1150   t3647 = t2585 * t269 * t250;
1151   t3650 = t775 * t58;
1152   t3651 = t3650 * t3630;
1153   t3668 = t162 * t250;
1154   t3672 = 0.20977047095244633367e3 * t3635 * t992 - 0.11432585570925925678e2 * t1263 * t998 - 0.22865171141851851356e2 * t1263 * t988 - 0.22865171141851851356e2 * t3643 * t380 + 0.11432585570925925678e2 * t3647 * t507 + 0.31465570642866950052e3 * t1291 * t3651 + 0.20977047095244633368e3 * t769 * t771 * t356 * t1293 + 0.70819478890314631335e-1 * t50 * t101 * t3512 + 0.16615495624729559964e1 * t106 * t57 * t3512 * t118 - 0.13278652291933993376e0 * t2748 * t365 * t3630 - 0.15243447427901234237e2 * t751 * t333 * t3668;
1155   t3686 = -0.12e2 * t1228 * t383 * t148 * t122 - 0.12e2 * t3472 * t1230 - 0.2e1 * t1215 * t123 - 0.12e2 * t1228 * t172 * t338 * t122 - 0.6e1 * t1228 * t1229 * t277 + 0.2e1 * t485 * t244 + t19 * t3512 * t67 - 0.2e1 * t357 * t339 + 0.24e2 * t3517 * t1229 * t243 - 0.2e1 * t308 * t384 - t48 * t99 * (t3559 + t3595 + t3634 + t3672) - t139 * t1002 - t935 * t149 - t163 * t905 - t485 * t278 - t832 * t173 - 0.6e1 * t139 * t948 - 0.6e1 * t163 * t845;
1156   t3697 = t721 * t510;
1157   t3720 = t242 * t1302;
1158   t3730 = 0.4e1 * t48 * t3720 * t122 + 0.2e1 * t48 * t1240 * t277 + 0.2e1 * t48 * t2868 * t148 - 0.6e1 * t48 * t3697 * t243 + 0.4e1 * t48 * t951 * t338 + 0.2e1 * t48 * t361 * t904 + 0.4e1 * t96 * t1233 + 0.4e1 * t96 * t1236 + 0.4e1 * t96 * t1241 - 0.2e1 * t96 * t1303 + 0.4e1 * t139 * t952 + 0.2e1 * t139 * t955 + 0.4e1 * t163 * t849 + 0.2e1 * t163 * t852 + 0.2e1 * t237 * t489 - t237 * t511 + 0.4e1 * t308 * t362 + 0.4e1 * t357 * t313;
1159   if(v4rho4 != NULL && (p->info->flags & XC_FLAGS_NEEDS_LAPLACIAN) && (p->info->flags & XC_FLAGS_HAVE_LXC))
1160     v4rho2sigmalapl[0] = -t792 * t514 / 0.12e2 - t285 * t1306 / 0.2e1 - 0.3e1 / 0.16e2 * t76 * t77 * (t3686 + t3730);
1161 
1162   t3774 = 0.13276215095909872691e-2 * t3488 - 0.32144761499006987728e-2 * t3490 - 0.83576379897418168090e-2 * t1100 + 0.96434284497020963181e-3 * t3494 + 0.70197536424325560128e-1 * t3497 + 0.10950815682194787380e1 * t1105 - 0.12635556556378600823e0 * t3501 + 0.43803262728779149518e0 * t1112 + 0.56210439733865309763e-2 * t1117 + 0.36032333162734172925e-3 * t3506 - 0.64858199692921511265e-3 * t3509 - 0.88381454046639231824e0 * t1119;
1163   t3787 = t721 * t543;
1164   t3791 = -0.2e1 * t96 * t1398 + 0.2e1 * t520 * t244 - t237 * t544 - t182 * t905 - 0.12e2 * t3472 * t1331 - 0.12e2 * t1228 * t191 * t338 * t122 - 0.12e2 * t1228 * t423 * t148 * t122 - 0.6e1 * t1228 * t1330 * t277 - 0.2e1 * t308 * t424 - t832 * t192 - t139 * t1090 + t19 * t3774 * t67 - 0.6e1 * t139 * t1035 - 0.6e1 * t182 * t845 + 0.4e1 * t397 * t313 + 0.4e1 * t182 * t849 + 0.2e1 * t182 * t852 - 0.6e1 * t48 * t3787 * t243;
1165   t3815 = t242 * t1397;
1166   t3828 = t396 * t138;
1167   t3832 = t181 * t307;
1168   t3842 = t1316 * t272;
1169   t3849 = t519 * t775;
1170   t3859 = 0.24923243437094339947e1 * t2765 * t860 * t1348 - 0.12461621718547169973e1 * t859 * t871 * t1348 - 0.24923243437094339946e1 * t859 * t322 * t3828 - 0.24923243437094339946e1 * t859 * t322 * t3832 + 0.10622921833547194700e0 * t855 * t1051 * t1244 - 0.76217237139506171188e1 * t270 * t419 * t2703 - 0.15243447427901234238e2 * t270 * t3842 * t334 - 0.76217237139506171188e1 * t270 * t1380 * t900 + 0.10488523547622316684e3 * t772 * t3849 * t893 - 0.11432585570925925678e2 * t751 * t273 * t2124 + 0.10622921833547194700e0 * t855 * t405 * t3281;
1171   t3867 = t769 * t771 * t396;
1172   t3875 = t2523 * t2524 * t181;
1173   t3888 = 0.53114609167735973502e-1 * t855 * t405 * t2703 - 0.76217237139506171188e1 * t270 * t3085 * t506 + 0.20977047095244633368e3 * t3867 * t1293 + 0.20977047095244633368e3 * t1388 * t3443 + 0.10488523547622316684e3 * t1388 * t3624 - 0.24056046973484009303e4 * t3875 * t3631 + 0.20977047095244633367e3 * t3635 * t1080 - 0.22865171141851851356e2 * t3643 * t420 - 0.22865171141851851356e2 * t1263 * t1076 - 0.11432585570925925678e2 * t1263 * t1086 + 0.11432585570925925678e2 * t3647 * t540;
1174   t3916 = t62 * t1316;
1175   t3923 = 0.31465570642866950052e3 * t1388 * t3651 - 0.35409739445157315668e-1 * t316 * t405 * t831 + 0.16615495624729559964e1 * t321 * t3585 * t181 + 0.16615495624729559964e1 * t321 * t871 * t519 + 0.33230991249459119928e1 * t321 * t322 * t1316 + 0.33230991249459119928e1 * t321 * t1258 * t396 + 0.16615495624729559964e1 * t321 * t495 * t1021 - 0.35409739445157315668e-1 * t316 * t3112 * t138 - 0.70819478890314631336e-1 * t316 * t1051 * t307 - 0.70819478890314631336e-1 * t316 * t3916 * t95 - 0.35409739445157315668e-1 * t316 * t1366 * t236;
1176   t3927 = t181 * t250;
1177   t3959 = -0.12461621718547169973e1 * t859 * t860 * t519 - 0.15243447427901234237e2 * t751 * t333 * t3927 - 0.13278652291933993376e0 * t2748 * t405 * t3630 + 0.70819478890314631335e-1 * t50 * t101 * t3774 + 0.16615495624729559964e1 * t106 * t57 * t3774 * t118 - 0.15243447427901234238e2 * t270 * t419 * t3281 - 0.76217237139506171188e1 * t270 * t419 * t3302 - 0.15243447427901234238e2 * t270 * t1075 * t1244 - 0.15243447427901234238e2 * t270 * t1075 * t1179 - 0.76217237139506171188e1 * t270 * t1380 * t250 + 0.53114609167735973502e-1 * t855 * t1366 * t250;
1178   t3973 = 0.2e1 * t139 * t1042 + 0.4e1 * t308 * t402 + 0.2e1 * t237 * t524 + 0.4e1 * t96 * t1334 + 0.4e1 * t139 * t1039 + 0.2e1 * t48 * t3171 * t148 + 0.4e1 * t96 * t1337 + 0.4e1 * t48 * t1038 * t338 + 0.4e1 * t96 * t1342 + 0.2e1 * t48 * t401 * t904 + 0.4e1 * t48 * t3815 * t122 + 0.2e1 * t48 * t1341 * t277 - t48 * t99 * (t3859 + t3888 + t3923 + t3959) - 0.2e1 * t1317 * t123 - t520 * t278 - 0.2e1 * t397 * t339 - t1022 * t149 + 0.24e2 * t3517 * t1330 * t243;
1179   if(v4rho4 != NULL && (p->info->flags & XC_FLAGS_HAVE_LXC))
1180     v4rho2sigmatau[0] = -t792 * t547 / 0.12e2 - t285 * t1401 / 0.2e1 - 0.3e1 / 0.16e2 * t76 * t77 * (t3791 + t3973);
1181 
1182   t3986 = t95 * t356;
1183   t3990 = t58 * t934;
1184   t4000 = t567 * t2529;
1185   t4004 = t1420 * t272;
1186   t4011 = t558 * t775;
1187   t4039 = t62 * t1420;
1188   t4046 = -0.30486894855802468476e2 * t270 * t379 * t3986 - 0.15243447427901234238e2 * t270 * t379 * t3990 + 0.31465570642866950052e3 * t772 * t1482 * t3277 + 0.10488523547622316684e3 * t772 * t1482 * t3310 - 0.24056046973484009303e4 * t2525 * t4000 * t3315 - 0.15243447427901234238e2 * t270 * t4004 * t334 - 0.76217237139506171188e1 * t270 * t1474 * t900 + 0.10488523547622316684e3 * t772 * t4011 * t893 + 0.33230991249459119928e1 * t321 * t322 * t1420 - 0.70819478890314631336e-1 * t316 * t365 * t934 + 0.33230991249459119928e1 * t321 * t606 * t934 + 0.53114609167735973502e-1 * t855 * t1444 * t236 + 0.24923243437094339947e1 * t2765 * t860 * t567 - 0.35409739445157315668e-1 * t316 * t1460 * t236 - 0.12461621718547169973e1 * t859 * t860 * t558 + 0.16615495624729559964e1 * t321 * t871 * t558 - 0.70819478890314631336e-1 * t316 * t4039 * t95 - 0.76217237139506171188e1 * t270 * t1474 * t250;
1189   t4047 = t356 * t356;
1190   t4059 = t551 * t222 * t130;
1191   t4060 = t3381 * t4059;
1192   t4062 = t3386 * t4059;
1193   t4066 = t690 * t1406 * t215;
1194   t4069 = t3396 * t3397 * t1410;
1195   t4073 = t1102 * t1410 * t215;
1196   t4078 = t1114 * t551 * t3420;
1197   t4081 = t1114 * t1415 * t215;
1198   t4084 = -0.66381075479549363456e-3 * t4060 + 0.16072380749503493864e-2 * t4062 + 0.32144761499006987728e-2 * t1202 - 0.48217142248510481591e-3 * t4066 - 0.35098768212162780063e-1 * t4069 - 0.42118521854595336076e0 * t1206 + 0.63177782781893004114e-1 * t4073 - 0.13688519602743484225e0 * t436 - 0.21619399897640503756e-2 * t1211 - 0.18016166581367086463e-3 * t4078 + 0.32429099846460755633e-3 * t4081 + 0.27619204389574759945e0 * t439;
1199   t4099 = t162 * t356;
1200   t4103 = t567 * t58;
1201   t4128 = t1292 * t3986;
1202   t4133 = -0.15243447427901234238e2 * t270 * t4047 * t272 * t58 - 0.76217237139506171188e1 * t270 * t582 * t236 - 0.70819478890314631336e-1 * t50 * t249 * t4047 + 0.16615495624729559964e1 * t106 * t57 * t4084 * t118 + 0.70819478890314631335e-1 * t50 * t101 * t4084 + 0.33230991249459119928e1 * t254 * t57 * t4047 * t118 + 0.21245843667094389400e0 * t855 * t365 * t3986 - 0.49846486874188679892e1 * t859 * t322 * t4099 + 0.11432585570925925678e2 * t2586 * t273 * t4103 - 0.11432585570925925678e2 * t751 * t273 * t2274 - 0.11432585570925925678e2 * t751 * t582 * t900 + 0.20977047095244633367e3 * t2540 * t1482 * t893 - 0.12461621718547169973e1 * t859 * t871 * t567 - 0.15243447427901234237e2 * t751 * t582 * t250 + 0.53114609167735973502e-1 * t855 * t1460 * t250 - 0.13278652291933993376e0 * t2748 * t1444 * t250 + 0.41954094190489266736e3 * t1291 * t4128 - 0.45730342283703702713e2 * t1551 * t988;
1203   t4148 = t242 * t1489;
1204   t4152 = t2504 * t563;
1205   t4161 = -t237 * t587 - 0.24e2 * t1228 * t3023 * t383 - t48 * t99 * (t4046 + t4133) + 0.2e1 * t559 * t244 + 0.2e1 * t237 * t564 - 0.2e1 * t96 * t1490 + 0.4e1 * t96 * t1441 + 0.2e1 * t48 * t1440 * t277 + 0.4e1 * t48 * t4148 * t122 + 0.24e2 * t48 * t4152 * t243 - 0.12e2 * t163 * t948 - 0.2e1 * t1421 * t123 - t559 * t278;
1206   t4162 = t721 * t586;
1207   t4190 = t383 * t383;
1208   t4194 = 0.4e1 * t48 * t361 * t1001 - 0.6e1 * t48 * t1432 * t277 + t19 * t4084 * t67 + 0.4e1 * t48 * t242 * t4190 - 0.6e1 * t48 * t4162 * t243 - 0.2e1 * t163 * t1002 - 0.12e2 * t96 * t1433 + 0.8e1 * t96 * t1436 + 0.8e1 * t163 * t952 + 0.4e1 * t163 * t955 - 0.2e1 * t935 * t173 + 0.8e1 * t357 * t362 - 0.4e1 * t357 * t384;
1209   if(v4rho4 != NULL && (p->info->flags & XC_FLAGS_NEEDS_LAPLACIAN) && (p->info->flags & XC_FLAGS_HAVE_LXC))
1210     v4rho2lapl2[0] = -t792 * t590 / 0.12e2 - t285 * t1493 / 0.2e1 - 0.3e1 / 0.16e2 * t76 * t77 * (t4161 + t4194);
1211 
1212   t4219 = t242 * t1587;
1213   t4226 = t721 * t621;
1214   t4248 = -0.2e1 * t96 * t1588 + 0.24e2 * t3517 * t1517 * t243 + 0.2e1 * t48 * t3171 * t172 + 0.2e1 * t48 * t401 * t1001 + 0.4e1 * t48 * t1038 * t383 + 0.4e1 * t96 * t1529 + 0.4e1 * t48 * t4219 * t122 + 0.2e1 * t48 * t1528 * t277 - 0.6e1 * t48 * t4226 * t243 + 0.2e1 * t182 * t955 + 0.4e1 * t357 * t402 + 0.4e1 * t182 * t952 + 0.2e1 * t237 * t600 + 0.2e1 * t163 * t1042 + 0.4e1 * t163 * t1039 + 0.4e1 * t96 * t1521 + 0.4e1 * t96 * t1524 + 0.4e1 * t397 * t362;
1215   t4264 = t423 * t172;
1216   t4268 = t191 * t383;
1217   t4291 = t62 * t1503;
1218   t4313 = -0.76217237139506171188e1 * t270 * t419 * t2875 - 0.15243447427901234238e2 * t270 * t419 * t3986 - 0.76217237139506171188e1 * t270 * t419 * t3990 + 0.16615495624729559964e1 * t321 * t606 * t1021 - 0.70819478890314631336e-1 * t316 * t4291 * t95 - 0.35409739445157315668e-1 * t316 * t1557 * t236 - 0.12461621718547169973e1 * t859 * t860 * t595 + 0.16615495624729559964e1 * t321 * t871 * t595 + 0.53114609167735973502e-1 * t855 * t1557 * t250 + 0.33230991249459119928e1 * t321 * t322 * t1503 - 0.76217237139506171188e1 * t270 * t1571 * t250;
1219   t4324 = t2539 * t1290;
1220   t4328 = t750 * t269 * t356;
1221   t4352 = 0.26552430191819745383e-2 * t4060 - 0.64289522998013975456e-2 * t4062 - 0.12857904599602795091e-1 * t1202 + 0.19286856899404192637e-2 * t4066 + 0.14039507284865112026e0 * t4069 + 0.16847408741838134431e1 * t1206 - 0.25271113112757201646e0 * t4073 + 0.54754078410973936900e0 * t436 + 0.86477599590562015020e-2 * t1211 + 0.72064666325468345850e-3 * t4078 - 0.12971639938584302253e-2 * t4081 - 0.11047681755829903978e1 * t439;
1222   t4357 = 0.20977047095244633368e3 * t1388 * t4128 + 0.10488523547622316684e3 * t1388 * t1292 * t2875 - 0.24056046973484009303e4 * t3875 * t3629 * t3668 - 0.11432585570925925678e2 * t1551 * t1086 + 0.20977047095244633367e3 * t4324 * t1080 - 0.22865171141851851356e2 * t4328 * t420 - 0.22865171141851851356e2 * t1551 * t1076 + 0.11432585570925925678e2 * t3647 * t618 + 0.31465570642866950052e3 * t1388 * t3650 * t3668 + 0.20977047095244633368e3 * t3867 * t1578 + 0.16615495624729559964e1 * t106 * t57 * t4352 * t118;
1223   t4380 = t396 * t162;
1224   t4384 = t181 * t356;
1225   t4395 = 0.70819478890314631335e-1 * t50 * t101 * t4352 - 0.15243447427901234237e2 * t751 * t379 * t3927 + 0.10622921833547194700e0 * t855 * t1051 * t1532 + 0.10622921833547194700e0 * t855 * t405 * t3986 + 0.53114609167735973502e-1 * t855 * t405 * t2875 + 0.24923243437094339947e1 * t2765 * t860 * t1536 - 0.12461621718547169973e1 * t859 * t871 * t1536 - 0.24923243437094339946e1 * t859 * t322 * t4380 - 0.24923243437094339946e1 * t859 * t322 * t4384 + 0.16615495624729559964e1 * t321 * t934 * t118 * t181 + 0.33230991249459119928e1 * t321 * t1546 * t396;
1226   t4414 = t1503 * t272;
1227   t4421 = t595 * t775;
1228   t4431 = -0.35409739445157315668e-1 * t316 * t3112 * t162 - 0.70819478890314631336e-1 * t316 * t1051 * t356 - 0.35409739445157315668e-1 * t316 * t405 * t934 - 0.13278652291933993376e0 * t2748 * t405 * t3668 - 0.15243447427901234238e2 * t270 * t1075 * t1532 - 0.15243447427901234238e2 * t270 * t1075 * t1478 - 0.15243447427901234238e2 * t270 * t4414 * t334 - 0.76217237139506171188e1 * t270 * t1571 * t900 + 0.10488523547622316684e3 * t772 * t4421 * t893 - 0.76217237139506171188e1 * t270 * t3085 * t617 - 0.11432585570925925678e2 * t751 * t273 * t2341;
1229   t4439 = -0.6e1 * t163 * t1035 - 0.6e1 * t182 * t948 + 0.2e1 * t596 * t244 - t596 * t278 - 0.2e1 * t397 * t384 - t1022 * t173 - 0.12e2 * t3472 * t1518 - 0.6e1 * t1228 * t1517 * t277 - 0.12e2 * t1228 * t4264 * t122 - 0.12e2 * t1228 * t4268 * t122 - t182 * t1002 - t935 * t192 - 0.2e1 * t357 * t424 - t163 * t1090 - 0.2e1 * t1504 * t123 - t48 * t99 * (t4313 + t4357 + t4395 + t4431) + t19 * t4352 * t67 - t237 * t622;
1230   if(v4rho4 != NULL && (p->info->flags & XC_FLAGS_NEEDS_LAPLACIAN) && (p->info->flags & XC_FLAGS_HAVE_LXC))
1231     v4rho2lapltau[0] = -t792 * t625 / 0.12e2 - t285 * t1591 / 0.2e1 - 0.3e1 / 0.16e2 * t76 * t77 * (t4248 + t4439);
1232 
1233   t4450 = t242 * t1671;
1234   t4479 = 0.4e1 * t48 * t401 * t1089 + 0.4e1 * t48 * t4450 * t122 - 0.6e1 * t48 * t1613 * t277 + 0.2e1 * t48 * t1621 * t277 - 0.12e2 * t182 * t1035 + 0.8e1 * t182 * t1039 + 0.4e1 * t182 * t1042 - 0.12e2 * t96 * t1614 + 0.8e1 * t96 * t1617 + 0.4e1 * t96 * t1622 + 0.2e1 * t237 * t636 + 0.2e1 * t631 * t244 + 0.8e1 * t397 * t402;
1235   t4480 = t721 * t658;
1236   t4484 = t2504 * t635;
1237   t4500 = t423 * t423;
1238   t4513 = t639 * t58;
1239   t4517 = t95 * t396;
1240   t4524 = t639 * t2529;
1241   t4531 = t62 * t1601;
1242   t4553 = t396 * t396;
1243   t4570 = -0.10620972076727898153e-1 * t4060 + 0.25715809199205590184e-1 * t4062 + 0.51431618398411180366e-1 * t1202 - 0.77147427597616770549e-2 * t4066 - 0.56158029139460448106e0 * t4069 - 0.67389634967352537725e1 * t1206 + 0.10108445245102880659e1 * t4073 - 0.21901631364389574760e1 * t436 - 0.34591039836224806008e-1 * t1211 - 0.28825866530187338341e-2 * t4078 + 0.51886559754337209013e-2 * t4081 + 0.44190727023319615912e1 * t439;
1244   t4578 = -0.15243447427901234237e2 * t751 * t654 * t250 + 0.53114609167735973502e-1 * t855 * t1642 * t250 - 0.13278652291933993376e0 * t2748 * t1625 * t250 + 0.11432585570925925678e2 * t2586 * t273 * t4513 + 0.21245843667094389400e0 * t855 * t405 * t4517 + 0.10488523547622316684e3 * t772 * t1664 * t3310 - 0.24056046973484009303e4 * t2525 * t4524 * t3315 - 0.76217237139506171188e1 * t270 * t654 * t236 - 0.70819478890314631336e-1 * t316 * t4531 * t95 - 0.35409739445157315668e-1 * t316 * t1642 * t236 - 0.12461621718547169973e1 * t859 * t860 * t630 + 0.16615495624729559964e1 * t321 * t871 * t630 + 0.24923243437094339947e1 * t2765 * t860 * t639 - 0.12461621718547169973e1 * t859 * t871 * t639 - 0.76217237139506171188e1 * t270 * t1656 * t250 - 0.15243447427901234238e2 * t270 * t4553 * t272 * t58 + 0.70819478890314631335e-1 * t50 * t101 * t4570 + 0.16615495624729559964e1 * t106 * t57 * t4570 * t118;
1245   t4590 = t750 * t269 * t181;
1246   t4600 = t1601 * t272;
1247   t4604 = t630 * t58;
1248   t4614 = t181 * t396;
1249   t4621 = t630 * t775;
1250   t4640 = 0.33230991249459119928e1 * t254 * t57 * t4553 * t118 - 0.70819478890314631336e-1 * t50 * t249 * t4553 + 0.41954094190489266736e3 * t1388 * t1292 * t4517 - 0.45730342283703702713e2 * t4590 * t1076 - 0.30486894855802468476e2 * t270 * t419 * t4517 - 0.15243447427901234238e2 * t270 * t419 * t58 * t1021 - 0.15243447427901234238e2 * t270 * t4600 * t334 - 0.11432585570925925678e2 * t751 * t273 * t4604 - 0.11432585570925925678e2 * t751 * t654 * t900 + 0.20977047095244633367e3 * t2540 * t1664 * t893 - 0.49846486874188679892e1 * t859 * t322 * t4614 - 0.76217237139506171188e1 * t270 * t1656 * t900 + 0.10488523547622316684e3 * t772 * t4621 * t893 + 0.33230991249459119928e1 * t321 * t322 * t1601 - 0.70819478890314631336e-1 * t316 * t405 * t1021 + 0.33230991249459119928e1 * t321 * t1635 * t1021 + 0.53114609167735973502e-1 * t855 * t1625 * t236 + 0.31465570642866950052e3 * t772 * t1664 * t3277;
1251   t4649 = -0.6e1 * t48 * t4480 * t243 + 0.24e2 * t48 * t4484 * t243 - 0.4e1 * t397 * t424 - 0.2e1 * t1602 * t123 - t631 * t278 - 0.24e2 * t1228 * t3198 * t423 - 0.2e1 * t1022 * t192 - 0.2e1 * t182 * t1090 + 0.4e1 * t48 * t242 * t4500 - t48 * t99 * (t4578 + t4640) + t19 * t4570 * t67 - 0.2e1 * t96 * t1672 - t237 * t659;
1252   if(v4rho4 != NULL && (p->info->flags & XC_FLAGS_HAVE_LXC))
1253     v4rho2tau2[0] = -t792 * t662 / 0.12e2 - t285 * t1675 / 0.2e1 - 0.3e1 / 0.16e2 * t76 * t77 * (t4479 + t4649);
1254 
1255   t4662 = t1678 * rho[0];
1256   t4663 = 0.1e1 / t4662;
1257   t4666 = t2685 * t35;
1258   t4679 = 0.41488172174718352161e-4 * t2448 * t1679 * t89 - 0.10045237968439683665e-3 * t2454 * t1679 * t89 - 0.24108571124255240796e-3 * t690 * t4663 + 0.21936730132601737540e-2 * t4666 * t38 * t1679 * t696 + 0.31588891390946502058e-1 * t694 * t4663 * t696 + 0.16214549923230377817e-3 * t220 * t4663 * t42 + 0.11260104113354429039e-4 * t1685 * t89;
1259   t4773 = -0.34297756712777777034e2 * t1263 * t1176 + 0.31465570642866950052e3 * t769 * t771 * t441 * t1293 + 0.70819478890314631335e-1 * t50 * t101 * t4679 + 0.16615495624729559964e1 * t106 * t57 * t4679 * t118 - 0.13278652291933993376e0 * t2748 * t62 * t1704 * t95 + 0.15934382750320792051e0 * t855 * t1145 * t307 + 0.24923243437094339947e1 * t2765 * t322 * t1704 - 0.37384865155641509919e1 * t859 * t1782 * t307 - 0.15243447427901234237e2 * t751 * t1718 * t95 - 0.35409739445157315668e-1 * t316 * t62 * t1688 * t95 + 0.16615495624729559964e1 * t321 * t322 * t1688 - 0.10622921833547194700e0 * t316 * t864 * t441 - 0.10622921833547194700e0 * t316 * t317 * t1121 + 0.49846486874188679892e1 * t321 * t1258 * t441;
1260   t4783 = t441 * t95;
1261   t4790 = t113 * t307;
1262   t4798 = t2531 * t95;
1263   t4805 = t1688 * t272;
1264   t4818 = t138 * t441;
1265   t4822 = 0.49846486874188679892e1 * t321 * t495 * t1121 - 0.22865171141851851356e2 * t270 * t465 * t307 + 0.11432585570925925678e2 * t2586 * t1718 * t334 + 0.15934382750320792050e0 * t855 * t317 * t4783 - 0.34297756712777777034e2 * t751 * t465 * t1179 + 0.31465570642866950052e3 * t772 * t1183 * t4790 + 0.31465570642866950052e3 * t772 * t1732 * t334 - 0.24056046973484009303e4 * t2525 * t1704 * t2529 * t4798 + 0.20977047095244633367e3 * t2540 * t1732 * t1184 - 0.76217237139506171188e1 * t270 * t4805 * t334 - 0.22865171141851851357e2 * t270 * t3306 * t506 - 0.22865171141851851357e2 * t270 * t1175 * t1244 - 0.22865171141851851357e2 * t270 * t1175 * t1179 - 0.37384865155641509919e1 * t859 * t322 * t4818;
1266   t4826 = -0.3e1 * t139 * t1192 - 0.6e1 * t96 * t1698 + 0.24e2 * t48 * t2504 * t1697 * t122 - 0.18e2 * t48 * t1133 * t338 + 0.6e1 * t96 * t1701 - 0.18e2 * t1228 * t148 * t469 * t122 + 0.6e1 * t48 * t848 * t469 + 0.6e1 * t48 * t312 * t1191 - t96 * t1741 + 0.2e1 * t48 * t242 * t1740 * t122 - t48 * t99 * (t4773 + t4822);
1267   if(v4rho4 != NULL && (p->info->flags & XC_FLAGS_HAVE_LXC))
1268     v4rhosigma3[0] = -t285 * t1744 / 0.4e1 - 0.3e1 / 0.16e2 * t76 * t77 * (t19 * t4679 * t67 - 0.3e1 * t1122 * t149 - 0.18e2 * t139 * t1134 + 0.12e2 * t139 * t1137 + 0.6e1 * t139 * t1142 - t1689 * t123 + 0.6e1 * t308 * t447 - 0.3e1 * t308 * t470 + 0.6e1 * t442 * t313 - 0.3e1 * t442 * t339 + t4826);
1269 
1270   t4862 = t242 * t1823;
1271   t4876 = 0.2e1 * t48 * t361 * t1191 + 0.2e1 * t48 * t4862 * t122 + 0.4e1 * t48 * t1240 * t338 + 0.4e1 * t48 * t3720 * t148 - 0.6e1 * t48 * t3004 * t446 + 0.2e1 * t48 * t951 * t469 - 0.6e1 * t163 * t1134 + 0.4e1 * t163 * t1137 + 0.2e1 * t163 * t1142 + 0.4e1 * t139 * t1233 + 0.4e1 * t139 * t1236 + 0.4e1 * t139 * t1241 - 0.6e1 * t96 * t1770 + 0.4e1 * t96 * t1773 + 0.2e1 * t96 * t1776 + 0.4e1 * t308 * t489 + 0.4e1 * t485 * t313 + 0.2e1 * t442 * t362;
1272   t4890 = t139 * t721;
1273   t4910 = t2448 * t1748 * t89;
1274   t4913 = t2454 * t1748 * t89;
1275   t4918 = t4666 * t38 * t1748 * t696;
1276   t4922 = t1754 * t89;
1277   t4924 = 0.82976344349436704320e-4 * t4910 - 0.20090475936879367330e-3 * t4913 - 0.42189999467446671392e-3 * t1680 + 0.43873460265203475079e-2 * t4918 + 0.55280559934156378600e-1 * t1683 + 0.28375462365653161179e-3 * t1686 + 0.22520208226708858078e-4 * t4922;
1278   t4930 = t750 * t269 * t441;
1279   t4936 = t2585 * t269 * t450;
1280   t4939 = t1292 * t4783;
1281   t4942 = t450 * t95;
1282   t4943 = t3650 * t4942;
1283   t4953 = t1292 * t3294;
1284   t4956 = t3629 * t4942;
1285   t4960 = t2539 * t771 * t450;
1286   t4965 = -0.11432585570925925678e2 * t4930 * t380 - 0.22865171141851851356e2 * t1263 * t1299 + 0.11432585570925925678e2 * t4936 * t380 + 0.10488523547622316684e3 * t1291 * t4939 + 0.31465570642866950052e3 * t1291 * t4943 + 0.70819478890314631335e-1 * t50 * t101 * t4924 + 0.16615495624729559964e1 * t106 * t57 * t4924 * t118 + 0.20977047095244633368e3 * t1291 * t4953 - 0.24056046973484009303e4 * t3628 * t4956 + 0.20977047095244633367e3 * t4960 * t1578 - 0.22865171141851851357e2 * t1263 * t1284;
1287   t4979 = t162 * t450;
1288   t4989 = t484 * t138;
1289   t5002 = 0.20977047095244633368e3 * t769 * t771 * t484 * t1293 + 0.53114609167735973502e-1 * t855 * t365 * t4783 - 0.13278652291933993376e0 * t2748 * t365 * t4942 + 0.10622921833547194700e0 * t855 * t365 * t3294 + 0.24923243437094339947e1 * t2765 * t322 * t4979 - 0.24923243437094339946e1 * t859 * t495 * t3563 + 0.10622921833547194700e0 * t855 * t1269 * t1244 - 0.24923243437094339946e1 * t859 * t322 * t4989 - 0.15243447427901234238e2 * t270 * t3545 * t506 - 0.15243447427901234238e2 * t270 * t1283 * t1244 - 0.15243447427901234238e2 * t270 * t1283 * t1179;
1290   t5013 = t162 * t441;
1291   t5020 = t58 * t1121;
1292   t5030 = t1757 * t272;
1293   t5040 = 0.10488523547622316684e3 * t772 * t2902 * t1812 - 0.11432585570925925678e2 * t751 * t465 * t1478 - 0.15243447427901234237e2 * t751 * t465 * t1532 - 0.12461621718547169973e1 * t859 * t322 * t5013 - 0.76217237139506171188e1 * t270 * t379 * t4783 - 0.76217237139506171188e1 * t270 * t379 * t5020 - 0.15243447427901234238e2 * t270 * t379 * t3294 - 0.76217237139506171188e1 * t270 * t987 * t1819 - 0.76217237139506171188e1 * t270 * t5030 * t334 + 0.53114609167735973502e-1 * t855 * t964 * t450 - 0.12461621718547169973e1 * t859 * t1782 * t356;
1294   t5053 = t1121 * t118;
1295   t5063 = t62 * t1757;
1296   t5076 = -0.70819478890314631336e-1 * t316 * t3603 * t138 - 0.76217237139506171188e1 * t270 * t987 * t450 + 0.16615495624729559964e1 * t321 * t322 * t1757 - 0.35409739445157315668e-1 * t316 * t365 * t1121 + 0.16615495624729559964e1 * t321 * t5053 * t162 + 0.33230991249459119928e1 * t321 * t1258 * t484 + 0.33230991249459119928e1 * t321 * t495 * t1214 - 0.35409739445157315668e-1 * t316 * t5063 * t95 - 0.70819478890314631336e-1 * t316 * t1269 * t307 - 0.35409739445157315668e-1 * t316 * t964 * t441 + 0.16615495624729559964e1 * t321 * t1792 * t356;
1297   t5081 = -0.2e1 * t308 * t511 - 0.12e2 * t1228 * t510 * t148 * t122 - 0.6e1 * t1228 * t172 * t469 * t122 - 0.12e2 * t1228 * t1229 * t338 - 0.12e2 * t4890 * t1230 + 0.24e2 * t3517 * t172 * t446 * t122 - t357 * t470 - t163 * t1192 - t96 * t1824 - t442 * t384 - 0.2e1 * t485 * t339 - t1122 * t173 - 0.2e1 * t139 * t1303 - 0.2e1 * t1215 * t149 - t1758 * t123 + t19 * t4924 * t67 + 0.2e1 * t357 * t447 - t48 * t99 * (t4965 + t5002 + t5040 + t5076);
1298   if(v4rho4 != NULL && (p->info->flags & XC_FLAGS_NEEDS_LAPLACIAN) && (p->info->flags & XC_FLAGS_HAVE_LXC))
1299     v4rhosigma2lapl[0] = -t285 * t1827 / 0.4e1 - 0.3e1 / 0.16e2 * t76 * t77 * (t4876 + t5081);
1300 
1301   t5098 = -0.33190537739774681727e-3 * t4910 + 0.80361903747517469318e-3 * t4913 + 0.16875999786978668556e-2 * t1680 - 0.17549384106081390032e-1 * t4918 - 0.22112223973662551440e0 * t1683 - 0.11350184946261264471e-2 * t1686 - 0.90080832906835432311e-4 * t4922;
1302   t5113 = t769 * t771 * t519;
1303   t5124 = t1079 * t1184;
1304   t5127 = 0.70819478890314631335e-1 * t50 * t101 * t5098 + 0.16615495624729559964e1 * t106 * t57 * t5098 * t118 - 0.24056046973484009303e4 * t3875 * t4956 + 0.10488523547622316684e3 * t1388 * t4939 - 0.22865171141851851357e2 * t1263 * t1381 + 0.20977047095244633368e3 * t5113 * t1293 + 0.31465570642866950052e3 * t1388 * t4943 + 0.20977047095244633368e3 * t1388 * t4953 - 0.11432585570925925678e2 * t4930 * t420 - 0.22865171141851851356e2 * t1263 * t1394 + 0.20977047095244633367e3 * t4960 * t5124;
1305   t5142 = t181 * t441;
1306   t5149 = t519 * t138;
1307   t5159 = t181 * t450;
1308   t5163 = 0.11432585570925925678e2 * t4936 * t420 - 0.24923243437094339946e1 * t859 * t495 * t3832 + 0.10622921833547194700e0 * t855 * t1366 * t1244 - 0.13278652291933993376e0 * t2748 * t405 * t4942 - 0.15243447427901234238e2 * t270 * t3842 * t506 - 0.12461621718547169973e1 * t859 * t322 * t5142 - 0.11432585570925925678e2 * t751 * t465 * t1660 - 0.24923243437094339946e1 * t859 * t322 * t5149 + 0.53114609167735973502e-1 * t855 * t405 * t4783 + 0.10622921833547194700e0 * t855 * t405 * t3294 + 0.24923243437094339947e1 * t2765 * t322 * t5159;
1309   t5174 = t181 * t95;
1310   t5178 = t1833 * t272;
1311   t5200 = -0.15243447427901234238e2 * t270 * t1380 * t1244 - 0.15243447427901234238e2 * t270 * t1380 * t1179 + 0.10488523547622316684e3 * t772 * t3092 * t1812 - 0.15243447427901234237e2 * t751 * t465 * t5174 - 0.76217237139506171188e1 * t270 * t5178 * t334 - 0.15243447427901234238e2 * t270 * t419 * t3294 - 0.76217237139506171188e1 * t270 * t1075 * t1819 - 0.76217237139506171188e1 * t270 * t419 * t4783 - 0.76217237139506171188e1 * t270 * t419 * t5020 - 0.35409739445157315668e-1 * t316 * t1051 * t441 - 0.35409739445157315668e-1 * t316 * t405 * t1121;
1312   t5228 = t62 * t1833;
1313   t5235 = 0.16615495624729559964e1 * t321 * t5053 * t181 + 0.53114609167735973502e-1 * t855 * t1051 * t450 - 0.12461621718547169973e1 * t859 * t1782 * t396 - 0.70819478890314631336e-1 * t316 * t3916 * t138 - 0.76217237139506171188e1 * t270 * t1075 * t450 + 0.16615495624729559964e1 * t321 * t322 * t1833 + 0.16615495624729559964e1 * t321 * t1792 * t396 + 0.33230991249459119928e1 * t321 * t1258 * t519 + 0.33230991249459119928e1 * t321 * t495 * t1316 - 0.35409739445157315668e-1 * t316 * t5228 * t95 - 0.70819478890314631336e-1 * t316 * t1366 * t307;
1314   t5273 = -t1122 * t192 - 0.2e1 * t139 * t1398 - t48 * t99 * (t5127 + t5163 + t5200 + t5235) + 0.2e1 * t397 * t447 - t397 * t470 - t182 * t1192 - t96 * t1896 + 0.24e2 * t3517 * t191 * t446 * t122 - 0.12e2 * t4890 * t1331 - 0.2e1 * t520 * t339 - 0.2e1 * t1317 * t149 - t1834 * t123 - 0.2e1 * t308 * t544 - 0.12e2 * t1228 * t1330 * t338 - 0.12e2 * t1228 * t543 * t148 * t122 - 0.6e1 * t1228 * t191 * t469 * t122 + t19 * t5098 * t67 + 0.2e1 * t182 * t1142;
1315   t5312 = t242 * t1895;
1316   t5316 = 0.2e1 * t48 * t1038 * t469 + 0.2e1 * t48 * t401 * t1191 + 0.2e1 * t48 * t5312 * t122 + 0.4e1 * t48 * t1341 * t338 + 0.4e1 * t48 * t3815 * t148 - 0.6e1 * t48 * t3175 * t446 - 0.6e1 * t182 * t1134 + 0.4e1 * t182 * t1137 + 0.4e1 * t139 * t1334 + 0.4e1 * t139 * t1337 + 0.4e1 * t139 * t1342 - 0.6e1 * t96 * t1846 + 0.4e1 * t96 * t1849 + 0.2e1 * t96 * t1852 + 0.4e1 * t308 * t524 + 0.4e1 * t520 * t313 + 0.2e1 * t442 * t402 - t442 * t424;
1317   if(v4rho4 != NULL && (p->info->flags & XC_FLAGS_HAVE_LXC))
1318     v4rhosigma2tau[0] = -t285 * t1899 / 0.4e1 - 0.3e1 / 0.16e2 * t76 * t77 * (t5273 + t5316);
1319 
1320   t5324 = t2448 * t1902 * t89;
1321   t5327 = t2454 * t1902 * t89;
1322   t5332 = t4666 * t38 * t1902 * t696;
1323   t5336 = t1908 * t89;
1324   t5338 = 0.16595268869887340864e-3 * t5324 - 0.40180951873758734660e-3 * t5327 - 0.72325713372765722388e-3 * t1749 + 0.87746920530406950161e-2 * t5332 + 0.94766674172839506174e-1 * t1752 + 0.48643649769691133449e-3 * t1755 + 0.45040416453417716157e-4 * t5336;
1325   t5369 = t242 * t1975;
1326   t5380 = t19 * t5338 * t67 + 0.4e1 * t163 * t1236 + 0.4e1 * t357 * t489 - 0.6e1 * t139 * t1433 + 0.4e1 * t139 * t1436 + 0.4e1 * t163 * t1241 + 0.4e1 * t96 * t1926 + 0.4e1 * t48 * t951 * t510 + 0.4e1 * t48 * t361 * t1302 + 0.2e1 * t48 * t4148 * t148 + 0.2e1 * t96 * t1930 + 0.2e1 * t139 * t1441 + 0.2e1 * t48 * t1440 * t338 + 0.2e1 * t48 * t5369 * t122 + 0.4e1 * t163 * t1233 + 0.4e1 * t485 * t362 + 0.2e1 * t559 * t313 - t96 * t1976;
1327   t5385 = t163 * t721;
1328   t5427 = t558 * t138;
1329   t5431 = t162 * t484;
1330   t5435 = t567 * t138;
1331   t5442 = t484 * t95;
1332   t5455 = 0.10622921833547194700e0 * t855 * t365 * t3538 - 0.11432585570925925678e2 * t751 * t582 * t1179 + 0.53114609167735973502e-1 * t855 * t1460 * t1244 - 0.12461621718547169973e1 * t859 * t322 * t5427 - 0.24923243437094339946e1 * t859 * t322 * t5431 + 0.24923243437094339947e1 * t2765 * t322 * t5435 - 0.24923243437094339946e1 * t859 * t495 * t4099 + 0.10622921833547194700e0 * t855 * t365 * t5442 - 0.13278652291933993376e0 * t2748 * t1444 * t1244 - 0.76217237139506171188e1 * t270 * t1474 * t1244 - 0.76217237139506171188e1 * t270 * t1474 * t1179;
1333   t5462 = t58 * t1214;
1334   t5466 = t1911 * t272;
1335   t5492 = -0.15243447427901234238e2 * t270 * t987 * t1964 - 0.15243447427901234238e2 * t270 * t379 * t5442 - 0.15243447427901234238e2 * t270 * t379 * t5462 - 0.76217237139506171188e1 * t270 * t5466 * t334 - 0.76217237139506171188e1 * t270 * t4004 * t506 - 0.15243447427901234237e2 * t751 * t582 * t1244 + 0.10488523547622316684e3 * t772 * t1482 * t4790 - 0.15243447427901234238e2 * t270 * t379 * t3538 + 0.16615495624729559964e1 * t106 * t57 * t5338 * t118 + 0.70819478890314631335e-1 * t50 * t101 * t5338 - 0.12461621718547169973e1 * t859 * t1258 * t567;
1336   t5497 = t62 * t1911;
1337   t5528 = 0.16615495624729559964e1 * t321 * t495 * t1420 - 0.35409739445157315668e-1 * t316 * t5497 * t95 - 0.70819478890314631336e-1 * t316 * t964 * t484 - 0.70819478890314631336e-1 * t316 * t365 * t1214 + 0.33230991249459119928e1 * t321 * t1546 * t484 + 0.33230991249459119928e1 * t321 * t606 * t1214 + 0.53114609167735973502e-1 * t855 * t1444 * t307 - 0.76217237139506171188e1 * t270 * t582 * t307 + 0.16615495624729559964e1 * t321 * t322 * t1911 - 0.35409739445157315668e-1 * t316 * t4039 * t138 - 0.35409739445157315668e-1 * t316 * t1460 * t307;
1338   t5532 = t1292 * t5442;
1339   t5535 = t1292 * t3538;
1340   t5538 = t771 * t567;
1341   t5540 = t3650 * t1244;
1342   t5545 = t3629 * t1244;
1343   t5551 = t769 * t771 * t558;
1344   t5558 = t2539 * t5538;
1345   t5561 = t2585 * t1262;
1346   t5564 = 0.16615495624729559964e1 * t321 * t1258 * t558 + 0.20977047095244633368e3 * t1291 * t5532 + 0.20977047095244633368e3 * t1291 * t5535 + 0.31465570642866950052e3 * t769 * t5538 * t5540 - 0.24056046973484009303e4 * t2523 * t2524 * t567 * t5545 - 0.11432585570925925678e2 * t1263 * t1475 + 0.10488523547622316684e3 * t5551 * t1293 - 0.22865171141851851357e2 * t1551 * t1284 - 0.22865171141851851356e2 * t1551 * t1287 + 0.20977047095244633367e3 * t5558 * t1293 + 0.11432585570925925678e2 * t5561 * t1457;
1347   t5570 = -t559 * t339 - t1421 * t149 - 0.2e1 * t485 * t384 - 0.12e2 * t5385 * t1230 - 0.2e1 * t1215 * t173 - 0.2e1 * t163 * t1303 - 0.12e2 * t1228 * t1229 * t383 + 0.24e2 * t3517 * t563 * t148 * t122 - 0.6e1 * t1228 * t586 * t148 * t122 - 0.12e2 * t1228 * t172 * t510 * t122 - 0.2e1 * t357 * t511 + 0.2e1 * t308 * t564 - t139 * t1490 - t308 * t587 - 0.6e1 * t48 * t1432 * t338 - 0.6e1 * t96 * t1923 - t48 * t99 * (t5455 + t5492 + t5528 + t5564) - t1912 * t123;
1348   if(v4rho4 != NULL && (p->info->flags & XC_FLAGS_NEEDS_LAPLACIAN) && (p->info->flags & XC_FLAGS_HAVE_LXC))
1349     v4rhosigmalapl2[0] = -t285 * t1979 / 0.4e1 - 0.3e1 / 0.16e2 * t76 * t77 * (t5380 + t5570);
1350 
1351   t5605 = 0.2e1 * t48 * t1038 * t510 + 0.2e1 * t48 * t1341 * t383 + 0.2e1 * t48 * t3815 * t172 - 0.6e1 * t5385 * t1331 + 0.2e1 * t163 * t1337 + 0.2e1 * t163 * t1342 + 0.2e1 * t139 * t1521 + 0.2e1 * t139 * t1524 - t163 * t1398 - 0.6e1 * t4890 * t1518 + 0.2e1 * t96 * t2002 + 0.2e1 * t96 * t2005 + 0.2e1 * t308 * t600;
1352   t5606 = t182 * t721;
1353   t5617 = t543 * t172;
1354   t5625 = t191 * t510;
1355   t5639 = -0.6e1 * t1228 * t621 * t148 * t122 - 0.6e1 * t1228 * t5617 * t122 - 0.6e1 * t1228 * t5625 * t122 - 0.6e1 * t1228 * t4264 * t148 - 0.6e1 * t1228 * t4268 * t148 - 0.6e1 * t1228 * t1517 * t338 + 0.2e1 * t48 * t401 * t1302 - 0.6e1 * t5606 * t1230 - t1504 * t149 - 0.6e1 * t3472 * t1999 - t96 * t2062 - t596 * t339 - t357 * t544;
1356   t5648 = t242 * t2061;
1357   t5669 = 0.2e1 * t48 * t5648 * t122 + 0.2e1 * t48 * t4219 * t148 + 0.24e2 * t3517 * t1517 * t2827 + 0.2e1 * t48 * t1528 * t338 + 0.2e1 * t182 * t1233 - t182 * t1303 - t1317 * t173 + 0.2e1 * t163 * t1334 + 0.2e1 * t139 * t1529 + 0.2e1 * t96 * t2009 + 0.2e1 * t596 * t313 + 0.2e1 * t520 * t362 - t520 * t384;
1358   t5701 = t595 * t138;
1359   t5705 = t181 * t484;
1360   t5715 = t519 * t162;
1361   t5722 = t1985 * t272;
1362   t5732 = -0.12461621718547169973e1 * t859 * t495 * t4380 + 0.53114609167735973502e-1 * t855 * t1051 * t1248 + 0.53114609167735973502e-1 * t855 * t405 * t3538 + 0.53114609167735973502e-1 * t855 * t405 * t3563 - 0.12461621718547169973e1 * t859 * t1258 * t1536 + 0.53114609167735973502e-1 * t855 * t1557 * t1244 - 0.12461621718547169973e1 * t859 * t322 * t5701 - 0.12461621718547169973e1 * t859 * t322 * t5705 - 0.12461621718547169973e1 * t859 * t495 * t4384 + 0.53114609167735973502e-1 * t855 * t1366 * t1532 - 0.12461621718547169973e1 * t859 * t322 * t5715 + 0.53114609167735973502e-1 * t855 * t405 * t5442 - 0.76217237139506171188e1 * t270 * t5722 * t334 - 0.76217237139506171188e1 * t270 * t4414 * t506 - 0.76217237139506171188e1 * t270 * t1571 * t1244;
1363   t5764 = t750 * t269 * t484;
1364   t5778 = -0.76217237139506171188e1 * t270 * t1571 * t1179 - 0.76217237139506171188e1 * t270 * t1075 * t1248 - 0.76217237139506171188e1 * t270 * t419 * t3563 - 0.76217237139506171188e1 * t270 * t419 * t3538 - 0.76217237139506171188e1 * t270 * t3842 * t617 - 0.76217237139506171188e1 * t270 * t1380 * t1532 - 0.76217237139506171188e1 * t270 * t1380 * t1478 - 0.76217237139506171188e1 * t270 * t1075 * t1964 - 0.76217237139506171188e1 * t270 * t419 * t5442 - 0.76217237139506171188e1 * t270 * t419 * t5462 - 0.11432585570925925678e2 * t5764 * t420 - 0.11432585570925925678e2 * t4328 * t540 - 0.13278652291933993376e0 * t50 * t2574 * t1536 * t1244 + 0.24923243437094339947e1 * t2552 * t107 * t2015 + 0.10488523547622316684e3 * t1388 * t5532;
1365   t5792 = t769 * t771 * t595;
1366   t5818 = 0.10488523547622316684e3 * t5113 * t1578 + 0.10488523547622316684e3 * t3867 * t2052 + 0.10488523547622316684e3 * t1388 * t5535 + 0.10488523547622316684e3 * t1388 * t1292 * t3563 - 0.11432585570925925678e2 * t1263 * t1572 + 0.10488523547622316684e3 * t5792 * t1293 - 0.11432585570925925678e2 * t1551 * t1384 - 0.15243447427901234237e2 * t1551 * t1391 - 0.11432585570925925678e2 * t1551 * t1394 - 0.11432585570925925678e2 * t1551 * t1381 - 0.35409739445157315668e-1 * t316 * t3916 * t162 - 0.35409739445157315668e-1 * t316 * t1366 * t356 - 0.35409739445157315668e-1 * t316 * t1557 * t307 - 0.35409739445157315668e-1 * t316 * t1051 * t484 - 0.35409739445157315668e-1 * t316 * t405 * t1214;
1367   t5832 = t62 * t1985;
1368   t5855 = -0.66381075479549363457e-3 * t5324 + 0.16072380749503493864e-2 * t5327 + 0.28930285349106288955e-2 * t1749 - 0.35098768212162780064e-1 * t5332 - 0.37906669669135802469e0 * t1752 - 0.19457459907876453380e-2 * t1755 - 0.18016166581367086463e-3 * t5336;
1369   t5863 = t1248 * t95;
1370   t5878 = 0.16615495624729559964e1 * t321 * t1214 * t118 * t181 + 0.16615495624729559964e1 * t321 * t2024 * t396 + 0.16615495624729559964e1 * t321 * t1258 * t595 + 0.16615495624729559964e1 * t321 * t495 * t1503 - 0.35409739445157315668e-1 * t316 * t5832 * t95 + 0.16615495624729559964e1 * t321 * t322 * t1985 + 0.16615495624729559964e1 * t321 * t1546 * t519 + 0.16615495624729559964e1 * t321 * t606 * t1316 - 0.35409739445157315668e-1 * t316 * t4291 * t138 + 0.70819478890314631335e-1 * t50 * t101 * t5855 + 0.16615495624729559964e1 * t106 * t57 * t5855 * t118 + 0.31465570642866950052e3 * t1388 * t3650 * t5863 - 0.24056046973484009303e4 * t3875 * t3629 * t5863 + 0.11432585570925925678e2 * t5561 * t419 * t617 * t95 + 0.20977047095244633367e3 * t4324 * t1079 * t1968 * t95;
1371   t5888 = 0.2e1 * t485 * t402 + 0.2e1 * t357 * t524 - t139 * t1588 - t1986 * t123 - t308 * t622 + 0.2e1 * t182 * t1241 + 0.2e1 * t182 * t1236 + 0.2e1 * t397 * t489 - t48 * t99 * (t5732 + t5778 + t5818 + t5878) + t19 * t5855 * t67 - t485 * t424 - t397 * t511 - t1215 * t192;
1372   if(v4rho4 != NULL && (p->info->flags & XC_FLAGS_NEEDS_LAPLACIAN) && (p->info->flags & XC_FLAGS_HAVE_LXC))
1373     v4rhosigmalapltau[0] = -t285 * t2065 / 0.4e1 - 0.3e1 / 0.16e2 * t76 * t77 * (t5605 + t5639 + t5669 + t5888);
1374 
1375   t5905 = t242 * t2134;
1376   t5933 = t62 * t2071;
1377   t5937 = t396 * t118;
1378   t5944 = 0.33230991249459119928e1 * t321 * t1635 * t1316 - 0.35409739445157315668e-1 * t316 * t4531 * t138 + 0.53114609167735973502e-1 * t855 * t1625 * t307 - 0.12461621718547169973e1 * t859 * t1258 * t639 - 0.70819478890314631336e-1 * t316 * t1051 * t519 - 0.35409739445157315668e-1 * t316 * t1642 * t307 + 0.16615495624729559964e1 * t321 * t1258 * t630 + 0.16615495624729559964e1 * t321 * t495 * t1601 - 0.35409739445157315668e-1 * t316 * t5933 * t95 + 0.33230991249459119928e1 * t321 * t5937 * t519 - 0.76217237139506171188e1 * t270 * t654 * t307;
1379   t5955 = 0.26552430191819745383e-2 * t5324 - 0.64289522998013975457e-2 * t5327 - 0.11572114139642515582e-1 * t1749 + 0.14039507284865112026e0 * t5332 + 0.15162667867654320988e1 * t1752 + 0.77829839631505813518e-2 * t1755 + 0.72064666325468345850e-3 * t5336;
1380   t5963 = t2071 * t272;
1381   t5979 = t95 * t519;
1382   t5983 = t630 * t138;
1383   t5990 = 0.16615495624729559964e1 * t321 * t322 * t2071 + 0.16615495624729559964e1 * t106 * t57 * t5955 * t118 + 0.70819478890314631335e-1 * t50 * t101 * t5955 - 0.76217237139506171188e1 * t270 * t5963 * t334 - 0.76217237139506171188e1 * t270 * t4600 * t506 - 0.76217237139506171188e1 * t270 * t1656 * t1244 - 0.76217237139506171188e1 * t270 * t1656 * t1179 - 0.15243447427901234238e2 * t270 * t1075 * t2124 - 0.15243447427901234238e2 * t270 * t419 * t5979 - 0.12461621718547169973e1 * t859 * t322 * t5983 - 0.15243447427901234237e2 * t751 * t654 * t1244;
1384   t6008 = t771 * t639;
1385   t6009 = t2539 * t6008;
1386   t6015 = t769 * t771 * t630;
1387   t6024 = -0.15243447427901234238e2 * t270 * t419 * t58 * t1316 + 0.10488523547622316684e3 * t772 * t1664 * t4790 - 0.15243447427901234238e2 * t270 * t419 * t3828 + 0.11432585570925925678e2 * t5561 * t1639 - 0.22865171141851851357e2 * t4590 * t1381 - 0.22865171141851851356e2 * t4590 * t1384 + 0.20977047095244633367e3 * t6009 * t1293 - 0.11432585570925925678e2 * t1263 * t1657 + 0.10488523547622316684e3 * t6015 * t1293 + 0.20977047095244633368e3 * t1388 * t1292 * t5979 + 0.20977047095244633368e3 * t1388 * t1292 * t3828;
1388   t6025 = t769 * t6008;
1389   t6029 = t2523 * t2524 * t639;
1390   t6044 = t181 * t519;
1391   t6061 = 0.31465570642866950052e3 * t6025 * t5540 - 0.24056046973484009303e4 * t6029 * t5545 - 0.70819478890314631336e-1 * t316 * t405 * t1316 - 0.11432585570925925678e2 * t751 * t654 * t1179 + 0.53114609167735973502e-1 * t855 * t1642 * t1244 + 0.10622921833547194700e0 * t855 * t405 * t5979 - 0.24923243437094339946e1 * t859 * t322 * t6044 + 0.24923243437094339947e1 * t2765 * t322 * t639 * t138 - 0.24923243437094339946e1 * t859 * t495 * t4614 - 0.13278652291933993376e0 * t2748 * t1625 * t1244 + 0.10622921833547194700e0 * t855 * t405 * t3828;
1392   t6090 = -t96 * t2135 + 0.4e1 * t48 * t1038 * t543 + 0.4e1 * t96 * t2086 + 0.2e1 * t48 * t1621 * t338 + 0.2e1 * t48 * t5905 * t122 - t48 * t99 * (t5944 + t5990 + t6024 + t6061) - t631 * t339 - 0.12e2 * t5606 * t1331 - t139 * t1672 - t1602 * t149 - t2072 * t123 - 0.2e1 * t1317 * t192 - 0.2e1 * t520 * t424 - 0.2e1 * t182 * t1398 + 0.4e1 * t48 * t401 * t1397 - 0.2e1 * t397 * t544 + 0.24e2 * t3517 * t635 * t148 * t122 - 0.12e2 * t1228 * t1330 * t423;
1393   t6132 = -0.12e2 * t1228 * t191 * t543 * t122 - 0.6e1 * t1228 * t658 * t148 * t122 + 0.4e1 * t520 * t402 + 0.2e1 * t631 * t313 + 0.4e1 * t182 * t1337 + 0.4e1 * t182 * t1334 + 0.4e1 * t397 * t524 - 0.6e1 * t139 * t1614 + 0.4e1 * t182 * t1342 + 0.4e1 * t139 * t1617 - 0.6e1 * t96 * t2083 + t19 * t5955 * t67 - 0.6e1 * t48 * t1613 * t338 + 0.2e1 * t308 * t636 - t308 * t659 + 0.2e1 * t48 * t4450 * t148 + 0.2e1 * t96 * t2090 + 0.2e1 * t139 * t1622;
1394   if(v4rho4 != NULL && (p->info->flags & XC_FLAGS_HAVE_LXC))
1395     v4rhosigmatau2[0] = -t285 * t2138 / 0.4e1 - 0.3e1 / 0.16e2 * t76 * t77 * (t6090 + t6132);
1396 
1397   t6140 = t2448 * t2141 * t89;
1398   t6143 = t2454 * t2141 * t89;
1399   t6148 = t4666 * t38 * t2141 * t696;
1400   t6152 = t2147 * t89;
1401   t6154 = 0.33190537739774681727e-3 * t6140 - 0.80361903747517469318e-3 * t6143 - 0.12054285562127620398e-2 * t1903 + 0.17549384106081390032e-1 * t6148 + 0.15794445695473251028e0 * t1906 + 0.81072749616151889080e-3 * t1909 + 0.90080832906835432311e-4 * t6152;
1402   t6179 = t2504 * t2159;
1403   t6188 = t172 * t586;
1404   t6199 = t242 * t2202;
1405   t6207 = t558 * t95;
1406   t6211 = t162 * t558;
1407   t6218 = t113 * t356;
1408   t6225 = t2166 * t2529;
1409   t6235 = t2150 * t272;
1410   t6248 = -0.34297756712777777034e2 * t1551 * t1475 + 0.31465570642866950052e3 * t5551 * t1578 + 0.15934382750320792050e0 * t855 * t365 * t6207 - 0.37384865155641509919e1 * t859 * t322 * t6211 - 0.22865171141851851357e2 * t270 * t1474 * t1478 + 0.31465570642866950052e3 * t772 * t1482 * t6218 + 0.31465570642866950052e3 * t772 * t2194 * t334 - 0.24056046973484009303e4 * t2525 * t6225 * t4798 - 0.34297756712777777034e2 * t751 * t582 * t1478 + 0.20977047095244633367e3 * t2540 * t2194 * t1184 - 0.76217237139506171188e1 * t270 * t6235 * t334 - 0.22865171141851851357e2 * t270 * t4004 * t617 + 0.11432585570925925678e2 * t2586 * t2180 * t334 - 0.22865171141851851357e2 * t270 * t1474 * t1532;
1411   t6286 = t62 * t2150;
1412   t6290 = t62 * t2166;
1413   t6294 = 0.16615495624729559964e1 * t106 * t57 * t6154 * t118 + 0.70819478890314631335e-1 * t50 * t101 * t6154 + 0.15934382750320792051e0 * t855 * t1444 * t356 + 0.24923243437094339947e1 * t2765 * t322 * t2166 - 0.37384865155641509919e1 * t859 * t2237 * t356 - 0.10622921833547194700e0 * t316 * t964 * t558 - 0.10622921833547194700e0 * t316 * t365 * t1420 - 0.22865171141851851356e2 * t270 * t582 * t356 + 0.16615495624729559964e1 * t321 * t322 * t2150 + 0.49846486874188679892e1 * t321 * t1546 * t558 + 0.49846486874188679892e1 * t321 * t606 * t1420 - 0.15243447427901234237e2 * t751 * t2180 * t95 - 0.35409739445157315668e-1 * t316 * t6286 * t95 - 0.13278652291933993376e0 * t2748 * t6290 * t95;
1414   t6298 = -0.3e1 * t163 * t1490 - 0.6e1 * t96 * t2160 + 0.24e2 * t48 * t6179 * t122 - 0.18e2 * t48 * t1432 * t383 + 0.6e1 * t96 * t2163 - 0.18e2 * t1228 * t6188 * t122 + 0.6e1 * t48 * t951 * t586 + 0.6e1 * t48 * t361 * t1489 - t96 * t2203 + 0.2e1 * t48 * t6199 * t122 - t48 * t99 * (t6248 + t6294);
1415   if(v4rho4 != NULL && (p->info->flags & XC_FLAGS_NEEDS_LAPLACIAN) && (p->info->flags & XC_FLAGS_HAVE_LXC))
1416     v4rholapl3[0] = -t285 * t2206 / 0.4e1 - 0.3e1 / 0.16e2 * t76 * t77 * (t19 * t6154 * t67 - t2151 * t123 - 0.3e1 * t1421 * t173 - 0.18e2 * t163 * t1433 + 0.12e2 * t163 * t1436 + 0.6e1 * t163 * t1441 + 0.6e1 * t357 * t564 - 0.3e1 * t357 * t587 + 0.6e1 * t559 * t362 - 0.3e1 * t559 * t384 + t6298);
1417 
1418   t6308 = t242 * t2278;
1419   t6342 = 0.2e1 * t48 * t6308 * t122 + 0.4e1 * t48 * t4219 * t172 - 0.6e1 * t48 * t3175 * t563 - t1421 * t192 - 0.6e1 * t182 * t1433 + 0.4e1 * t182 * t1436 + 0.2e1 * t182 * t1441 - t182 * t1490 + 0.4e1 * t163 * t1521 + 0.4e1 * t163 * t1524 + 0.4e1 * t163 * t1529 - 0.2e1 * t163 * t1588 - 0.6e1 * t96 * t2225 + 0.4e1 * t96 * t2228 + 0.4e1 * t357 * t600 + 0.4e1 * t596 * t362 + 0.2e1 * t559 * t402 - t559 * t424;
1420   t6345 = t621 * t172;
1421   t6349 = t191 * t563;
1422   t6363 = -0.13276215095909872691e-2 * t6140 + 0.32144761499006987729e-2 * t6143 + 0.48217142248510481592e-2 * t1903 - 0.70197536424325560128e-1 * t6148 - 0.63177782781893004115e0 * t1906 - 0.32429099846460755633e-2 * t1909 - 0.36032333162734172926e-3 * t6152;
1423   t6368 = t191 * t586;
1424   t6416 = t62 * t2212;
1425   t6423 = 0.16615495624729559964e1 * t106 * t57 * t6363 * t118 + 0.70819478890314631335e-1 * t50 * t101 * t6363 + 0.16615495624729559964e1 * t321 * t1420 * t118 * t181 + 0.53114609167735973502e-1 * t855 * t1051 * t567 - 0.12461621718547169973e1 * t859 * t2237 * t396 - 0.70819478890314631336e-1 * t316 * t4291 * t162 + 0.16615495624729559964e1 * t321 * t2247 * t396 + 0.33230991249459119928e1 * t321 * t1546 * t595 + 0.33230991249459119928e1 * t321 * t606 * t1503 - 0.35409739445157315668e-1 * t316 * t6416 * t95 - 0.70819478890314631336e-1 * t316 * t1557 * t356;
1426   t6441 = t567 * t95;
1427   t6457 = -0.35409739445157315668e-1 * t316 * t1051 * t558 - 0.35409739445157315668e-1 * t316 * t405 * t1420 - 0.76217237139506171188e1 * t270 * t1075 * t567 + 0.16615495624729559964e1 * t321 * t322 * t2212 + 0.10488523547622316684e3 * t1388 * t1292 * t6207 + 0.20977047095244633368e3 * t5792 * t1578 + 0.31465570642866950052e3 * t1388 * t3650 * t6441 + 0.20977047095244633368e3 * t1388 * t1292 * t4099 - 0.24056046973484009303e4 * t3875 * t3629 * t6441 - 0.24923243437094339946e1 * t859 * t606 * t4384 + 0.10622921833547194700e0 * t855 * t1557 * t1532;
1428   t6465 = t181 * t567;
1429   t6475 = t2212 * t272;
1430   t6488 = t595 * t162;
1431   t6495 = -0.13278652291933993376e0 * t2748 * t405 * t6441 + 0.10622921833547194700e0 * t855 * t405 * t4099 + 0.24923243437094339947e1 * t2765 * t322 * t6465 - 0.15243447427901234238e2 * t270 * t1571 * t1478 + 0.10488523547622316684e3 * t772 * t3092 * t2267 - 0.76217237139506171188e1 * t270 * t6475 * t334 - 0.15243447427901234238e2 * t270 * t4414 * t617 - 0.11432585570925925678e2 * t751 * t582 * t1660 - 0.15243447427901234237e2 * t751 * t582 * t5174 - 0.24923243437094339946e1 * t859 * t322 * t6488 + 0.53114609167735973502e-1 * t855 * t405 * t6207;
1432   t6496 = t181 * t558;
1433   t6517 = t2585 * t269 * t567;
1434   t6521 = t750 * t269 * t558;
1435   t6530 = -0.12461621718547169973e1 * t859 * t322 * t6496 - 0.15243447427901234238e2 * t270 * t419 * t4099 - 0.76217237139506171188e1 * t270 * t1075 * t2274 - 0.76217237139506171188e1 * t270 * t419 * t6207 - 0.76217237139506171188e1 * t270 * t419 * t58 * t1420 - 0.15243447427901234238e2 * t270 * t1571 * t1532 + 0.11432585570925925678e2 * t6517 * t420 - 0.11432585570925925678e2 * t6521 * t420 - 0.22865171141851851356e2 * t1551 * t1584 + 0.20977047095244633367e3 * t5558 * t5124 - 0.22865171141851851357e2 * t1551 * t1572;
1436   t6540 = -0.12e2 * t5385 * t1518 - 0.12e2 * t1228 * t6345 * t122 + 0.24e2 * t3517 * t6349 * t122 - 0.12e2 * t1228 * t1517 * t383 + t19 * t6363 * t67 - 0.2e1 * t357 * t622 - 0.6e1 * t1228 * t6368 * t122 - t397 * t587 - 0.2e1 * t596 * t384 - t96 * t2279 + 0.2e1 * t48 * t1038 * t586 + 0.4e1 * t48 * t1528 * t383 + 0.2e1 * t48 * t401 * t1489 + 0.2e1 * t96 * t2231 - t48 * t99 * (t6423 + t6457 + t6495 + t6530) + 0.2e1 * t397 * t564 - t2213 * t123 - 0.2e1 * t1504 * t173;
1437   if(v4rho4 != NULL && (p->info->flags & XC_FLAGS_NEEDS_LAPLACIAN) && (p->info->flags & XC_FLAGS_HAVE_LXC))
1438     v4rholapl2tau[0] = -t285 * t2282 / 0.4e1 - 0.3e1 / 0.16e2 * t76 * t77 * (t6342 + t6540);
1439 
1440   t6548 = t191 * t621;
1441   t6552 = t635 * t172;
1442   t6556 = t658 * t172;
1443   t6587 = -t163 * t1672 - 0.12e2 * t1228 * t6548 * t122 + 0.24e2 * t3517 * t6552 * t122 - 0.6e1 * t1228 * t6556 * t122 - 0.6e1 * t96 * t2300 + 0.4e1 * t163 * t1617 - 0.6e1 * t163 * t1614 + 0.4e1 * t48 * t1038 * t621 - 0.6e1 * t48 * t1613 * t383 + 0.4e1 * t48 * t401 * t1587 + 0.4e1 * t96 * t2303 + 0.2e1 * t163 * t1622 - t357 * t659 - t1602 * t173 - t2289 * t123 - t631 * t384 - 0.2e1 * t596 * t424 - 0.2e1 * t1504 * t192;
1444   t6597 = t639 * t162;
1445   t6610 = t595 * t95;
1446   t6629 = 0.10622921833547194700e0 * t855 * t405 * t4380 + 0.24923243437094339947e1 * t2765 * t322 * t6597 + 0.10488523547622316684e3 * t772 * t1664 * t6218 - 0.15243447427901234238e2 * t270 * t419 * t4380 - 0.24923243437094339946e1 * t859 * t606 * t4614 + 0.10622921833547194700e0 * t855 * t405 * t6610 - 0.13278652291933993376e0 * t2748 * t1625 * t1532 - 0.15243447427901234237e2 * t751 * t654 * t1532 - 0.11432585570925925678e2 * t751 * t654 * t1478 - 0.15243447427901234238e2 * t270 * t1075 * t2341 - 0.15243447427901234238e2 * t270 * t419 * t6610;
1447   t6634 = t2288 * t272;
1448   t6650 = t630 * t162;
1449   t6654 = t181 * t595;
1450   t6667 = -0.15243447427901234238e2 * t270 * t419 * t58 * t1503 - 0.76217237139506171188e1 * t270 * t6634 * t334 - 0.76217237139506171188e1 * t270 * t4600 * t617 - 0.76217237139506171188e1 * t270 * t1656 * t1532 - 0.76217237139506171188e1 * t270 * t1656 * t1478 + 0.53114609167735973502e-1 * t855 * t1642 * t1532 - 0.12461621718547169973e1 * t859 * t322 * t6650 - 0.24923243437094339946e1 * t859 * t322 * t6654 + 0.33230991249459119928e1 * t321 * t1635 * t1503 + 0.53114609167735973502e-1 * t855 * t1625 * t356 - 0.12461621718547169973e1 * t859 * t1546 * t639;
1451   t6690 = t62 * t2288;
1452   t6702 = -0.70819478890314631336e-1 * t316 * t1051 * t595 - 0.70819478890314631336e-1 * t316 * t405 * t1503 + 0.16615495624729559964e1 * t321 * t322 * t2288 - 0.35409739445157315668e-1 * t316 * t4531 * t162 - 0.35409739445157315668e-1 * t316 * t1642 * t356 + 0.16615495624729559964e1 * t321 * t1546 * t630 + 0.16615495624729559964e1 * t321 * t606 * t1601 - 0.35409739445157315668e-1 * t316 * t6690 * t95 + 0.33230991249459119928e1 * t321 * t5937 * t595 - 0.76217237139506171188e1 * t270 * t654 * t356 - 0.22865171141851851357e2 * t4590 * t1572;
1453   t6723 = t2585 * t1550;
1454   t6733 = 0.53104860383639490766e-2 * t6140 - 0.12857904599602795092e-1 * t6143 - 0.19286856899404192637e-1 * t1903 + 0.28079014569730224052e0 * t6148 + 0.25271113112757201646e1 * t1906 + 0.12971639938584302254e-1 * t1909 + 0.14412933265093669171e-2 * t6152;
1455   t6741 = -0.22865171141851851356e2 * t4590 * t1575 + 0.31465570642866950052e3 * t6025 * t3650 * t1532 - 0.24056046973484009303e4 * t6029 * t3629 * t1532 + 0.10488523547622316684e3 * t6015 * t1578 + 0.20977047095244633368e3 * t1388 * t1292 * t6610 + 0.20977047095244633368e3 * t1388 * t1292 * t4380 + 0.20977047095244633367e3 * t6009 * t1578 - 0.11432585570925925678e2 * t1551 * t1657 + 0.11432585570925925678e2 * t6723 * t1639 + 0.70819478890314631335e-1 * t50 * t101 * t6733 + 0.16615495624729559964e1 * t106 * t57 * t6733 * t118;
1456   t6768 = t242 * t2352;
1457   t6778 = -0.2e1 * t182 * t1588 - 0.2e1 * t397 * t622 + 0.2e1 * t357 * t636 - t48 * t99 * (t6629 + t6667 + t6702 + t6741) - 0.12e2 * t1228 * t1517 * t423 - 0.12e2 * t5606 * t1518 + 0.2e1 * t48 * t4450 * t172 + 0.2e1 * t96 * t2307 + t19 * t6733 * t67 + 0.4e1 * t397 * t600 + 0.4e1 * t596 * t402 + 0.4e1 * t182 * t1529 + 0.4e1 * t182 * t1524 + 0.4e1 * t182 * t1521 + 0.2e1 * t48 * t6768 * t122 + 0.2e1 * t48 * t1621 * t383 + 0.2e1 * t631 * t362 - t96 * t2353;
1458   if(v4rho4 != NULL && (p->info->flags & XC_FLAGS_NEEDS_LAPLACIAN) && (p->info->flags & XC_FLAGS_HAVE_LXC))
1459     v4rholapltau2[0] = -t285 * t2356 / 0.4e1 - 0.3e1 / 0.16e2 * t76 * t77 * (t6587 + t6778);
1460 
1461   t6792 = -0.21241944153455796307e-1 * t6140 + 0.51431618398411180367e-1 * t6143 + 0.77147427597616770550e-1 * t1903 - 0.11231605827892089621e1 * t6148 - 0.10108445245102880658e2 * t1906 - 0.51886559754337209015e-1 * t1909 - 0.57651733060374676683e-2 * t6152;
1462   t6817 = t2504 * t2371;
1463   t6826 = t191 * t658;
1464   t6837 = t242 * t2414;
1465   t6859 = t62 * t2362;
1466   t6863 = t62 * t2378;
1467   t6873 = t639 * t118;
1468   t6884 = 0.16615495624729559964e1 * t321 * t322 * t2362 - 0.22865171141851851356e2 * t270 * t654 * t396 - 0.10622921833547194700e0 * t316 * t405 * t1601 + 0.49846486874188679892e1 * t321 * t5937 * t630 + 0.49846486874188679892e1 * t321 * t1635 * t1601 - 0.15243447427901234237e2 * t751 * t2392 * t95 - 0.35409739445157315668e-1 * t316 * t6859 * t95 - 0.13278652291933993376e0 * t2748 * t6863 * t95 + 0.15934382750320792051e0 * t855 * t1625 * t396 + 0.24923243437094339947e1 * t2765 * t322 * t2378 - 0.37384865155641509919e1 * t859 * t6873 * t396 - 0.10622921833547194700e0 * t316 * t1051 * t630 + 0.31465570642866950052e3 * t6015 * t5124 - 0.34297756712777777034e2 * t4590 * t1657;
1469   t6891 = t181 * t630;
1470   t6909 = t2378 * t2529;
1471   t6919 = t2362 * t272;
1472   t6933 = -0.22865171141851851357e2 * t270 * t1656 * t5174 - 0.22865171141851851357e2 * t270 * t1656 * t1660 - 0.37384865155641509919e1 * t859 * t322 * t6891 + 0.11432585570925925678e2 * t2586 * t2392 * t334 + 0.15934382750320792050e0 * t855 * t405 * t630 * t95 + 0.31465570642866950052e3 * t772 * t1664 * t113 * t396 + 0.31465570642866950052e3 * t772 * t2406 * t334 - 0.24056046973484009303e4 * t2525 * t6909 * t4798 - 0.34297756712777777034e2 * t751 * t654 * t1660 + 0.20977047095244633367e3 * t2540 * t2406 * t1184 - 0.76217237139506171188e1 * t270 * t6919 * t334 - 0.22865171141851851357e2 * t270 * t4600 * t1061 + 0.16615495624729559964e1 * t106 * t57 * t6792 * t118 + 0.70819478890314631335e-1 * t50 * t101 * t6792;
1473   t6937 = -0.3e1 * t182 * t1672 - 0.6e1 * t96 * t2372 + 0.24e2 * t48 * t6817 * t122 - 0.18e2 * t48 * t1613 * t423 + 0.6e1 * t96 * t2375 - 0.18e2 * t1228 * t6826 * t122 + 0.6e1 * t48 * t1038 * t658 + 0.6e1 * t48 * t401 * t1671 - t96 * t2415 + 0.2e1 * t48 * t6837 * t122 - t48 * t99 * (t6884 + t6933);
1474   if(v4rho4 != NULL && (p->info->flags & XC_FLAGS_HAVE_LXC))
1475     v4rhotau3[0] = -t285 * t2418 / 0.4e1 - 0.3e1 / 0.16e2 * t76 * t77 * (t19 * t6792 * t67 - t2363 * t123 - 0.3e1 * t1602 * t192 - 0.18e2 * t182 * t1614 + 0.12e2 * t182 * t1617 + 0.6e1 * t182 * t1622 + 0.6e1 * t397 * t636 - 0.3e1 * t397 * t659 + 0.6e1 * t631 * t402 - 0.3e1 * t631 * t424 + t6937);
1476 
1477   t6944 = 0.1e1 / t21 / t1678 / t26;
1478   t6947 = t10 * t35 * t38;
1479   t6953 = t220 * t10;
1480   t6960 = -0.51860215218397940202e-5 * t2448 * t6944 * t6947 + 0.12556547460549604582e-4 * t2454 * t6944 * t6947 - 0.27420912665752171925e-3 * t6953 * t6944 * t2461 - 0.14075130141693036299e-5 * t220 * t6944 * t6947;
1481   t6975 = t446 * t446;
1482   t6982 = t469 * t469;
1483   t6992 = t450 * t450;
1484   t6993 = t6992 * t775;
1485   t7003 = t441 * t441;
1486   t7059 = 0.62931141285733900104e3 * t772 * t3322 * t1812 + 0.31465570642866950052e3 * t772 * t6993 * t58 - 0.30486894855802468476e2 * t270 * t4805 * t506 - 0.45730342283703702713e2 * t270 * t1175 * t450 - 0.22865171141851851357e2 * t270 * t7003 * t272 * t58 - 0.68595513425555554068e2 * t751 * t465 * t1819 + 0.16615495624729559964e1 * t106 * t57 * t6960 * t118 + 0.70819478890314631335e-1 * t50 * t101 * t6960 + 0.24923243437094339947e1 * t2552 * t57 * t6992 * t118 - 0.13278652291933993376e0 * t50 * t2574 * t6992 - 0.15243447427901234237e2 * t750 * t269 * t6992 * t272 + 0.20977047095244633367e3 * t2540 * t6993 * t113 - 0.24056046973484009303e4 * t2525 * t6992 * t2529 * t2531 - 0.14163895778062926267e0 * t316 * t317 * t1688 + 0.49846486874188679892e1 * t254 * t57 * t7003 * t118 + 0.66461982498918239856e1 * t321 * t495 * t1688 + 0.31868765500641584101e0 * t855 * t1145 * t441 - 0.74769730311283019838e1 * t859 * t1782 * t441 + 0.11432585570925925678e2 * t2586 * t6992 * t272 * t58 - 0.10622921833547194700e0 * t50 * t249 * t7003;
1487   t7062 = -0.36e2 * t48 * t1133 * t469 + 0.8e1 * t48 * t312 * t1740 + t19 * t6960 * t67 + 0.6e1 * t48 * t242 * t6982 + 0.24e2 * t48 * t2504 * t6975 - t48 * t99 * t7059 - 0.24e2 * t139 * t1698 + 0.24e2 * t139 * t1701 - 0.4e1 * t139 * t1741 - 0.4e1 * t1689 * t149 + 0.12e2 * t442 * t447 - 0.6e1 * t442 * t470;
1488   if(v4rho4 != NULL && (p->info->flags & XC_FLAGS_HAVE_LXC))
1489     v4sigma4[0] = -0.3e1 / 0.16e2 * t76 * t77 * t7062;
1490 
1491   t7081 = t1688 * t118;
1492   t7102 = t1292 * t4818;
1493   t7105 = t58 * t1688;
1494   t7115 = -0.13278652291933993376e0 * t2748 * t365 * t1704 + 0.49846486874188679892e1 * t321 * t495 * t1757 - 0.35409739445157315668e-1 * t316 * t365 * t1688 + 0.16615495624729559964e1 * t321 * t7081 * t162 + 0.49846486874188679892e1 * t321 * t1792 * t484 - 0.10622921833547194700e0 * t316 * t5063 * t138 - 0.10622921833547194700e0 * t316 * t1269 * t441 + 0.15934382750320792050e0 * t855 * t1269 * t450 - 0.15243447427901234237e2 * t751 * t1718 * t162 - 0.34297756712777777034e2 * t4930 * t507 + 0.31465570642866950052e3 * t1291 * t7102 - 0.76217237139506171188e1 * t270 * t379 * t7105 - 0.22865171141851851357e2 * t270 * t1283 * t1819 + 0.31465570642866950052e3 * t772 * t3552 * t1812;
1495   t7116 = t2531 * t1704;
1496   t7138 = t58 * t1704;
1497   t7146 = 0.1e1 / t21 / t4662;
1498   t7148 = t2448 * t7146 * t6947;
1499   t7151 = t2454 * t7146 * t6947;
1500   t7154 = t6953 * t7146 * t2461;
1501   t7157 = t220 * t7146 * t6947;
1502   t7159 = -0.10372043043679588040e-4 * t7148 + 0.25113094921099209163e-4 * t7151 - 0.54841825331504343849e-3 * t7154 - 0.28150260283386072598e-5 * t7157;
1503   t7167 = t1704 * t118;
1504   t7177 = -0.24056046973484009303e4 * t2525 * t2885 * t7116 - 0.22865171141851851357e2 * t270 * t379 * t4818 - 0.34297756712777777035e2 * t751 * t465 * t1964 + 0.20977047095244633367e3 * t2540 * t1732 * t2345 - 0.37384865155641509919e1 * t859 * t495 * t5013 + 0.11432585570925925678e2 * t2586 * t1718 * t617 + 0.15934382750320792050e0 * t855 * t365 * t4818 + 0.31465570642866950052e3 * t772 * t991 * t7138 - 0.22865171141851851357e2 * t270 * t5030 * t506 + 0.16615495624729559964e1 * t106 * t57 * t7159 * t118 + 0.70819478890314631335e-1 * t50 * t101 * t7159 + 0.24923243437094339947e1 * t2765 * t7167 * t162 - 0.37384865155641509919e1 * t859 * t1782 * t484 - 0.22865171141851851357e2 * t270 * t1283 * t450;
1505   t7220 = 0.6e1 * t48 * t1240 * t469 + 0.6e1 * t48 * t4862 * t148 + 0.2e1 * t48 * t361 * t1740 - 0.18e2 * t48 * t3697 * t446 + 0.12e2 * t139 * t1773 + 0.6e1 * t139 * t1776 - 0.3e1 * t1758 * t149 - t163 * t1741 + 0.6e1 * t442 * t489 - 0.3e1 * t442 * t511 - 0.3e1 * t485 * t470;
1506   if(v4rho4 != NULL && (p->info->flags & XC_FLAGS_NEEDS_LAPLACIAN) && (p->info->flags & XC_FLAGS_HAVE_LXC))
1507     v4sigma3lapl[0] = -0.3e1 / 0.16e2 * t76 * t77 * (0.6e1 * t163 * t1701 - 0.6e1 * t163 * t1698 + 0.6e1 * t485 * t447 - t48 * t99 * (t7115 + t7177) - 0.18e2 * t139 * t1770 - 0.18e2 * t1228 * t1229 * t469 + 0.24e2 * t48 * t3027 * t1697 + t19 * t7159 * t67 - 0.3e1 * t139 * t1824 - t1689 * t173 + t7220);
1508 
1509   t7257 = 0.41488172174718352159e-4 * t7148 - 0.10045237968439683665e-3 * t7151 + 0.21936730132601737540e-2 * t7154 + 0.11260104113354429039e-4 * t7157;
1510   t7301 = 0.16615495624729559964e1 * t106 * t57 * t7257 * t118 + 0.70819478890314631335e-1 * t50 * t101 * t7257 + 0.31465570642866950052e3 * t772 * t1079 * t7138 - 0.76217237139506171188e1 * t270 * t419 * t7105 - 0.34297756712777777035e2 * t751 * t465 * t2124 + 0.15934382750320792050e0 * t855 * t405 * t4818 - 0.37384865155641509919e1 * t859 * t495 * t5142 + 0.11432585570925925678e2 * t2586 * t1718 * t1061 - 0.24056046973484009303e4 * t2525 * t3078 * t7116 - 0.22865171141851851357e2 * t270 * t419 * t4818 - 0.22865171141851851357e2 * t270 * t5178 * t506 - 0.22865171141851851357e2 * t270 * t1380 * t1819 + 0.31465570642866950052e3 * t772 * t3849 * t1812 + 0.20977047095244633367e3 * t2540 * t1732 * t3068;
1511   t7342 = 0.31465570642866950052e3 * t1388 * t7102 - 0.34297756712777777034e2 * t4930 * t540 + 0.49846486874188679892e1 * t321 * t495 * t1833 - 0.35409739445157315668e-1 * t316 * t405 * t1688 + 0.16615495624729559964e1 * t321 * t7081 * t181 + 0.24923243437094339947e1 * t2765 * t7167 * t181 - 0.37384865155641509919e1 * t859 * t1782 * t519 - 0.10622921833547194700e0 * t316 * t5228 * t138 - 0.10622921833547194700e0 * t316 * t1366 * t441 + 0.15934382750320792050e0 * t855 * t1366 * t450 - 0.15243447427901234237e2 * t751 * t1718 * t181 - 0.13278652291933993376e0 * t2748 * t405 * t1704 + 0.49846486874188679892e1 * t321 * t1792 * t519 - 0.22865171141851851357e2 * t270 * t1380 * t450;
1512   t7363 = -0.18e2 * t48 * t3787 * t446 - t48 * t99 * (t7301 + t7342) + 0.6e1 * t139 * t1852 + 0.12e2 * t139 * t1849 + 0.6e1 * t442 * t524 - 0.6e1 * t182 * t1698 + 0.6e1 * t182 * t1701 - 0.3e1 * t139 * t1896 - t1689 * t192 - 0.3e1 * t442 * t544 + t19 * t7257 * t67;
1513   if(v4rho4 != NULL && (p->info->flags & XC_FLAGS_HAVE_LXC))
1514     v4sigma3tau[0] = -0.3e1 / 0.16e2 * t76 * t77 * (-0.18e2 * t1228 * t1330 * t469 + 0.6e1 * t48 * t1341 * t469 + 0.6e1 * t48 * t5312 * t148 + 0.24e2 * t48 * t3202 * t1697 + 0.2e1 * t48 * t401 * t1740 - 0.18e2 * t139 * t1846 - 0.3e1 * t1834 * t149 - t182 * t1741 + 0.6e1 * t520 * t447 - 0.3e1 * t520 * t470 + t7363);
1515 
1516   t7382 = t510 * t510;
1517   t7400 = -0.6e1 * t48 * t1432 * t469 + 0.2e1 * t48 * t1440 * t469 + 0.4e1 * t48 * t361 * t1823 + 0.4e1 * t48 * t242 * t7382 + 0.24e2 * t48 * t4152 * t446 - 0.6e1 * t48 * t4162 * t446 - 0.12e2 * t163 * t1770 + 0.4e1 * t163 * t1776 - 0.2e1 * t163 * t1824 - 0.2e1 * t1758 * t173 + 0.2e1 * t442 * t564 - t559 * t470 - 0.4e1 * t485 * t511;
1518   t7419 = 0.1e1 / t21 / t1678;
1519   t7421 = t2448 * t7419 * t6947;
1520   t7424 = t2454 * t7419 * t6947;
1521   t7427 = t6953 * t7419 * t2461;
1522   t7430 = t220 * t7419 * t6947;
1523   t7432 = -0.20744086087359176081e-4 * t7421 + 0.50226189842198418326e-4 * t7424 - 0.10968365066300868770e-2 * t7427 - 0.56300520566772145196e-5 * t7430;
1524   t7436 = t484 * t484;
1525   t7463 = t58 * t1757;
1526   t7482 = t113 * t441;
1527   t7486 = t2531 * t450;
1528   t7493 = 0.70819478890314631335e-1 * t50 * t101 * t7432 - 0.70819478890314631336e-1 * t50 * t249 * t7436 + 0.33230991249459119928e1 * t254 * t57 * t7436 * t118 + 0.16615495624729559964e1 * t106 * t57 * t7432 * t118 - 0.11432585570925925678e2 * t751 * t582 * t1819 - 0.49846486874188679892e1 * t859 * t495 * t5431 + 0.11432585570925925678e2 * t2586 * t465 * t4103 + 0.21245843667094389400e0 * t855 * t365 * t4989 - 0.30486894855802468476e2 * t270 * t379 * t4989 - 0.15243447427901234238e2 * t270 * t379 * t7463 - 0.11432585570925925678e2 * t751 * t465 * t2274 - 0.15243447427901234238e2 * t270 * t5466 * t506 - 0.76217237139506171188e1 * t270 * t1474 * t1819 + 0.20977047095244633367e3 * t2540 * t1482 * t1812 + 0.31465570642866950052e3 * t772 * t1482 * t3298 + 0.10488523547622316684e3 * t772 * t1482 * t7482 - 0.24056046973484009303e4 * t2525 * t4000 * t7486 + 0.10488523547622316684e3 * t772 * t4011 * t1812;
1529   t7543 = t1292 * t4989;
1530   t7548 = -0.70819478890314631336e-1 * t316 * t365 * t1757 + 0.33230991249459119928e1 * t321 * t606 * t1757 + 0.53114609167735973502e-1 * t855 * t1444 * t441 + 0.24923243437094339947e1 * t2765 * t1782 * t567 - 0.12461621718547169973e1 * t859 * t1792 * t567 - 0.13278652291933993376e0 * t2748 * t1444 * t450 - 0.76217237139506171188e1 * t270 * t582 * t441 + 0.16615495624729559964e1 * t321 * t1792 * t558 + 0.33230991249459119928e1 * t321 * t495 * t1911 - 0.70819478890314631336e-1 * t316 * t5497 * t138 - 0.35409739445157315668e-1 * t316 * t1460 * t441 - 0.12461621718547169973e1 * t859 * t1782 * t558 - 0.76217237139506171188e1 * t270 * t1474 * t450 + 0.53114609167735973502e-1 * t855 * t1460 * t450 - 0.15243447427901234237e2 * t751 * t582 * t450 - 0.15243447427901234238e2 * t270 * t7436 * t272 * t58 + 0.41954094190489266736e3 * t1291 * t7543 - 0.45730342283703702713e2 * t1551 * t1809;
1531   t7560 = 0.4e1 * t139 * t1930 + 0.4e1 * t48 * t5369 * t148 - 0.12e2 * t139 * t1923 + 0.8e1 * t139 * t1926 + 0.2e1 * t559 * t447 - 0.2e1 * t139 * t1976 - 0.24e2 * t1228 * t1229 * t510 - t442 * t587 - t48 * t99 * (t7493 + t7548) + 0.8e1 * t163 * t1773 + 0.8e1 * t485 * t489 - 0.2e1 * t1912 * t149 + t19 * t7432 * t67;
1532   if(v4rho4 != NULL && (p->info->flags & XC_FLAGS_NEEDS_LAPLACIAN) && (p->info->flags & XC_FLAGS_HAVE_LXC))
1533     v4sigma2lapl2[0] = -0.3e1 / 0.16e2 * t76 * t77 * (t7400 + t7560);
1534 
1535   t7573 = 0.82976344349436704322e-4 * t7421 - 0.20090475936879367330e-3 * t7424 + 0.43873460265203475080e-2 * t7427 + 0.22520208226708858078e-4 * t7430;
1536   t7608 = -0.2e1 * t520 * t511 - 0.2e1 * t139 * t2062 + t19 * t7573 * t67 - t1758 * t192 - t442 * t622 - t163 * t1896 + 0.2e1 * t596 * t447 - 0.2e1 * t485 * t544 - t182 * t1824 + 0.24e2 * t3517 * t1517 * t446 - 0.12e2 * t4890 * t1999 - 0.6e1 * t1228 * t1517 * t469 - 0.12e2 * t1228 * t5617 * t148 - 0.12e2 * t1228 * t5625 * t148 + 0.2e1 * t48 * t401 * t1823 + 0.4e1 * t520 * t489 + 0.4e1 * t48 * t5648 * t148 + 0.4e1 * t139 * t2009;
1537   t7649 = -0.15243447427901234237e2 * t751 * t379 * t5159 - 0.13278652291933993376e0 * t2748 * t405 * t4979 + 0.53114609167735973502e-1 * t855 * t405 * t5013 + 0.24923243437094339947e1 * t2765 * t1782 * t1536 - 0.12461621718547169973e1 * t859 * t1792 * t1536 - 0.24923243437094339946e1 * t859 * t495 * t5715 - 0.24923243437094339946e1 * t859 * t495 * t5705 + 0.10622921833547194700e0 * t855 * t1366 * t1248 + 0.10622921833547194700e0 * t855 * t405 * t4989 - 0.76217237139506171188e1 * t270 * t419 * t7463 - 0.76217237139506171188e1 * t270 * t419 * t5013;
1538   t7682 = -0.76217237139506171188e1 * t270 * t1571 * t1819 + 0.10488523547622316684e3 * t772 * t4421 * t1812 - 0.76217237139506171188e1 * t270 * t5178 * t617 - 0.15243447427901234238e2 * t270 * t1380 * t1248 - 0.15243447427901234238e2 * t270 * t1380 * t1964 - 0.11432585570925925678e2 * t751 * t465 * t2341 - 0.15243447427901234238e2 * t270 * t5722 * t506 - 0.15243447427901234238e2 * t270 * t419 * t4989 + 0.20977047095244633368e3 * t1388 * t7543 + 0.10488523547622316684e3 * t1388 * t1292 * t5013 - 0.24056046973484009303e4 * t3875 * t3629 * t4979;
1539   t7711 = 0.20977047095244633368e3 * t5113 * t2052 + 0.20977047095244633367e3 * t4324 * t1886 - 0.22865171141851851356e2 * t5764 * t540 - 0.22865171141851851356e2 * t1551 * t1883 - 0.11432585570925925678e2 * t1551 * t1892 + 0.11432585570925925678e2 * t4936 * t618 + 0.33230991249459119928e1 * t321 * t2024 * t519 - 0.35409739445157315668e-1 * t316 * t5228 * t162 - 0.70819478890314631336e-1 * t316 * t1366 * t484 - 0.70819478890314631336e-1 * t316 * t5832 * t138 - 0.35409739445157315668e-1 * t316 * t1557 * t441;
1540   t7747 = -0.12461621718547169973e1 * t859 * t1782 * t595 + 0.16615495624729559964e1 * t321 * t1792 * t595 + 0.33230991249459119928e1 * t321 * t495 * t1985 + 0.16615495624729559964e1 * t321 * t606 * t1833 - 0.35409739445157315668e-1 * t316 * t405 * t1757 + 0.16615495624729559964e1 * t321 * t1757 * t118 * t181 - 0.76217237139506171188e1 * t270 * t1571 * t450 + 0.53114609167735973502e-1 * t855 * t1557 * t450 + 0.70819478890314631335e-1 * t50 * t101 * t7573 + 0.16615495624729559964e1 * t106 * t57 * t7573 * t118 + 0.31465570642866950052e3 * t1388 * t3650 * t4979;
1541   t7781 = 0.2e1 * t48 * t5312 * t172 + 0.2e1 * t182 * t1776 + 0.4e1 * t182 * t1773 - t48 * t99 * (t7649 + t7682 + t7711 + t7747) + 0.4e1 * t48 * t1341 * t510 + 0.2e1 * t48 * t1528 * t469 + 0.4e1 * t485 * t524 - 0.6e1 * t48 * t4226 * t446 + 0.2e1 * t163 * t1852 + 0.4e1 * t163 * t1849 + 0.4e1 * t139 * t2005 + 0.4e1 * t139 * t2002 + 0.2e1 * t442 * t600 - 0.6e1 * t163 * t1846 - 0.6e1 * t182 * t1770 - 0.2e1 * t1986 * t149 - t596 * t470 - t1834 * t173;
1542   if(v4rho4 != NULL && (p->info->flags & XC_FLAGS_NEEDS_LAPLACIAN) && (p->info->flags & XC_FLAGS_HAVE_LXC))
1543     v4sigma2lapltau[0] = -0.3e1 / 0.16e2 * t76 * t77 * (t7608 + t7781);
1544 
1545   t7807 = -0.33190537739774681729e-3 * t7421 + 0.80361903747517469323e-3 * t7424 - 0.17549384106081390033e-1 * t7427 - 0.90080832906835432312e-4 * t7430;
1546   t7810 = t543 * t543;
1547   t7857 = t519 * t519;
1548   t7871 = -0.11432585570925925678e2 * t751 * t654 * t1819 + 0.20977047095244633367e3 * t2540 * t1664 * t1812 - 0.49846486874188679892e1 * t859 * t495 * t6044 + 0.11432585570925925678e2 * t2586 * t465 * t4513 + 0.31465570642866950052e3 * t772 * t1664 * t3298 - 0.15243447427901234238e2 * t270 * t419 * t58 * t1833 + 0.10488523547622316684e3 * t772 * t1664 * t7482 - 0.24056046973484009303e4 * t2525 * t4524 * t7486 - 0.76217237139506171188e1 * t270 * t1656 * t1819 + 0.10488523547622316684e3 * t772 * t4621 * t1812 - 0.30486894855802468476e2 * t270 * t419 * t5149 - 0.11432585570925925678e2 * t751 * t465 * t4604 - 0.15243447427901234238e2 * t270 * t5963 * t506 + 0.21245843667094389400e0 * t855 * t405 * t5149 - 0.15243447427901234238e2 * t270 * t7857 * t272 * t58 - 0.15243447427901234237e2 * t751 * t654 * t450 + 0.53114609167735973502e-1 * t855 * t1642 * t450 + 0.33230991249459119928e1 * t321 * t1635 * t1833;
1549   t7927 = -0.13278652291933993376e0 * t2748 * t1625 * t450 + 0.24923243437094339947e1 * t2765 * t1782 * t639 - 0.12461621718547169973e1 * t859 * t1792 * t639 - 0.70819478890314631336e-1 * t316 * t405 * t1833 + 0.53114609167735973502e-1 * t855 * t1625 * t441 - 0.76217237139506171188e1 * t270 * t1656 * t450 - 0.76217237139506171188e1 * t270 * t654 * t441 - 0.70819478890314631336e-1 * t316 * t5933 * t138 - 0.35409739445157315668e-1 * t316 * t1642 * t441 - 0.12461621718547169973e1 * t859 * t1782 * t630 + 0.16615495624729559964e1 * t321 * t1792 * t630 + 0.33230991249459119928e1 * t321 * t495 * t2071 + 0.70819478890314631335e-1 * t50 * t101 * t7807 + 0.16615495624729559964e1 * t106 * t57 * t7807 * t118 + 0.33230991249459119928e1 * t254 * t57 * t7857 * t118 - 0.70819478890314631336e-1 * t50 * t249 * t7857 + 0.41954094190489266736e3 * t1388 * t1292 * t5149 - 0.45730342283703702713e2 * t4590 * t1883;
1550   t7933 = -0.2e1 * t2072 * t149 - t631 * t470 - 0.4e1 * t520 * t544 - 0.2e1 * t1834 * t192 - 0.2e1 * t182 * t1896 + 0.2e1 * t442 * t636 - t442 * t659 - 0.2e1 * t139 * t2135 - 0.24e2 * t1228 * t1330 * t543 + t19 * t7807 * t67 + 0.4e1 * t48 * t242 * t7810 - t48 * t99 * (t7871 + t7927) + 0.8e1 * t139 * t2086;
1551   t7966 = 0.4e1 * t48 * t5905 * t148 - 0.6e1 * t48 * t1613 * t469 + 0.2e1 * t48 * t1621 * t469 + 0.4e1 * t48 * t401 * t1895 - 0.6e1 * t48 * t4480 * t446 + 0.24e2 * t48 * t4484 * t446 - 0.12e2 * t139 * t2083 + 0.4e1 * t139 * t2090 - 0.12e2 * t182 * t1846 + 0.8e1 * t182 * t1849 + 0.4e1 * t182 * t1852 + 0.2e1 * t631 * t447 + 0.8e1 * t520 * t524;
1552   if(v4rho4 != NULL && (p->info->flags & XC_FLAGS_HAVE_LXC))
1553     v4sigma2tau2[0] = -0.3e1 / 0.16e2 * t76 * t77 * (t7933 + t7966);
1554 
1555   t7972 = 0.1e1 / t21 / t1747;
1556   t7974 = t2448 * t7972 * t6947;
1557   t7977 = t2454 * t7972 * t6947;
1558   t7980 = t6953 * t7972 * t2461;
1559   t7983 = t220 * t7972 * t6947;
1560   t7985 = -0.41488172174718352159e-4 * t7974 + 0.10045237968439683665e-3 * t7977 - 0.21936730132601737540e-2 * t7980 - 0.11260104113354429039e-4 * t7983;
1561   t8046 = t113 * t484;
1562   t8059 = t2531 * t138;
1563   t8075 = 0.11432585570925925678e2 * t2586 * t2180 * t506 + 0.15934382750320792050e0 * t855 * t365 * t5427 - 0.37384865155641509919e1 * t859 * t495 * t6211 - 0.22865171141851851357e2 * t270 * t1474 * t1248 - 0.22865171141851851357e2 * t270 * t1474 * t1964 + 0.31465570642866950052e3 * t772 * t1482 * t8046 - 0.34297756712777777034e2 * t751 * t582 * t1964 + 0.20977047095244633367e3 * t2540 * t2194 * t1968 + 0.31465570642866950052e3 * t772 * t2194 * t506 - 0.24056046973484009303e4 * t2525 * t6225 * t8059 - 0.76217237139506171188e1 * t270 * t6235 * t506 - 0.22865171141851851357e2 * t270 * t5466 * t617 + 0.16615495624729559964e1 * t321 * t495 * t2150 - 0.10622921833547194700e0 * t316 * t365 * t1911;
1564   t8117 = 0.49846486874188679892e1 * t321 * t2024 * t558 + 0.49846486874188679892e1 * t321 * t606 * t1911 - 0.13278652291933993376e0 * t2748 * t6290 * t138 + 0.15934382750320792051e0 * t855 * t1444 * t484 + 0.24923243437094339947e1 * t2765 * t495 * t2166 - 0.37384865155641509919e1 * t859 * t2237 * t484 - 0.10622921833547194700e0 * t316 * t1269 * t558 - 0.22865171141851851356e2 * t270 * t582 * t484 - 0.15243447427901234237e2 * t751 * t2180 * t138 - 0.35409739445157315668e-1 * t316 * t6286 * t138 + 0.16615495624729559964e1 * t106 * t57 * t7985 * t118 + 0.70819478890314631335e-1 * t50 * t101 * t7985 + 0.31465570642866950052e3 * t5551 * t2052 - 0.34297756712777777034e2 * t1551 * t1961;
1565   t8121 = -0.3e1 * t163 * t1976 - 0.6e1 * t139 * t2160 + 0.24e2 * t48 * t6179 * t148 - 0.18e2 * t48 * t1432 * t510 + 0.6e1 * t139 * t2163 - 0.18e2 * t1228 * t6188 * t148 + 0.6e1 * t48 * t1240 * t586 + 0.6e1 * t48 * t361 * t1975 - t139 * t2203 + 0.2e1 * t48 * t6199 * t148 - t48 * t99 * (t8075 + t8117);
1566   if(v4rho4 != NULL && (p->info->flags & XC_FLAGS_NEEDS_LAPLACIAN) && (p->info->flags & XC_FLAGS_HAVE_LXC))
1567     v4sigmalapl3[0] = -0.3e1 / 0.16e2 * t76 * t77 * (t19 * t7985 * t67 - t2151 * t149 - 0.18e2 * t163 * t1923 + 0.12e2 * t163 * t1926 + 0.6e1 * t163 * t1930 - 0.3e1 * t1912 * t173 + 0.6e1 * t485 * t564 - 0.3e1 * t485 * t587 + 0.6e1 * t559 * t489 - 0.3e1 * t559 * t511 + t8121);
1568 
1569   t8164 = -t520 * t587 - 0.2e1 * t596 * t511 - t1912 * t192 - 0.12e2 * t1228 * t1517 * t510 + 0.24e2 * t3517 * t6349 * t148 - t139 * t2279 - 0.6e1 * t1228 * t6368 * t148 - 0.12e2 * t1228 * t6345 * t148 - 0.12e2 * t5385 * t1999 - t559 * t544 - 0.2e1 * t163 * t2062 + 0.2e1 * t520 * t564 + 0.4e1 * t163 * t2002 + 0.4e1 * t163 * t2005 - 0.6e1 * t48 * t3787 * t563 - 0.6e1 * t139 * t2225 + 0.4e1 * t163 * t2009 + 0.4e1 * t48 * t5648 * t172;
1570   t8197 = 0.16595268869887340864e-3 * t7974 - 0.40180951873758734661e-3 * t7977 + 0.87746920530406950160e-2 * t7980 + 0.45040416453417716157e-4 * t7983;
1571   t8239 = -0.24923243437094339946e1 * t859 * t606 * t5705 + 0.10622921833547194700e0 * t855 * t1557 * t1248 - 0.13278652291933993376e0 * t2748 * t405 * t5435 - 0.15243447427901234238e2 * t270 * t1571 * t1964 + 0.10488523547622316684e3 * t772 * t3849 * t2267 - 0.11432585570925925678e2 * t751 * t582 * t2124 - 0.15243447427901234237e2 * t751 * t582 * t1348 - 0.12461621718547169973e1 * t859 * t495 * t6496 - 0.24923243437094339946e1 * t859 * t495 * t6488 + 0.53114609167735973502e-1 * t855 * t405 * t5427 + 0.10622921833547194700e0 * t855 * t405 * t5431;
1572   t8274 = 0.24923243437094339947e1 * t2765 * t495 * t6465 - 0.76217237139506171188e1 * t270 * t419 * t5427 - 0.76217237139506171188e1 * t270 * t419 * t58 * t1911 - 0.15243447427901234238e2 * t270 * t419 * t5431 - 0.76217237139506171188e1 * t270 * t1380 * t2274 - 0.76217237139506171188e1 * t270 * t6475 * t506 - 0.15243447427901234238e2 * t270 * t5722 * t617 - 0.15243447427901234238e2 * t270 * t1571 * t1248 + 0.53114609167735973502e-1 * t855 * t1366 * t567 - 0.12461621718547169973e1 * t859 * t2237 * t519 + 0.33230991249459119928e1 * t321 * t2024 * t595;
1573   t8311 = 0.33230991249459119928e1 * t321 * t606 * t1985 - 0.35409739445157315668e-1 * t316 * t6416 * t138 + 0.16615495624729559964e1 * t321 * t495 * t2212 + 0.16615495624729559964e1 * t321 * t1911 * t118 * t181 + 0.16615495624729559964e1 * t321 * t2247 * t519 - 0.70819478890314631336e-1 * t316 * t5832 * t162 - 0.70819478890314631336e-1 * t316 * t1557 * t484 - 0.35409739445157315668e-1 * t316 * t1366 * t558 - 0.35409739445157315668e-1 * t316 * t405 * t1911 - 0.76217237139506171188e1 * t270 * t1380 * t567 + 0.16615495624729559964e1 * t106 * t57 * t8197 * t118;
1574   t8327 = t1079 * t1968;
1575   t8340 = 0.70819478890314631335e-1 * t50 * t101 * t8197 + 0.10488523547622316684e3 * t1388 * t1292 * t5427 + 0.31465570642866950052e3 * t1388 * t3650 * t5435 + 0.20977047095244633368e3 * t1388 * t1292 * t5431 - 0.24056046973484009303e4 * t3875 * t3629 * t5435 + 0.20977047095244633367e3 * t5558 * t8327 - 0.22865171141851851357e2 * t1551 * t2046 + 0.20977047095244633368e3 * t5792 * t2052 - 0.11432585570925925678e2 * t6521 * t540 - 0.22865171141851851356e2 * t1551 * t2058 + 0.11432585570925925678e2 * t6517 * t540;
1576   t8345 = 0.4e1 * t48 * t1528 * t510 + 0.4e1 * t139 * t2228 + 0.2e1 * t48 * t1341 * t586 + 0.2e1 * t139 * t2231 + 0.4e1 * t596 * t489 + 0.2e1 * t48 * t401 * t1975 + 0.2e1 * t182 * t1930 - 0.6e1 * t182 * t1923 + 0.4e1 * t182 * t1926 + 0.2e1 * t48 * t6308 * t148 + 0.4e1 * t485 * t600 + 0.2e1 * t559 * t524 + t19 * t8197 * t67 - t2213 * t149 - 0.2e1 * t1986 * t173 - t182 * t1976 - 0.2e1 * t485 * t622 - t48 * t99 * (t8239 + t8274 + t8311 + t8340);
1577   if(v4rho4 != NULL && (p->info->flags & XC_FLAGS_NEEDS_LAPLACIAN) && (p->info->flags & XC_FLAGS_HAVE_LXC))
1578     v4sigmalapl2tau[0] = -0.3e1 / 0.16e2 * t76 * t77 * (t8164 + t8345);
1579 
1580   t8356 = -0.66381075479549363459e-3 * t7974 + 0.16072380749503493864e-2 * t7977 - 0.35098768212162780065e-1 * t7980 - 0.18016166581367086463e-3 * t7983;
1581   t8395 = 0.2e1 * t485 * t636 + t19 * t8356 * t67 + 0.24e2 * t3517 * t6552 * t148 - 0.12e2 * t1228 * t1517 * t543 - 0.6e1 * t1228 * t6556 * t148 - 0.12e2 * t1228 * t6548 * t148 - 0.12e2 * t5606 * t1999 - t2072 * t173 - t631 * t511 - t485 * t659 - t163 * t2135 + 0.4e1 * t48 * t1341 * t621 + 0.4e1 * t139 * t2303 + 0.4e1 * t48 * t401 * t2061 + 0.2e1 * t48 * t5905 * t172 + 0.2e1 * t163 * t2090 + 0.2e1 * t48 * t1621 * t510 + 0.2e1 * t139 * t2307;
1582   t8454 = 0.53114609167735973502e-1 * t855 * t1642 * t1248 - 0.24923243437094339946e1 * t859 * t495 * t6654 - 0.24923243437094339946e1 * t859 * t606 * t6044 + 0.10622921833547194700e0 * t855 * t405 * t5701 - 0.13278652291933993376e0 * t2748 * t1625 * t1248 + 0.10622921833547194700e0 * t855 * t405 * t5715 + 0.24923243437094339947e1 * t2765 * t495 * t6597 - 0.15243447427901234238e2 * t270 * t419 * t58 * t1985 + 0.10488523547622316684e3 * t772 * t1664 * t8046 - 0.76217237139506171188e1 * t270 * t6634 * t506 - 0.76217237139506171188e1 * t270 * t5963 * t617;
1583   t8488 = -0.76217237139506171188e1 * t270 * t1656 * t1248 - 0.76217237139506171188e1 * t270 * t1656 * t1964 - 0.15243447427901234238e2 * t270 * t1380 * t2341 - 0.12461621718547169973e1 * t859 * t495 * t6650 - 0.15243447427901234237e2 * t751 * t654 * t1248 - 0.11432585570925925678e2 * t751 * t654 * t1964 + 0.33230991249459119928e1 * t321 * t1635 * t1985 + 0.53114609167735973502e-1 * t855 * t1625 * t484 - 0.12461621718547169973e1 * t859 * t2024 * t639 - 0.76217237139506171188e1 * t270 * t654 * t484 + 0.16615495624729559964e1 * t321 * t606 * t2071;
1584   t8511 = t519 * t118;
1585   t8525 = -0.35409739445157315668e-1 * t316 * t6690 * t138 + 0.16615495624729559964e1 * t321 * t495 * t2288 - 0.35409739445157315668e-1 * t316 * t5933 * t162 - 0.35409739445157315668e-1 * t316 * t1642 * t484 + 0.16615495624729559964e1 * t321 * t2024 * t630 - 0.70819478890314631336e-1 * t316 * t1366 * t595 - 0.70819478890314631336e-1 * t316 * t405 * t1985 + 0.33230991249459119928e1 * t321 * t8511 * t595 + 0.70819478890314631335e-1 * t50 * t101 * t8356 + 0.16615495624729559964e1 * t106 * t57 * t8356 * t118 - 0.15243447427901234238e2 * t270 * t419 * t5715;
1586   t8553 = -0.15243447427901234238e2 * t270 * t419 * t5701 + 0.10488523547622316684e3 * t6015 * t2052 + 0.20977047095244633368e3 * t1388 * t1292 * t5701 + 0.20977047095244633368e3 * t1388 * t1292 * t5715 + 0.20977047095244633367e3 * t6009 * t2052 - 0.11432585570925925678e2 * t1551 * t2121 - 0.22865171141851851357e2 * t4590 * t2046 - 0.22865171141851851356e2 * t4590 * t2049 + 0.11432585570925925678e2 * t6723 * t2105 + 0.31465570642866950052e3 * t6025 * t3650 * t1248 - 0.24056046973484009303e4 * t6029 * t3629 * t1248;
1587   t8568 = 0.2e1 * t48 * t6768 * t148 + 0.4e1 * t182 * t2002 + 0.4e1 * t596 * t524 + 0.2e1 * t631 * t489 + 0.4e1 * t182 * t2009 + 0.4e1 * t182 * t2005 + 0.4e1 * t520 * t600 - 0.6e1 * t139 * t2300 - 0.6e1 * t163 * t2083 + 0.4e1 * t163 * t2086 - 0.6e1 * t48 * t1613 * t510 - t48 * t99 * (t8454 + t8488 + t8525 + t8553) - t2289 * t149 - 0.2e1 * t596 * t544 - 0.2e1 * t520 * t622 - t139 * t2353 - 0.2e1 * t182 * t2062 - 0.2e1 * t1986 * t192;
1588   if(v4rho4 != NULL && (p->info->flags & XC_FLAGS_NEEDS_LAPLACIAN) && (p->info->flags & XC_FLAGS_HAVE_LXC))
1589     v4sigmalapltau2[0] = -0.3e1 / 0.16e2 * t76 * t77 * (t8395 + t8568);
1590 
1591   t8577 = 0.26552430191819745384e-2 * t7974 - 0.64289522998013975459e-2 * t7977 + 0.14039507284865112026e0 * t7980 + 0.72064666325468345854e-3 * t7983;
1592   t8666 = -0.37384865155641509919e1 * t859 * t495 * t6891 + 0.11432585570925925678e2 * t2586 * t2392 * t506 + 0.15934382750320792050e0 * t855 * t405 * t5983 + 0.31465570642866950052e3 * t772 * t1664 * t113 * t519 + 0.31465570642866950052e3 * t772 * t2406 * t506 - 0.24056046973484009303e4 * t2525 * t6909 * t8059 - 0.76217237139506171188e1 * t270 * t6919 * t506 - 0.22865171141851851357e2 * t270 * t5963 * t1061 - 0.22865171141851851357e2 * t270 * t1656 * t1348 - 0.22865171141851851357e2 * t270 * t1656 * t2124 - 0.34297756712777777034e2 * t751 * t654 * t2124 + 0.20977047095244633367e3 * t2540 * t2406 * t1968 + 0.24923243437094339947e1 * t2765 * t495 * t2378 - 0.37384865155641509919e1 * t859 * t6873 * t519;
1593   t8708 = -0.22865171141851851356e2 * t270 * t654 * t519 - 0.15243447427901234237e2 * t751 * t2392 * t138 - 0.35409739445157315668e-1 * t316 * t6859 * t138 + 0.16615495624729559964e1 * t321 * t495 * t2362 - 0.10622921833547194700e0 * t316 * t1366 * t630 - 0.10622921833547194700e0 * t316 * t405 * t2071 + 0.49846486874188679892e1 * t321 * t8511 * t630 + 0.49846486874188679892e1 * t321 * t1635 * t2071 - 0.13278652291933993376e0 * t2748 * t6863 * t138 + 0.15934382750320792051e0 * t855 * t1625 * t519 + 0.16615495624729559964e1 * t106 * t57 * t8577 * t118 + 0.70819478890314631335e-1 * t50 * t101 * t8577 - 0.34297756712777777034e2 * t4590 * t2121 + 0.31465570642866950052e3 * t6015 * t8327;
1594   t8712 = -0.3e1 * t182 * t2135 - 0.6e1 * t139 * t2372 + 0.24e2 * t48 * t6817 * t148 - 0.18e2 * t48 * t1613 * t543 + 0.6e1 * t139 * t2375 - 0.18e2 * t1228 * t6826 * t148 + 0.6e1 * t48 * t1341 * t658 + 0.6e1 * t48 * t401 * t2134 - t139 * t2415 + 0.2e1 * t48 * t6837 * t148 - t48 * t99 * (t8666 + t8708);
1595   if(v4rho4 != NULL && (p->info->flags & XC_FLAGS_HAVE_LXC))
1596     v4sigmatau3[0] = -0.3e1 / 0.16e2 * t76 * t77 * (t19 * t8577 * t67 - t2363 * t149 - 0.18e2 * t182 * t2083 + 0.12e2 * t182 * t2086 + 0.6e1 * t182 * t2090 - 0.3e1 * t2072 * t192 + 0.6e1 * t520 * t636 - 0.3e1 * t520 * t659 + 0.6e1 * t631 * t524 - 0.3e1 * t631 * t544 + t8712);
1597 
1598   t8718 = t2448 * t2435 * t6947;
1599   t8721 = t2454 * t2435 * t6947;
1600   t8724 = t6953 * t2435 * t2461;
1601   t8727 = t220 * t2435 * t6947;
1602   t8729 = -0.82976344349436704319e-4 * t8718 + 0.20090475936879367329e-3 * t8721 - 0.43873460265203475079e-2 * t8724 - 0.22520208226708858078e-4 * t8727;
1603   t8744 = t563 * t563;
1604   t8751 = t586 * t586;
1605   t8758 = t567 * t567;
1606   t8759 = t8758 * t775;
1607   t8769 = t558 * t558;
1608   t8828 = 0.31465570642866950052e3 * t772 * t8759 * t58 - 0.30486894855802468476e2 * t270 * t6235 * t617 - 0.45730342283703702713e2 * t270 * t1474 * t567 - 0.22865171141851851357e2 * t270 * t8769 * t272 * t58 + 0.62931141285733900104e3 * t772 * t4011 * t2267 - 0.68595513425555554068e2 * t751 * t582 * t2274 + 0.16615495624729559964e1 * t106 * t57 * t8729 * t118 + 0.70819478890314631335e-1 * t50 * t101 * t8729 + 0.24923243437094339947e1 * t2552 * t57 * t8758 * t118 - 0.24056046973484009303e4 * t2525 * t8758 * t2529 * t2531 - 0.15243447427901234237e2 * t750 * t269 * t8758 * t272 + 0.20977047095244633367e3 * t2540 * t8759 * t113 - 0.14163895778062926267e0 * t316 * t365 * t2150 + 0.49846486874188679892e1 * t254 * t57 * t8769 * t118 + 0.66461982498918239856e1 * t321 * t606 * t2150 + 0.31868765500641584101e0 * t855 * t1444 * t558 - 0.74769730311283019838e1 * t859 * t2237 * t558 + 0.11432585570925925678e2 * t2586 * t8758 * t272 * t58 - 0.10622921833547194700e0 * t50 * t249 * t8769 - 0.13278652291933993376e0 * t50 * t2574 * t8758;
1609   t8831 = -0.36e2 * t48 * t1432 * t586 + t19 * t8729 * t67 + 0.8e1 * t48 * t361 * t2202 + 0.6e1 * t48 * t242 * t8751 + 0.24e2 * t48 * t2504 * t8744 - t48 * t99 * t8828 - 0.24e2 * t163 * t2160 + 0.24e2 * t163 * t2163 - 0.4e1 * t163 * t2203 - 0.4e1 * t2151 * t173 + 0.12e2 * t559 * t564 - 0.6e1 * t559 * t587;
1610   if(v4rho4 != NULL && (p->info->flags & XC_FLAGS_NEEDS_LAPLACIAN) && (p->info->flags & XC_FLAGS_HAVE_LXC))
1611     v4lapl4[0] = -0.3e1 / 0.16e2 * t76 * t77 * t8831;
1612 
1613   t8841 = 0.33190537739774681729e-3 * t8718 - 0.80361903747517469319e-3 * t8721 + 0.17549384106081390032e-1 * t8724 + 0.90080832906835432314e-4 * t8727;
1614   t8888 = 0.49846486874188679892e1 * t321 * t606 * t2212 - 0.35409739445157315668e-1 * t316 * t405 * t2150 + 0.16615495624729559964e1 * t321 * t2150 * t118 * t181 + 0.49846486874188679892e1 * t321 * t2247 * t595 - 0.37384865155641509919e1 * t859 * t2237 * t595 - 0.10622921833547194700e0 * t316 * t6416 * t162 - 0.10622921833547194700e0 * t316 * t1557 * t558 + 0.15934382750320792050e0 * t855 * t1557 * t567 + 0.24923243437094339947e1 * t2765 * t2166 * t118 * t181 - 0.13278652291933993376e0 * t2748 * t405 * t2166 - 0.22865171141851851357e2 * t270 * t1571 * t567 - 0.15243447427901234237e2 * t751 * t2180 * t181 - 0.34297756712777777035e2 * t751 * t582 * t2341 + 0.20977047095244633367e3 * t2540 * t2194 * t3068;
1615   t8934 = -0.37384865155641509919e1 * t859 * t606 * t6496 + 0.11432585570925925678e2 * t2586 * t2180 * t1061 + 0.15934382750320792050e0 * t855 * t405 * t6211 - 0.24056046973484009303e4 * t2525 * t3078 * t2531 * t2166 - 0.22865171141851851357e2 * t270 * t6475 * t617 - 0.22865171141851851357e2 * t270 * t1571 * t2274 + 0.31465570642866950052e3 * t772 * t4421 * t2267 + 0.16615495624729559964e1 * t106 * t57 * t8841 * t118 + 0.70819478890314631335e-1 * t50 * t101 * t8841 - 0.22865171141851851357e2 * t270 * t419 * t6211 - 0.76217237139506171188e1 * t270 * t419 * t58 * t2150 + 0.31465570642866950052e3 * t772 * t1079 * t58 * t2166 - 0.34297756712777777034e2 * t6521 * t618 + 0.31465570642866950052e3 * t1388 * t1292 * t6211;
1616   t8979 = -0.18e2 * t163 * t2225 + 0.12e2 * t163 * t2228 - 0.3e1 * t2213 * t173 - 0.6e1 * t182 * t2160 + 0.6e1 * t182 * t2163 - t182 * t2203 - t2151 * t192 + 0.6e1 * t559 * t600 - 0.3e1 * t559 * t622 + 0.6e1 * t596 * t564 - 0.3e1 * t596 * t587;
1617   if(v4rho4 != NULL && (p->info->flags & XC_FLAGS_NEEDS_LAPLACIAN) && (p->info->flags & XC_FLAGS_HAVE_LXC))
1618     v4lapl3tau[0] = -0.3e1 / 0.16e2 * t76 * t77 * (-0.3e1 * t163 * t2279 + t19 * t8841 * t67 - t48 * t99 * (t8888 + t8934) + 0.2e1 * t48 * t401 * t2202 + 0.6e1 * t48 * t1528 * t586 + 0.6e1 * t48 * t6308 * t172 - 0.18e2 * t48 * t4226 * t563 + 0.6e1 * t163 * t2231 - 0.18e2 * t1228 * t1517 * t586 + 0.24e2 * t48 * t3202 * t2159 + t8979);
1619 
1620   t8994 = t621 * t621;
1621   t9016 = -0.24e2 * t1228 * t1517 * t621 + 0.2e1 * t48 * t1621 * t586 + 0.4e1 * t48 * t6768 * t172 + 0.4e1 * t48 * t242 * t8994 - 0.6e1 * t48 * t4480 * t563 + 0.24e2 * t48 * t4484 * t563 - 0.12e2 * t182 * t2225 + 0.4e1 * t182 * t2231 - 0.2e1 * t182 * t2279 - t559 * t659 + 0.2e1 * t631 * t564 + 0.8e1 * t596 * t600 - 0.4e1 * t596 * t622;
1622   t9035 = -0.13276215095909872692e-2 * t8718 + 0.32144761499006987728e-2 * t8721 - 0.70197536424325560129e-1 * t8724 - 0.36032333162734172926e-3 * t8727;
1623   t9041 = t595 * t595;
1624   t9095 = -0.76217237139506171188e1 * t270 * t1656 * t567 - 0.15243447427901234238e2 * t270 * t9041 * t272 * t58 + 0.24923243437094339947e1 * t2765 * t2237 * t639 - 0.12461621718547169973e1 * t859 * t2247 * t639 - 0.15243447427901234237e2 * t751 * t654 * t567 + 0.53114609167735973502e-1 * t855 * t1642 * t567 - 0.13278652291933993376e0 * t2748 * t1625 * t567 - 0.76217237139506171188e1 * t270 * t654 * t558 + 0.16615495624729559964e1 * t321 * t2247 * t630 + 0.33230991249459119928e1 * t321 * t606 * t2288 - 0.70819478890314631336e-1 * t316 * t6690 * t162 - 0.35409739445157315668e-1 * t316 * t1642 * t558 - 0.12461621718547169973e1 * t859 * t2237 * t630 - 0.70819478890314631336e-1 * t316 * t405 * t2212 + 0.33230991249459119928e1 * t321 * t1635 * t2212 + 0.53114609167735973502e-1 * t855 * t1625 * t558 + 0.16615495624729559964e1 * t106 * t57 * t9035 * t118 + 0.70819478890314631335e-1 * t50 * t101 * t9035;
1625   t9153 = -0.70819478890314631336e-1 * t50 * t249 * t9041 + 0.33230991249459119928e1 * t254 * t57 * t9041 * t118 - 0.24056046973484009303e4 * t2525 * t4524 * t2531 * t567 - 0.76217237139506171188e1 * t270 * t1656 * t2274 + 0.10488523547622316684e3 * t772 * t4621 * t2267 + 0.21245843667094389400e0 * t855 * t405 * t6488 + 0.31465570642866950052e3 * t772 * t1664 * t4103 - 0.30486894855802468476e2 * t270 * t419 * t6488 - 0.15243447427901234238e2 * t270 * t419 * t58 * t2212 + 0.10488523547622316684e3 * t772 * t1664 * t113 * t558 + 0.20977047095244633367e3 * t2540 * t1664 * t2267 - 0.49846486874188679892e1 * t859 * t606 * t6654 + 0.11432585570925925678e2 * t2586 * t582 * t4513 - 0.11432585570925925678e2 * t751 * t582 * t4604 - 0.15243447427901234238e2 * t270 * t6634 * t617 - 0.11432585570925925678e2 * t751 * t654 * t2274 + 0.41954094190489266736e3 * t1388 * t1292 * t6488 - 0.45730342283703702713e2 * t4590 * t2264;
1626   t9166 = 0.8e1 * t182 * t2228 - 0.6e1 * t48 * t1613 * t586 - 0.12e2 * t163 * t2300 + 0.8e1 * t163 * t2303 + 0.4e1 * t48 * t401 * t2278 + 0.4e1 * t163 * t2307 + t19 * t9035 * t67 - t48 * t99 * (t9095 + t9153) - 0.2e1 * t2289 * t173 - t631 * t587 + 0.2e1 * t559 * t636 - 0.2e1 * t163 * t2353 - 0.2e1 * t2213 * t192;
1627   if(v4rho4 != NULL && (p->info->flags & XC_FLAGS_NEEDS_LAPLACIAN) && (p->info->flags & XC_FLAGS_HAVE_LXC))
1628     v4lapl2tau2[0] = -0.3e1 / 0.16e2 * t76 * t77 * (t9016 + t9166);
1629 
1630   t9175 = 0.53104860383639490768e-2 * t8718 - 0.12857904599602795091e-1 * t8721 + 0.28079014569730224051e0 * t8724 + 0.14412933265093669171e-2 * t8727;
1631   t9265 = -0.10622921833547194700e0 * t316 * t1557 * t630 - 0.13278652291933993376e0 * t2748 * t6863 * t162 - 0.10622921833547194700e0 * t316 * t405 * t2288 + 0.49846486874188679892e1 * t321 * t595 * t118 * t630 + 0.49846486874188679892e1 * t321 * t1635 * t2288 + 0.15934382750320792051e0 * t855 * t1625 * t595 + 0.24923243437094339947e1 * t2765 * t606 * t2378 - 0.37384865155641509919e1 * t859 * t6873 * t595 - 0.22865171141851851356e2 * t270 * t654 * t595 - 0.15243447427901234237e2 * t751 * t2392 * t162 - 0.35409739445157315668e-1 * t316 * t6859 * t162 + 0.16615495624729559964e1 * t321 * t606 * t2362 + 0.16615495624729559964e1 * t106 * t57 * t9175 * t118 + 0.70819478890314631335e-1 * t50 * t101 * t9175;
1632   t9309 = -0.24056046973484009303e4 * t2525 * t6909 * t2531 * t162 - 0.34297756712777777034e2 * t751 * t654 * t2341 + 0.11432585570925925678e2 * t2586 * t2392 * t617 + 0.15934382750320792050e0 * t855 * t405 * t6650 - 0.37384865155641509919e1 * t859 * t606 * t6891 + 0.31465570642866950052e3 * t772 * t1664 * t113 * t595 + 0.31465570642866950052e3 * t772 * t2406 * t617 + 0.20977047095244633367e3 * t2540 * t2406 * t2345 - 0.76217237139506171188e1 * t270 * t6919 * t617 - 0.22865171141851851357e2 * t270 * t6634 * t1061 - 0.22865171141851851357e2 * t270 * t1656 * t1536 - 0.22865171141851851357e2 * t270 * t1656 * t2341 - 0.34297756712777777034e2 * t4590 * t2338 + 0.31465570642866950052e3 * t6015 * t1292 * t1536;
1633   t9313 = -0.3e1 * t182 * t2353 - 0.6e1 * t163 * t2372 + 0.24e2 * t48 * t6817 * t172 - 0.18e2 * t48 * t1613 * t621 + 0.6e1 * t163 * t2375 - 0.18e2 * t1228 * t6826 * t172 + 0.6e1 * t48 * t1528 * t658 + 0.6e1 * t48 * t401 * t2352 - t163 * t2415 + 0.2e1 * t48 * t6837 * t172 - t48 * t99 * (t9265 + t9309);
1634   if(v4rho4 != NULL && (p->info->flags & XC_FLAGS_NEEDS_LAPLACIAN) && (p->info->flags & XC_FLAGS_HAVE_LXC))
1635     v4lapltau3[0] = -0.3e1 / 0.16e2 * t76 * t77 * (t19 * t9175 * t67 - t2363 * t173 - 0.18e2 * t182 * t2300 + 0.12e2 * t182 * t2303 + 0.6e1 * t182 * t2307 - 0.3e1 * t2289 * t192 + 0.6e1 * t596 * t636 - 0.3e1 * t596 * t659 + 0.6e1 * t631 * t600 - 0.3e1 * t631 * t622 + t9313);
1636 
1637   t9322 = -0.21241944153455796307e-1 * t8718 + 0.51431618398411180367e-1 * t8721 - 0.11231605827892089621e1 * t8724 - 0.57651733060374676683e-2 * t8727;
1638   t9337 = t635 * t635;
1639   t9344 = t658 * t658;
1640   t9351 = t639 * t639;
1641   t9360 = t9351 * t775;
1642   t9364 = t630 * t630;
1643   t9422 = -0.24056046973484009303e4 * t2525 * t9351 * t2529 * t2531 - 0.15243447427901234237e2 * t750 * t269 * t9351 * t272 + 0.20977047095244633367e3 * t2540 * t9360 * t113 - 0.10622921833547194700e0 * t50 * t249 * t9364 - 0.14163895778062926267e0 * t316 * t405 * t2362 + 0.49846486874188679892e1 * t254 * t57 * t9364 * t118 + 0.66461982498918239856e1 * t321 * t1635 * t2362 + 0.70819478890314631335e-1 * t50 * t101 * t9322 + 0.16615495624729559964e1 * t106 * t57 * t9322 * t118 + 0.24923243437094339947e1 * t2552 * t57 * t9351 * t118 - 0.30486894855802468476e2 * t270 * t6919 * t1061 - 0.45730342283703702713e2 * t270 * t1656 * t639 - 0.22865171141851851357e2 * t270 * t9364 * t272 * t58 - 0.68595513425555554068e2 * t751 * t654 * t4604 - 0.13278652291933993376e0 * t50 * t2574 * t9351 + 0.31868765500641584101e0 * t855 * t1625 * t630 - 0.74769730311283019838e1 * t859 * t6873 * t630 + 0.11432585570925925678e2 * t2586 * t9351 * t272 * t58 + 0.62931141285733900104e3 * t772 * t4621 * t113 * t639 + 0.31465570642866950052e3 * t772 * t9360 * t58;
1644   t9425 = -0.36e2 * t48 * t1613 * t658 + t19 * t9322 * t67 + 0.8e1 * t48 * t401 * t2414 + 0.6e1 * t48 * t242 * t9344 + 0.24e2 * t48 * t2504 * t9337 - t48 * t99 * t9422 - 0.24e2 * t182 * t2372 + 0.24e2 * t182 * t2375 - 0.4e1 * t182 * t2415 - 0.4e1 * t2363 * t192 + 0.12e2 * t631 * t636 - 0.6e1 * t631 * t659;
1645   if(v4rho4 != NULL && (p->info->flags & XC_FLAGS_HAVE_LXC))
1646     v4tau4[0] = -0.3e1 / 0.16e2 * t76 * t77 * t9425;
1647 
1648 #ifndef XC_DONT_COMPILE_MXC
1649 
1650   if(order < 5) return;
1651 
1652 
1653 #endif
1654 
1655 #endif
1656 
1657 #endif
1658 
1659 #endif
1660 
1661 #endif
1662 
1663 
1664 }
1665 
1666 
1667 static inline void
func_ferr(const xc_func_type * p,int order,const double * rho,const double * sigma,const double * lapl,const double * tau,double * zk,MGGA_OUT_PARAMS_NO_EXC (double *))1668 func_ferr(const xc_func_type *p, int order, const double *rho, const double *sigma, const double *lapl, const double *tau, double *zk, MGGA_OUT_PARAMS_NO_EXC(double *))
1669 {
1670 
1671 #ifndef XC_DONT_COMPILE_EXC
1672   double t2, t4, t5, t6, t7, t8, t9, t10;
1673   double t12, t13, t15, t16, t17, t19, t21, t23;
1674   double t29, t31, t32, t33, t34, t36, t37, t39;
1675   double t40, t41, t42, t43, t44, t45, t46, t51;
1676   double t52, t56, t60, t61, t63, t65;
1677 
1678 #ifndef XC_DONT_COMPILE_VXC
1679   double t69, t70, t73, t75, t80, t82, t84, t85;
1680   double t88, t89, t91, t92, t93, t94, t98, t99;
1681   double t100, t101, t102, t104, t106, t109, t110, t111;
1682   double t115, t116, t118, t123, t125, t127, t128, t137;
1683   double t138, t141, t145, t147, t149, t150, t159, t160;
1684   double t163, t168, t169, t178, t179, t182;
1685 
1686 #ifndef XC_DONT_COMPILE_FXC
1687   double t185, t186, t194, t196, t201, t203, t206, t207;
1688   double t208, t209, t212, t217, t222, t223, t228, t229;
1689   double t230, t234, t235, t236, t240, t252, t253, t254;
1690   double t255, t256, t258, t259, t263, t264, t266, t270;
1691   double t274, t276, t277, t278, t280, t281, t282, t284;
1692   double t286, t287, t291, t292, t295, t296, t300, t301;
1693   double t312, t313, t314, t317, t318, t321, t327, t328;
1694   double t330, t331, t334, t335, t339, t340, t343, t357;
1695   double t358, t361, t362, t365, t374, t375, t379, t380;
1696   double t383, t397, t398, t401, t402, t405, t408, t410;
1697   double t413, t416, t418, t419, t423, t424, t427, t442;
1698   double t446, t447, t450, t454, t457, t460, t462, t463;
1699   double t467, t473, t484, t485, t488, t489, t492, t497;
1700   double t498, t502, t518, t521, t522, t525, t529, t532;
1701   double t535, t537, t538, t542, t543, t546, t561, t565;
1702   double t566, t569, t574, t575, t579, t585, t596, t597;
1703   double t600, t601, t604, t609, t610, t614, t615, t618;
1704   double t633, t637, t638, t641;
1705 
1706 #ifndef XC_DONT_COMPILE_KXC
1707   double t644, t657, t662, t664, t666, t668, t670, t671;
1708   double t674, t675, t676, t680, t681, t684, t691, t692;
1709   double t700, t701, t702, t703, t706, t707, t710, t712;
1710   double t713, t714, t718, t723, t730, t731, t732, t743;
1711   double t748, t749, t750, t751, t752, t753, t755, t756;
1712   double t764, t765, t767, t771, t776, t779, t783, t785;
1713   double t786, t788, t790, t791, t792, t794, t795, t797;
1714   double t798, t800, t802, t803, t816, t819, t820, t823;
1715   double t826, t830, t831, t835, t842, t859, t860, t863;
1716   double t864, t871, t875, t876, t878, t879, t887, t891;
1717   double t894, t896, t897, t899, t903, t904, t916, t917;
1718   double t920, t921, t924, t933, t956, t957, t960, t961;
1719   double t967, t970, t971, t973, t974, t989, t990, t1002;
1720   double t1003, t1006, t1007, t1010, t1019, t1029, t1043, t1044;
1721   double t1047, t1048, t1054, t1057, t1058, t1060, t1061, t1067;
1722   double t1069, t1071, t1073, t1075, t1078, t1080, t1081, t1082;
1723   double t1085, t1087, t1088, t1099, t1100, t1103, t1107, t1108;
1724   double t1111, t1127, t1141, t1142, t1145, t1149, t1150, t1157;
1725   double t1158, t1160, t1161, t1167, t1169, t1171, t1174, t1175;
1726   double t1178, t1179, t1192, t1193, t1194, t1197, t1200, t1204;
1727   double t1205, t1208, t1212, t1222, t1226, t1227, t1233, t1247;
1728   double t1248, t1251, t1254, t1255, t1256, t1257, t1263, t1266;
1729   double t1267, t1269, t1270, t1280, t1281, t1294, t1295, t1298;
1730   double t1301, t1305, t1306, t1312, t1330, t1344, t1345, t1348;
1731   double t1352, t1355, t1358, t1361, t1362, t1364, t1365, t1371;
1732   double t1373, t1375, t1378, t1379, t1382, t1383, t1394, t1395;
1733   double t1398, t1402, t1403, t1406, t1419, t1422, t1436, t1437;
1734   double t1440, t1444, t1451, t1452, t1454, t1455, t1465, t1466;
1735   double t1479, t1480, t1483, t1486, t1490, t1491, t1494, t1498;
1736   double t1508, t1512, t1513, t1519, t1533, t1534, t1537, t1540;
1737   double t1546, t1549, t1550, t1552, t1553, t1563, t1564, t1575;
1738   double t1576, t1579, t1583, t1584, t1587, t1597, t1601, t1604;
1739   double t1618, t1619, t1622, t1626, t1633, t1634, t1636, t1637;
1740   double t1640, t1641, t1642, t1645, t1647, t1648, t1650, t1651;
1741   double t1659, t1660, t1663, t1666, t1680, t1694, t1702, t1703;
1742   double t1706, t1709, t1710, t1711, t1714, t1716, t1717, t1719;
1743   double t1720, t1732, t1735, t1738, t1744, t1754, t1771, t1774;
1744   double t1781, t1785, t1786, t1788, t1789, t1795, t1796, t1808;
1745   double t1811, t1814, t1845, t1848, t1854, t1857, t1858, t1860;
1746   double t1861, t1864, t1865, t1868, t1870, t1871, t1873, t1874;
1747   double t1885, t1888, t1892, t1923, t1926, t1930, t1937, t1938;
1748   double t1940, t1941, t1947, t1948, t1961, t1964, t1967, t1971;
1749   double t1977, t1986, t2008, t2011, t2014, t2020, t2023, t2024;
1750   double t2026, t2027, t2033, t2034, t2045, t2048, t2052, t2067;
1751   double t2083, t2086, t2096, t2097, t2099, t2100, t2103, t2104;
1752   double t2107, t2109, t2110, t2112, t2113, t2121, t2122, t2125;
1753   double t2128, t2142, t2156, t2164, t2165, t2168, t2174, t2175;
1754   double t2187, t2190, t2193, t2199, t2209, t2226, t2229, t2236;
1755   double t2240, t2241, t2243, t2244, t2250, t2251, t2262, t2265;
1756   double t2269, t2300, t2303, t2307, t2314, t2315, t2317, t2318;
1757   double t2324, t2325, t2333, t2334, t2337, t2340, t2354, t2368;
1758   double t2376, t2377, t2380;
1759 
1760 #ifndef XC_DONT_COMPILE_LXC
1761   double t2398, t2405, t2410, t2411, t2412, t2414, t2417, t2423;
1762   double t2424, t2425, t2432, t2437, t2440, t2452, t2468, t2469;
1763   double t2477, t2491, t2492, t2497, t2500, t2501, t2502, t2505;
1764   double t2507, t2511, t2523, t2524, t2525, t2536, t2537, t2550;
1765   double t2551, t2576, t2579, t2583, t2590, t2591, t2592, t2593;
1766   double t2597, t2600, t2610, t2611, t2627, t2641, t2642, t2651;
1767   double t2655, t2666, t2678, t2681, t2700, t2708, t2728, t2732;
1768   double t2744, t2751, t2769, t2804, t2815, t2819, t2829, t2833;
1769   double t2858, t2878, t2881, t2884, t2886, t2888, t2891, t2895;
1770   double t2897, t2900, t2903, t2914, t2925, t2935, t2939, t2946;
1771   double t2962, t2993, t3019, t3045, t3064, t3075, t3079, t3089;
1772   double t3096, t3113, t3123, t3127, t3137, t3142, t3166, t3203;
1773   double t3217, t3229, t3242, t3257, t3263, t3268, t3269, t3317;
1774   double t3332, t3336, t3343, t3347, t3352, t3362, t3372, t3376;
1775   double t3383, t3396, t3405, t3422, t3435, t3448, t3456, t3459;
1776   double t3463, t3467, t3471, t3475, t3477, t3480, t3488, t3492;
1777   double t3496, t3503, t3513, t3527, t3549, t3550, t3554, t3555;
1778   double t3559, t3563, t3570, t3579, t3583, t3584, t3585, t3588;
1779   double t3626, t3641, t3645, t3656, t3670, t3674, t3717, t3721;
1780   double t3725, t3755, t3771, t3790, t3810, t3814, t3821, t3829;
1781   double t3851, t3858, t3859, t3876, t3884, t3887, t3916, t3930;
1782   double t3934, t3938, t3953, t3956, t3960, t3964, t3968, t3972;
1783   double t3974, t3977, t3981, t3993, t4003, t4007, t4014, t4021;
1784   double t4034, t4038, t4042, t4080, t4093, t4098, t4104, t4126;
1785   double t4135, t4145, t4177, t4184, t4197, t4204, t4232, t4243;
1786   double t4262, t4269, t4270, t4286, t4305, t4313, t4342, t4360;
1787   double t4367, t4372, t4379, t4399, t4405, t4426, t4430, t4451;
1788   double t4455, t4483, t4497, t4517, t4524, t4528, t4539, t4549;
1789   double t4553, t4557, t4564, t4579, t4582, t4588, t4601, t4602;
1790   double t4605, t4618, t4667, t4680, t4688, t4695, t4699, t4716;
1791   double t4761, t4765, t4793, t4797, t4807, t4808, t4812, t4819;
1792   double t4829, t4837, t4840, t4845, t4849, t4851, t4862, t4876;
1793   double t4883, t4899, t4903, t4906, t4909, t4912, t4916, t4922;
1794   double t4932, t4935, t4976, t4987, t5014, t5020, t5032, t5061;
1795   double t5098, t5105, t5109, t5119, t5120, t5130, t5153, t5164;
1796   double t5178, t5200, t5205, t5222, t5227, t5255, t5292, t5299;
1797   double t5309, t5313, t5320, t5333, t5337, t5345, t5358, t5372;
1798   double t5375, t5380, t5384, t5386, t5390, t5395, t5396, t5402;
1799   double t5405, t5414, t5417, t5420, t5424, t5427, t5473, t5474;
1800   double t5483, t5509, t5516, t5531, t5538, t5551, t5566, t5578;
1801   double t5586, t5609, t5631, t5656, t5667, t5694, t5704, t5718;
1802   double t5725, t5753, t5754, t5769, t5785, t5797, t5827, t5848;
1803   double t5859, t5872, t5882, t5896, t5918, t5926, t5942, t5955;
1804   double t5959, t5960, t5964, t5973, t5979, t5989, t5997, t6025;
1805   double t6052, t6071, t6079, t6082, t6087, t6091, t6093, t6118;
1806   double t6127, t6138, t6149, t6168, t6184, t6188, t6201, t6208;
1807   double t6215, t6219, t6233, t6237, t6277, t6283, t6300, t6311;
1808   double t6315, t6323, t6340, t6357, t6367, t6392, t6405, t6415;
1809   double t6422, t6438, t6442, t6450, t6454, t6458, t6479, t6496;
1810   double t6507, t6511, t6525, t6531, t6564, t6567, t6578, t6583;
1811   double t6611, t6618, t6651, t6655, t6662, t6672, t6676, t6692;
1812   double t6717, t6731, t6756, t6765, t6776, t6787, t6807, t6818;
1813   double t6825, t6829, t6836, t6855, t6872, t6876, t6883, t6885;
1814   double t6890, t6895, t6910, t6917, t6931, t6944, t6948, t6994;
1815   double t6997, t7002, t7004, t7005, t7007, t7009, t7010, t7012;
1816   double t7014, t7019, t7022, t7047, t7051, t7061, t7075, t7094;
1817   double t7107, t7154, t7239, t7280, t7288, t7297, t7347, t7352;
1818   double t7357, t7367, t7389, t7393, t7404, t7406, t7407, t7409;
1819   double t7411, t7412, t7414, t7416, t7431, t7435, t7461, t7493;
1820   double t7520, t7544, t7605, t7639, t7672, t7702, t7714, t7719;
1821   double t7782, t7786, t7798, t7846, t7866, t7899, t7905, t7907;
1822   double t7908, t7910, t7912, t7913, t7915, t7917, t7979, t7986;
1823   double t8005, t8049, t8053, t8077, t8089, t8124, t8151, t8165;
1824   double t8200, t8232, t8277, t8324, t8346, t8388, t8423, t8459;
1825   double t8481, t8494, t8500, t8509, t8599, t8640, t8644, t8650;
1826   double t8651, t8653, t8655, t8656, t8658, t8660, t8675, t8682;
1827   double t8689, t8698, t8709, t8759, t8762, t8838, t8846, t8890;
1828   double t8910, t8947, t9012, t9028, t9062, t9075, t9087, t9097;
1829   double t9106, t9197, t9240, t9244, t9253, t9268, t9275, t9289;
1830   double t9305, t9316, t9353, t9356;
1831 #endif
1832 
1833 #endif
1834 
1835 #endif
1836 
1837 #endif
1838 
1839 #endif
1840 
1841 
1842 
1843   t2 = M_CBRT3;
1844   t4 = POW_1_3(0.1e1 / M_PI);
1845   t5 = t2 * t4;
1846   t6 = M_CBRT4;
1847   t7 = t6 * t6;
1848   t8 = POW_1_3(rho[0]);
1849   t9 = t7 * t8;
1850   t10 = t2 * t2;
1851   t12 = M_PI * M_PI;
1852   t13 = POW_1_3(t12);
1853   t15 = t6 * t10 * t13 / 0.9e1;
1854   t16 = 0.1e1 - t15;
1855   t17 = t8 * t8;
1856   t19 = 0.1e1 / t17 / rho[0];
1857   t21 = rho[0] * rho[0];
1858   t23 = 0.1e1 / t17 / t21;
1859   t29 = M_CBRT6;
1860   t31 = t13 * t13;
1861   t32 = 0.1e1 / t31;
1862   t33 = (tau[0] * t19 - sigma[0] * t23 / 0.8e1 - lapl[0] * t19 / 0.4e1) * t29 * t32;
1863   t34 = 0.39111111111111111111e0 * t33;
1864   t36 = 0.1e1 - 0.5e1 / 0.9e1 * t33;
1865   t37 = t36 * t36;
1866   t39 = 0.1e1 + 0.495616e0 * t37;
1867   t40 = sqrt(t39);
1868   t41 = 0.704e0 - t34 + t40;
1869   t42 = t16 * t41;
1870   t43 = sqrt(0.30e2);
1871   t44 = t16 * t43;
1872   t45 = sqrt(t41);
1873   t46 = t16 * t16;
1874   t51 = 0.60184783083548636238e0 * t46 - 0.206514e-1;
1875   t52 = -0.296e0 - t34 + t40;
1876   t56 = log(0.39102932048925120047e0 / t46 / t16 * t43 * t51 * t52 + sqrt(POW_2(0.39102932048925120047e0 / t46 / t16 * t43 * t51 * t52) + 0.1e1));
1877   t60 = 0.1e1 + 0.14163895778062926267e0 * t44 * t45 * t56;
1878   t61 = 0.1e1 / t60;
1879   t63 = t42 * t61 + t15;
1880   t65 = t5 * t9 * t63;
1881   if(zk != NULL && (p->info->flags & XC_FLAGS_HAVE_EXC))
1882     zk[0] = -0.3e1 / 0.8e1 * t65;
1883 
1884 #ifndef XC_DONT_COMPILE_VXC
1885 
1886   if(order < 1) return;
1887 
1888 
1889   t69 = t8 * rho[0] * t2;
1890   t70 = t4 * t7;
1891   t73 = t21 * rho[0];
1892   t75 = 0.1e1 / t17 / t73;
1893   t80 = -0.5e1 / 0.3e1 * tau[0] * t23 + sigma[0] * t75 / 0.3e1 + 0.5e1 / 0.12e2 * lapl[0] * t23;
1894   t82 = t80 * t29 * t32;
1895   t84 = 0.1e1 / t40;
1896   t85 = t84 * t36;
1897   t88 = -0.39111111111111111111e0 * t82 - 0.27534222222222222222e0 * t85 * t82;
1898   t89 = t16 * t88;
1899   t91 = t60 * t60;
1900   t92 = 0.1e1 / t91;
1901   t93 = 0.1e1 / t45;
1902   t94 = t93 * t56;
1903   t98 = 0.1e1 / t46;
1904   t99 = t98 * t45;
1905   t100 = t51 * t88;
1906   t101 = t46 * t46;
1907   t102 = t101 * t46;
1908   t104 = t51 * t51;
1909   t106 = t52 * t52;
1910   t109 = 0.45871178844685658610e1 / t102 * t104 * t106 + 0.1e1;
1911   t110 = sqrt(t109);
1912   t111 = 0.1e1 / t110;
1913   t115 = 0.70819478890314631335e-1 * t44 * t94 * t88 + 0.16615495624729559964e1 * t99 * t100 * t111;
1914   t116 = t92 * t115;
1915   t118 = -t42 * t116 + t89 * t61;
1916   if(vrho != NULL && (p->info->flags & XC_FLAGS_HAVE_VXC))
1917     vrho[0] = -t65 / 0.2e1 - 0.3e1 / 0.8e1 * t69 * t70 * t118;
1918 
1919   t123 = t23 * t29 * t32;
1920   t125 = t85 * t123;
1921   t127 = 0.48888888888888888889e-1 * t123 + 0.34417777777777777778e-1 * t125;
1922   t128 = t16 * t127;
1923   t137 = 0.70819478890314631335e-1 * t44 * t94 * t127 + 0.16615495624729559964e1 * t99 * t51 * t127 * t111;
1924   t138 = t92 * t137;
1925   t141 = t70 * (t128 * t61 - t42 * t138);
1926   if(vrho != NULL && (p->info->flags & XC_FLAGS_HAVE_VXC))
1927     vsigma[0] = -0.3e1 / 0.8e1 * t69 * t141;
1928 
1929   t145 = t19 * t29 * t32;
1930   t147 = t85 * t145;
1931   t149 = 0.97777777777777777778e-1 * t145 + 0.68835555555555555555e-1 * t147;
1932   t150 = t16 * t149;
1933   t159 = 0.70819478890314631335e-1 * t44 * t94 * t149 + 0.16615495624729559964e1 * t99 * t51 * t149 * t111;
1934   t160 = t92 * t159;
1935   t163 = t70 * (t150 * t61 - t42 * t160);
1936   if(vrho != NULL && (p->info->flags & XC_FLAGS_NEEDS_LAPLACIAN) && (p->info->flags & XC_FLAGS_HAVE_VXC))
1937     vlapl[0] = -0.3e1 / 0.8e1 * t69 * t163;
1938 
1939   t168 = -0.39111111111111111111e0 * t145 - 0.27534222222222222222e0 * t147;
1940   t169 = t16 * t168;
1941   t178 = 0.70819478890314631335e-1 * t44 * t94 * t168 + 0.16615495624729559964e1 * t99 * t51 * t168 * t111;
1942   t179 = t92 * t178;
1943   t182 = t70 * (t169 * t61 - t42 * t179);
1944   if(vrho != NULL && (p->info->flags & XC_FLAGS_HAVE_VXC))
1945     vtau[0] = -0.3e1 / 0.8e1 * t69 * t182;
1946 
1947 #ifndef XC_DONT_COMPILE_FXC
1948 
1949   if(order < 2) return;
1950 
1951 
1952   t185 = 0.1e1 / t17;
1953   t186 = t7 * t185;
1954   t194 = t21 * t21;
1955   t196 = 0.1e1 / t17 / t194;
1956   t201 = 0.40e2 / 0.9e1 * tau[0] * t75 - 0.11e2 / 0.9e1 * sigma[0] * t196 - 0.10e2 / 0.9e1 * lapl[0] * t75;
1957   t203 = t201 * t29 * t32;
1958   t206 = 0.1e1 / t40 / t39;
1959   t207 = t206 * t37;
1960   t208 = t80 * t80;
1961   t209 = t29 * t29;
1962   t212 = 0.1e1 / t13 / t12;
1963   t217 = t209 * t212;
1964   t222 = -0.39111111111111111111e0 * t203 - 0.75813339338271604937e-1 * t207 * t208 * t209 * t212 + 0.15296790123456790123e0 * t84 * t208 * t217 - 0.27534222222222222222e0 * t85 * t203;
1965   t223 = t16 * t222;
1966   t228 = 0.1e1 / t91 / t60;
1967   t229 = t115 * t115;
1968   t230 = t228 * t229;
1969   t234 = 0.1e1 / t45 / t41;
1970   t235 = t234 * t56;
1971   t236 = t88 * t88;
1972   t240 = t98 * t93;
1973   t252 = t101 * t101;
1974   t253 = 0.1e1 / t252;
1975   t254 = t253 * t45;
1976   t255 = t104 * t51;
1977   t256 = t254 * t255;
1978   t258 = 0.1e1 / t110 / t109;
1979   t259 = t236 * t258;
1980   t263 = -0.35409739445157315668e-1 * t44 * t235 * t236 + 0.16615495624729559964e1 * t240 * t51 * t236 * t111 + 0.70819478890314631335e-1 * t44 * t94 * t222 + 0.16615495624729559964e1 * t99 * t51 * t222 * t111 - 0.76217237139506171188e1 * t256 * t259 * t52;
1981   t264 = t92 * t263;
1982   t266 = -0.2e1 * t89 * t116 + t223 * t61 + 0.2e1 * t42 * t230 - t42 * t264;
1983   if(v2rho2 != NULL && (p->info->flags & XC_FLAGS_HAVE_FXC))
1984     v2rho2[0] = -t5 * t186 * t63 / 0.6e1 - t5 * t9 * t118 - 0.3e1 / 0.8e1 * t69 * t70 * t266;
1985 
1986   t270 = t8 * t2;
1987   t274 = t75 * t29 * t32;
1988   t276 = t207 * t23;
1989   t277 = t217 * t80;
1990   t278 = t276 * t277;
1991   t280 = t84 * t80;
1992   t281 = t217 * t23;
1993   t282 = t280 * t281;
1994   t284 = t85 * t274;
1995   t286 = -0.13037037037037037037e0 * t274 + 0.94766674172839506173e-2 * t278 - 0.19120987654320987654e-1 * t282 - 0.91780740740740740741e-1 * t284;
1996   t287 = t16 * t286;
1997   t291 = t228 * t137;
1998   t292 = t291 * t115;
1999   t295 = t44 * t234;
2000   t296 = t56 * t127;
2001   t300 = t240 * t51;
2002   t301 = t88 * t111;
2003   t312 = t127 * t258;
2004   t313 = t52 * t88;
2005   t314 = t312 * t313;
2006   t317 = -0.35409739445157315668e-1 * t295 * t296 * t88 + 0.16615495624729559964e1 * t300 * t301 * t127 + 0.70819478890314631335e-1 * t44 * t94 * t286 + 0.16615495624729559964e1 * t99 * t51 * t286 * t111 - 0.76217237139506171188e1 * t256 * t314;
2007   t318 = t92 * t317;
2008   t321 = t70 * (-t128 * t116 - t89 * t138 + t287 * t61 + 0.2e1 * t42 * t292 - t42 * t318);
2009   if(v2rho2 != NULL && (p->info->flags & XC_FLAGS_HAVE_FXC))
2010     v2rhosigma[0] = -t270 * t141 / 0.2e1 - 0.3e1 / 0.8e1 * t69 * t321;
2011 
2012   t327 = t207 * t19;
2013   t328 = t327 * t277;
2014   t330 = t217 * t19;
2015   t331 = t280 * t330;
2016   t334 = -0.16296296296296296296e0 * t123 + 0.18953334834567901234e-1 * t328 - 0.38241975308641975308e-1 * t331 - 0.11472592592592592593e0 * t125;
2017   t335 = t16 * t334;
2018   t339 = t228 * t159;
2019   t340 = t339 * t115;
2020   t343 = t56 * t149;
2021   t357 = t149 * t258;
2022   t358 = t357 * t313;
2023   t361 = -0.35409739445157315668e-1 * t295 * t343 * t88 + 0.16615495624729559964e1 * t300 * t301 * t149 + 0.70819478890314631335e-1 * t44 * t94 * t334 + 0.16615495624729559964e1 * t99 * t51 * t334 * t111 - 0.76217237139506171188e1 * t256 * t358;
2024   t362 = t92 * t361;
2025   t365 = t70 * (-t150 * t116 - t89 * t160 + t335 * t61 + 0.2e1 * t42 * t340 - t42 * t362);
2026   if(v2rho2 != NULL && (p->info->flags & XC_FLAGS_NEEDS_LAPLACIAN) && (p->info->flags & XC_FLAGS_HAVE_FXC))
2027     v2rholapl[0] = -t270 * t163 / 0.2e1 - 0.3e1 / 0.8e1 * t69 * t365;
2028 
2029   t374 = 0.65185185185185185185e0 * t123 - 0.75813339338271604937e-1 * t328 + 0.15296790123456790123e0 * t331 + 0.45890370370370370370e0 * t125;
2030   t375 = t16 * t374;
2031   t379 = t228 * t178;
2032   t380 = t379 * t115;
2033   t383 = t56 * t168;
2034   t397 = t168 * t258;
2035   t398 = t397 * t313;
2036   t401 = -0.35409739445157315668e-1 * t295 * t383 * t88 + 0.16615495624729559964e1 * t300 * t301 * t168 + 0.70819478890314631335e-1 * t44 * t94 * t374 + 0.16615495624729559964e1 * t99 * t51 * t374 * t111 - 0.76217237139506171188e1 * t256 * t398;
2037   t402 = t92 * t401;
2038   t405 = t70 * (-t169 * t116 - t89 * t179 + t375 * t61 + 0.2e1 * t42 * t380 - t42 * t402);
2039   if(v2rho2 != NULL && (p->info->flags & XC_FLAGS_HAVE_FXC))
2040     v2rhotau[0] = -t270 * t182 / 0.2e1 - 0.3e1 / 0.8e1 * t69 * t405;
2041 
2042   t408 = t194 * rho[0];
2043   t410 = 0.1e1 / t8 / t408;
2044   t413 = t207 * t410 * t209 * t212;
2045   t416 = t84 * t410 * t217;
2046   t418 = -0.11845834271604938272e-2 * t413 + 0.23901234567901234568e-2 * t416;
2047   t419 = t16 * t418;
2048   t423 = t137 * t137;
2049   t424 = t228 * t423;
2050   t427 = t127 * t127;
2051   t442 = t427 * t258;
2052   t446 = -0.35409739445157315668e-1 * t44 * t235 * t427 + 0.16615495624729559964e1 * t240 * t51 * t427 * t111 + 0.70819478890314631335e-1 * t44 * t94 * t418 + 0.16615495624729559964e1 * t99 * t51 * t418 * t111 - 0.76217237139506171188e1 * t256 * t442 * t52;
2053   t447 = t92 * t446;
2054   t450 = t70 * (-0.2e1 * t128 * t138 + t419 * t61 + 0.2e1 * t42 * t424 - t42 * t447);
2055   if(v2rho2 != NULL && (p->info->flags & XC_FLAGS_HAVE_FXC))
2056     v2sigma2[0] = -0.3e1 / 0.8e1 * t69 * t450;
2057 
2058   t454 = 0.1e1 / t8 / t194;
2059   t457 = t207 * t454 * t209 * t212;
2060   t460 = t84 * t454 * t217;
2061   t462 = -0.23691668543209876543e-2 * t457 + 0.47802469135802469135e-2 * t460;
2062   t463 = t16 * t462;
2063   t467 = t339 * t137;
2064   t473 = t127 * t111;
2065   t484 = t52 * t127;
2066   t485 = t357 * t484;
2067   t488 = -0.35409739445157315668e-1 * t295 * t343 * t127 + 0.16615495624729559964e1 * t300 * t473 * t149 + 0.70819478890314631335e-1 * t44 * t94 * t462 + 0.16615495624729559964e1 * t99 * t51 * t462 * t111 - 0.76217237139506171188e1 * t256 * t485;
2068   t489 = t92 * t488;
2069   t492 = t70 * (-t128 * t160 - t150 * t138 + 0.2e1 * t42 * t467 - t42 * t489 + t463 * t61);
2070   if(v2rho2 != NULL && (p->info->flags & XC_FLAGS_NEEDS_LAPLACIAN) && (p->info->flags & XC_FLAGS_HAVE_FXC))
2071     v2sigmalapl[0] = -0.3e1 / 0.8e1 * t69 * t492;
2072 
2073   t497 = 0.94766674172839506173e-2 * t457 - 0.19120987654320987654e-1 * t460;
2074   t498 = t16 * t497;
2075   t502 = t379 * t137;
2076   t518 = t397 * t484;
2077   t521 = -0.35409739445157315668e-1 * t295 * t383 * t127 + 0.16615495624729559964e1 * t300 * t473 * t168 + 0.70819478890314631335e-1 * t44 * t94 * t497 + 0.16615495624729559964e1 * t99 * t51 * t497 * t111 - 0.76217237139506171188e1 * t256 * t518;
2078   t522 = t92 * t521;
2079   t525 = t70 * (-t128 * t179 - t169 * t138 + 0.2e1 * t42 * t502 - t42 * t522 + t498 * t61);
2080   if(v2rho2 != NULL && (p->info->flags & XC_FLAGS_HAVE_FXC))
2081     v2sigmatau[0] = -0.3e1 / 0.8e1 * t69 * t525;
2082 
2083   t529 = 0.1e1 / t8 / t73;
2084   t532 = t207 * t529 * t209 * t212;
2085   t535 = t84 * t529 * t217;
2086   t537 = -0.47383337086419753086e-2 * t532 + 0.95604938271604938271e-2 * t535;
2087   t538 = t16 * t537;
2088   t542 = t159 * t159;
2089   t543 = t228 * t542;
2090   t546 = t149 * t149;
2091   t561 = t546 * t258;
2092   t565 = -0.35409739445157315668e-1 * t44 * t235 * t546 + 0.16615495624729559964e1 * t240 * t51 * t546 * t111 + 0.70819478890314631335e-1 * t44 * t94 * t537 + 0.16615495624729559964e1 * t99 * t51 * t537 * t111 - 0.76217237139506171188e1 * t256 * t561 * t52;
2093   t566 = t92 * t565;
2094   t569 = t70 * (-0.2e1 * t150 * t160 + 0.2e1 * t42 * t543 - t42 * t566 + t538 * t61);
2095   if(v2rho2 != NULL && (p->info->flags & XC_FLAGS_NEEDS_LAPLACIAN) && (p->info->flags & XC_FLAGS_HAVE_FXC))
2096     v2lapl2[0] = -0.3e1 / 0.8e1 * t69 * t569;
2097 
2098   t574 = 0.18953334834567901234e-1 * t532 - 0.38241975308641975308e-1 * t535;
2099   t575 = t16 * t574;
2100   t579 = t379 * t159;
2101   t585 = t149 * t111;
2102   t596 = t52 * t149;
2103   t597 = t397 * t596;
2104   t600 = -0.35409739445157315668e-1 * t295 * t383 * t149 + 0.16615495624729559964e1 * t300 * t585 * t168 + 0.70819478890314631335e-1 * t44 * t94 * t574 + 0.16615495624729559964e1 * t99 * t51 * t574 * t111 - 0.76217237139506171188e1 * t256 * t597;
2105   t601 = t92 * t600;
2106   t604 = t70 * (-t150 * t179 - t169 * t160 + 0.2e1 * t42 * t579 - t42 * t601 + t575 * t61);
2107   if(v2rho2 != NULL && (p->info->flags & XC_FLAGS_NEEDS_LAPLACIAN) && (p->info->flags & XC_FLAGS_HAVE_FXC))
2108     v2lapltau[0] = -0.3e1 / 0.8e1 * t69 * t604;
2109 
2110   t609 = -0.75813339338271604937e-1 * t532 + 0.15296790123456790123e0 * t535;
2111   t610 = t16 * t609;
2112   t614 = t178 * t178;
2113   t615 = t228 * t614;
2114   t618 = t168 * t168;
2115   t633 = t618 * t258;
2116   t637 = -0.35409739445157315668e-1 * t44 * t235 * t618 + 0.16615495624729559964e1 * t240 * t51 * t618 * t111 + 0.70819478890314631335e-1 * t44 * t94 * t609 + 0.16615495624729559964e1 * t99 * t51 * t609 * t111 - 0.76217237139506171188e1 * t256 * t633 * t52;
2117   t638 = t92 * t637;
2118   t641 = t70 * (-0.2e1 * t169 * t179 + 0.2e1 * t42 * t615 - t42 * t638 + t610 * t61);
2119   if(v2rho2 != NULL && (p->info->flags & XC_FLAGS_HAVE_FXC))
2120     v2tau2[0] = -0.3e1 / 0.8e1 * t69 * t641;
2121 
2122 #ifndef XC_DONT_COMPILE_KXC
2123 
2124   if(order < 3) return;
2125 
2126 
2127   t644 = t7 * t19;
2128   t657 = 0.1e1 / t17 / t408;
2129   t662 = -0.440e3 / 0.27e2 * tau[0] * t196 + 0.154e3 / 0.27e2 * sigma[0] * t657 + 0.110e3 / 0.27e2 * lapl[0] * t196;
2130   t664 = t662 * t29 * t32;
2131   t666 = t39 * t39;
2132   t668 = 0.1e1 / t40 / t666;
2133   t670 = t668 * t37 * t36;
2134   t671 = t208 * t80;
2135   t674 = t206 * t36;
2136   t675 = t12 * t12;
2137   t676 = 0.1e1 / t675;
2138   t680 = t207 * t80;
2139   t681 = t217 * t201;
2140   t684 = t206 * t671;
2141   t691 = -0.39111111111111111111e0 * t664 - 0.38573713798808385273e-2 * t670 * t671 + 0.50542226225514403291e0 * t674 * t671 * t676 - 0.22744001801481481481e0 * t680 * t681 + 0.25943279877168604506e-2 * t684 * t36 + 0.45890370370370370369e0 * t280 * t681 - 0.27534222222222222222e0 * t85 * t664;
2142   t692 = t16 * t691;
2143   t700 = t91 * t91;
2144   t701 = 0.1e1 / t700;
2145   t702 = t229 * t115;
2146   t703 = t701 * t702;
2147   t706 = t228 * t115;
2148   t707 = t706 * t263;
2149   t710 = t41 * t41;
2150   t712 = 0.1e1 / t45 / t710;
2151   t713 = t712 * t56;
2152   t714 = t236 * t88;
2153   t718 = t98 * t234;
2154   t723 = t56 * t88;
2155   t730 = t253 * t93;
2156   t731 = t730 * t255;
2157   t732 = t714 * t258;
2158   t743 = t222 * t258;
2159   t748 = 0.1e1 / t252 / t102;
2160   t749 = t748 * t45;
2161   t750 = t104 * t104;
2162   t751 = t750 * t51;
2163   t752 = t749 * t751;
2164   t753 = t109 * t109;
2165   t755 = 0.1e1 / t110 / t753;
2166   t756 = t714 * t755;
2167   t764 = 0.53114609167735973502e-1 * t44 * t713 * t714 - 0.12461621718547169973e1 * t718 * t51 * t714 * t111 - 0.10622921833547194700e0 * t295 * t723 * t222 + 0.49846486874188679892e1 * t300 * t301 * t222 - 0.11432585570925925678e2 * t731 * t732 * t52 + 0.70819478890314631335e-1 * t44 * t94 * t691 + 0.16615495624729559964e1 * t99 * t51 * t691 * t111 - 0.22865171141851851357e2 * t256 * t743 * t313 + 0.10488523547622316684e3 * t752 * t756 * t106 - 0.76217237139506171188e1 * t254 * t255 * t714 * t258;
2168   t765 = t92 * t764;
2169   t767 = -0.3e1 * t223 * t116 + 0.6e1 * t89 * t230 - 0.3e1 * t89 * t264 - 0.6e1 * t42 * t703 + 0.6e1 * t42 * t707 - t42 * t765 + t692 * t61;
2170   if(v3rho3 != NULL && (p->info->flags & XC_FLAGS_HAVE_KXC))
2171     v3rho3[0] = t5 * t644 * t63 / 0.9e1 - t5 * t186 * t118 / 0.2e1 - 0.3e1 / 0.2e1 * t5 * t9 * t266 - 0.3e1 / 0.8e1 * t69 * t70 * t767;
2172 
2173   t771 = t185 * t2;
2174   t776 = t196 * t29 * t32;
2175   t779 = t670 * t23 * t208;
2176   t783 = t674 * t23 * t676 * t208;
2177   t785 = t207 * t75;
2178   t786 = t785 * t277;
2179   t788 = t276 * t681;
2180   t790 = t206 * t208;
2181   t791 = t23 * t36;
2182   t792 = t790 * t791;
2183   t794 = t84 * t201;
2184   t795 = t794 * t281;
2185   t797 = t217 * t75;
2186   t798 = t280 * t797;
2187   t800 = t85 * t776;
2188   t802 = 0.47802469135802469136e0 * t776 + 0.48217142248510481592e-3 * t779 - 0.63177782781893004115e-1 * t783 - 0.50542226225514403292e-1 * t786 + 0.94766674172839506173e-2 * t788 - 0.32429099846460755633e-3 * t792 - 0.19120987654320987654e-1 * t795 + 0.10197860082304526749e0 * t798 + 0.33652938271604938272e0 * t800;
2189   t803 = t16 * t802;
2190   t816 = t701 * t137 * t229;
2191   t819 = t228 * t317;
2192   t820 = t819 * t115;
2193   t823 = t291 * t263;
2194   t826 = t44 * t712;
2195   t830 = t718 * t51;
2196   t831 = t236 * t111;
2197   t835 = t56 * t286;
2198   t842 = t222 * t111;
2199   t859 = t286 * t258;
2200   t860 = t859 * t313;
2201   t863 = t127 * t755;
2202   t864 = t106 * t236;
2203   t871 = t52 * t222;
2204   t875 = 0.53114609167735973502e-1 * t826 * t296 * t236 - 0.12461621718547169973e1 * t830 * t831 * t127 - 0.70819478890314631336e-1 * t295 * t835 * t88 - 0.35409739445157315668e-1 * t295 * t296 * t222 + 0.16615495624729559964e1 * t300 * t842 * t127 - 0.11432585570925925678e2 * t731 * t259 * t484 + 0.33230991249459119928e1 * t300 * t301 * t286 + 0.70819478890314631335e-1 * t44 * t94 * t802 + 0.16615495624729559964e1 * t99 * t51 * t802 * t111 - 0.15243447427901234238e2 * t256 * t860 + 0.10488523547622316684e3 * t752 * t863 * t864 - 0.76217237139506171188e1 * t256 * t312 * t236 - 0.76217237139506171188e1 * t256 * t312 * t871;
2205   t876 = t92 * t875;
2206   t878 = -0.2e1 * t287 * t116 + 0.2e1 * t128 * t230 - t128 * t264 - t223 * t138 + 0.4e1 * t89 * t292 - 0.2e1 * t89 * t318 - 0.6e1 * t42 * t816 + 0.4e1 * t42 * t820 + 0.2e1 * t42 * t823 - t42 * t876 + t803 * t61;
2207   t879 = t70 * t878;
2208   if(v3rho3 != NULL && (p->info->flags & XC_FLAGS_HAVE_KXC))
2209     v3rho2sigma[0] = -t771 * t141 / 0.6e1 - t270 * t321 - 0.3e1 / 0.8e1 * t69 * t879;
2210 
2211   t887 = t670 * t19 * t208;
2212   t891 = t674 * t19 * t676 * t208;
2213   t894 = t327 * t681;
2214   t896 = t19 * t36;
2215   t897 = t790 * t896;
2216   t899 = t794 * t330;
2217   t903 = 0.43456790123456790123e0 * t274 + 0.96434284497020963181e-3 * t887 - 0.12635556556378600823e0 * t891 - 0.63177782781893004115e-1 * t278 + 0.18953334834567901234e-1 * t894 - 0.64858199692921511265e-3 * t897 - 0.38241975308641975308e-1 * t899 + 0.12747325102880658436e0 * t282 + 0.30593580246913580248e0 * t284;
2218   t904 = t16 * t903;
2219   t916 = t701 * t159;
2220   t917 = t916 * t229;
2221   t920 = t228 * t361;
2222   t921 = t920 * t115;
2223   t924 = t339 * t263;
2224   t933 = t56 * t334;
2225   t956 = t334 * t258;
2226   t957 = t956 * t313;
2227   t960 = t149 * t755;
2228   t961 = t960 * t864;
2229   t967 = t357 * t871;
2230   t970 = 0.53114609167735973502e-1 * t826 * t343 * t236 - 0.12461621718547169973e1 * t830 * t831 * t149 - 0.70819478890314631336e-1 * t295 * t933 * t88 - 0.35409739445157315668e-1 * t295 * t343 * t222 + 0.16615495624729559964e1 * t300 * t842 * t149 - 0.11432585570925925678e2 * t731 * t259 * t596 + 0.33230991249459119928e1 * t300 * t301 * t334 + 0.70819478890314631335e-1 * t44 * t94 * t903 + 0.16615495624729559964e1 * t99 * t51 * t903 * t111 - 0.15243447427901234238e2 * t256 * t957 + 0.10488523547622316684e3 * t752 * t961 - 0.76217237139506171188e1 * t256 * t357 * t236 - 0.76217237139506171188e1 * t256 * t967;
2231   t971 = t92 * t970;
2232   t973 = -0.2e1 * t335 * t116 + 0.2e1 * t150 * t230 - t150 * t264 - t223 * t160 + 0.4e1 * t89 * t340 - 0.2e1 * t89 * t362 - 0.6e1 * t42 * t917 + 0.4e1 * t42 * t921 + 0.2e1 * t42 * t924 - t42 * t971 + t904 * t61;
2233   t974 = t70 * t973;
2234   if(v3rho3 != NULL && (p->info->flags & XC_FLAGS_NEEDS_LAPLACIAN) && (p->info->flags & XC_FLAGS_HAVE_KXC))
2235     v3rho2lapl[0] = -t771 * t163 / 0.6e1 - t270 * t365 - 0.3e1 / 0.8e1 * t69 * t974;
2236 
2237   t989 = -0.17382716049382716049e1 * t274 - 0.38573713798808385273e-2 * t887 + 0.50542226225514403291e0 * t891 + 0.25271113112757201646e0 * t278 - 0.75813339338271604937e-1 * t894 + 0.25943279877168604506e-2 * t897 + 0.15296790123456790123e0 * t899 - 0.50989300411522633744e0 * t282 - 0.12237432098765432099e1 * t284;
2238   t990 = t16 * t989;
2239   t1002 = t701 * t178;
2240   t1003 = t1002 * t229;
2241   t1006 = t228 * t401;
2242   t1007 = t1006 * t115;
2243   t1010 = t379 * t263;
2244   t1019 = t56 * t374;
2245   t1029 = t168 * t52;
2246   t1043 = t374 * t258;
2247   t1044 = t1043 * t313;
2248   t1047 = t168 * t755;
2249   t1048 = t1047 * t864;
2250   t1054 = t397 * t871;
2251   t1057 = 0.53114609167735973502e-1 * t826 * t383 * t236 - 0.12461621718547169973e1 * t830 * t831 * t168 - 0.70819478890314631336e-1 * t295 * t1019 * t88 - 0.35409739445157315668e-1 * t295 * t383 * t222 + 0.16615495624729559964e1 * t300 * t842 * t168 - 0.11432585570925925678e2 * t731 * t259 * t1029 + 0.33230991249459119928e1 * t300 * t301 * t374 + 0.70819478890314631335e-1 * t44 * t94 * t989 + 0.16615495624729559964e1 * t99 * t51 * t989 * t111 - 0.15243447427901234238e2 * t256 * t1044 + 0.10488523547622316684e3 * t752 * t1048 - 0.76217237139506171188e1 * t256 * t397 * t236 - 0.76217237139506171188e1 * t256 * t1054;
2252   t1058 = t92 * t1057;
2253   t1060 = -0.6e1 * t42 * t1003 + 0.4e1 * t42 * t1007 + 0.2e1 * t42 * t1010 - t42 * t1058 - 0.2e1 * t375 * t116 + 0.2e1 * t169 * t230 - t169 * t264 - t223 * t179 + 0.4e1 * t89 * t380 - 0.2e1 * t89 * t402 + t990 * t61;
2254   t1061 = t70 * t1060;
2255   if(v3rho3 != NULL && (p->info->flags & XC_FLAGS_HAVE_KXC))
2256     v3rho2tau[0] = -t771 * t182 / 0.6e1 - t270 * t405 - 0.3e1 / 0.8e1 * t69 * t1061;
2257 
2258   t1067 = t670 * t410 * t80;
2259   t1069 = t410 * t676;
2260   t1071 = t674 * t1069 * t80;
2261   t1073 = t194 * t21;
2262   t1075 = 0.1e1 / t8 / t1073;
2263   t1078 = t207 * t1075 * t209 * t212;
2264   t1080 = t206 * t410;
2265   t1081 = t36 * t80;
2266   t1082 = t1080 * t1081;
2267   t1085 = t84 * t1075 * t217;
2268   t1087 = -0.60271427810638101992e-4 * t1067 + 0.78972228477366255147e-2 * t1071 + 0.63177782781893004117e-2 * t1078 + 0.40536374808075944542e-4 * t1082 - 0.12747325102880658436e-1 * t1085;
2269   t1088 = t16 * t1087;
2270   t1099 = t701 * t423;
2271   t1100 = t1099 * t115;
2272   t1103 = t291 * t317;
2273   t1107 = t228 * t446;
2274   t1108 = t1107 * t115;
2275   t1111 = t56 * t427;
2276   t1127 = t56 * t418;
2277   t1141 = t418 * t258;
2278   t1142 = t1141 * t313;
2279   t1145 = t52 * t286;
2280   t1149 = t427 * t755;
2281   t1150 = t106 * t88;
2282   t1157 = 0.53114609167735973502e-1 * t826 * t1111 * t88 - 0.12461621718547169973e1 * t830 * t301 * t427 - 0.70819478890314631336e-1 * t295 * t296 * t286 + 0.33230991249459119928e1 * t300 * t473 * t286 - 0.11432585570925925678e2 * t731 * t442 * t313 - 0.35409739445157315668e-1 * t295 * t1127 * t88 + 0.16615495624729559964e1 * t300 * t301 * t418 + 0.70819478890314631335e-1 * t44 * t94 * t1087 + 0.16615495624729559964e1 * t99 * t51 * t1087 * t111 - 0.76217237139506171188e1 * t256 * t1142 - 0.15243447427901234238e2 * t256 * t312 * t1145 + 0.10488523547622316684e3 * t752 * t1149 * t1150 - 0.76217237139506171188e1 * t256 * t442 * t88;
2283   t1158 = t92 * t1157;
2284   t1160 = t1088 * t61 - 0.6e1 * t42 * t1100 + 0.4e1 * t42 * t1103 + 0.2e1 * t42 * t1108 - t42 * t1158 - t419 * t116 + 0.4e1 * t128 * t292 - 0.2e1 * t128 * t318 - 0.2e1 * t287 * t138 + 0.2e1 * t89 * t424 - t89 * t447;
2285   t1161 = t70 * t1160;
2286   if(v3rho3 != NULL && (p->info->flags & XC_FLAGS_HAVE_KXC))
2287     v3rhosigma2[0] = -t270 * t450 / 0.2e1 - 0.3e1 / 0.8e1 * t69 * t1161;
2288 
2289   t1167 = t670 * t454 * t80;
2290   t1169 = t454 * t676;
2291   t1171 = t674 * t1169 * t80;
2292   t1174 = t206 * t454;
2293   t1175 = t1174 * t1081;
2294   t1178 = -0.12054285562127620398e-3 * t1167 + 0.15794445695473251029e-1 * t1171 + 0.10266389702057613169e-1 * t413 + 0.81072749616151889082e-4 * t1175 - 0.20714403292181069958e-1 * t416;
2295   t1179 = t16 * t1178;
2296   t1192 = t42 * t701;
2297   t1193 = t159 * t137;
2298   t1194 = t1193 * t115;
2299   t1197 = t920 * t137;
2300   t1200 = t339 * t317;
2301   t1204 = t228 * t488;
2302   t1205 = t1204 * t115;
2303   t1208 = t127 * t88;
2304   t1212 = t149 * t127;
2305   t1222 = t286 * t111;
2306   t1226 = t255 * t127;
2307   t1227 = t730 * t1226;
2308   t1233 = t56 * t462;
2309   t1247 = t462 * t258;
2310   t1248 = t1247 * t313;
2311   t1251 = t956 * t484;
2312   t1254 = t751 * t149;
2313   t1255 = t749 * t1254;
2314   t1256 = t755 * t106;
2315   t1257 = t1256 * t1208;
2316   t1263 = t357 * t1145;
2317   t1266 = 0.53114609167735973502e-1 * t826 * t343 * t1208 - 0.12461621718547169973e1 * t830 * t301 * t1212 - 0.35409739445157315668e-1 * t295 * t933 * t127 - 0.35409739445157315668e-1 * t295 * t343 * t286 + 0.16615495624729559964e1 * t300 * t1222 * t149 - 0.11432585570925925678e2 * t1227 * t358 + 0.16615495624729559964e1 * t300 * t473 * t334 - 0.35409739445157315668e-1 * t295 * t1233 * t88 + 0.16615495624729559964e1 * t300 * t301 * t462 + 0.70819478890314631335e-1 * t44 * t94 * t1178 + 0.16615495624729559964e1 * t99 * t51 * t1178 * t111 - 0.76217237139506171188e1 * t256 * t1248 - 0.76217237139506171188e1 * t256 * t1251 + 0.10488523547622316684e3 * t1255 * t1257 - 0.76217237139506171188e1 * t256 * t357 * t1208 - 0.76217237139506171188e1 * t256 * t1263;
2318   t1267 = t92 * t1266;
2319   t1269 = -t463 * t116 + t1179 * t61 - 0.6e1 * t1192 * t1194 + 0.2e1 * t42 * t1197 + 0.2e1 * t42 * t1200 + 0.2e1 * t42 * t1205 - t42 * t1267 + 0.2e1 * t128 * t340 - t128 * t362 - t335 * t138 + 0.2e1 * t150 * t292 - t150 * t318 - t287 * t160 + 0.2e1 * t89 * t467 - t89 * t489;
2320   t1270 = t70 * t1269;
2321   if(v3rho3 != NULL && (p->info->flags & XC_FLAGS_NEEDS_LAPLACIAN) && (p->info->flags & XC_FLAGS_HAVE_KXC))
2322     v3rhosigmalapl[0] = -t270 * t492 / 0.2e1 - 0.3e1 / 0.8e1 * t69 * t1270;
2323 
2324   t1280 = 0.48217142248510481592e-3 * t1167 - 0.63177782781893004115e-1 * t1171 - 0.41065558808230452675e-1 * t413 - 0.32429099846460755633e-3 * t1175 + 0.82857613168724279834e-1 * t416;
2325   t1281 = t16 * t1280;
2326   t1294 = t178 * t137;
2327   t1295 = t1294 * t115;
2328   t1298 = t1006 * t137;
2329   t1301 = t379 * t317;
2330   t1305 = t228 * t521;
2331   t1306 = t1305 * t115;
2332   t1312 = t168 * t127;
2333   t1330 = t56 * t497;
2334   t1344 = t497 * t258;
2335   t1345 = t1344 * t313;
2336   t1348 = t1043 * t484;
2337   t1352 = t749 * t751 * t168;
2338   t1355 = t397 * t1208;
2339   t1358 = t397 * t1145;
2340   t1361 = 0.53114609167735973502e-1 * t826 * t383 * t1208 - 0.12461621718547169973e1 * t830 * t301 * t1312 - 0.35409739445157315668e-1 * t295 * t1019 * t127 - 0.35409739445157315668e-1 * t295 * t383 * t286 + 0.16615495624729559964e1 * t300 * t1222 * t168 - 0.11432585570925925678e2 * t1227 * t398 + 0.16615495624729559964e1 * t300 * t473 * t374 - 0.35409739445157315668e-1 * t295 * t1330 * t88 + 0.16615495624729559964e1 * t300 * t301 * t497 + 0.70819478890314631335e-1 * t44 * t94 * t1280 + 0.16615495624729559964e1 * t99 * t51 * t1280 * t111 - 0.76217237139506171188e1 * t256 * t1345 - 0.76217237139506171188e1 * t256 * t1348 + 0.10488523547622316684e3 * t1352 * t1257 - 0.76217237139506171188e1 * t256 * t1355 - 0.76217237139506171188e1 * t256 * t1358;
2341   t1362 = t92 * t1361;
2342   t1364 = -t498 * t116 - 0.6e1 * t1192 * t1295 + 0.2e1 * t128 * t380 - t128 * t402 + t1281 * t61 + 0.2e1 * t42 * t1298 + 0.2e1 * t42 * t1301 + 0.2e1 * t42 * t1306 - t42 * t1362 - t375 * t138 + 0.2e1 * t169 * t292 - t169 * t318 - t287 * t179 + 0.2e1 * t89 * t502 - t89 * t522;
2343   t1365 = t70 * t1364;
2344   if(v3rho3 != NULL && (p->info->flags & XC_FLAGS_HAVE_KXC))
2345     v3rhosigmatau[0] = -t270 * t525 / 0.2e1 - 0.3e1 / 0.8e1 * t69 * t1365;
2346 
2347   t1371 = t670 * t529 * t80;
2348   t1373 = t529 * t676;
2349   t1375 = t674 * t1373 * t80;
2350   t1378 = t206 * t529;
2351   t1379 = t1378 * t1081;
2352   t1382 = -0.24108571124255240796e-3 * t1371 + 0.31588891390946502057e-1 * t1375 + 0.15794445695473251029e-1 * t457 + 0.16214549923230377817e-3 * t1379 - 0.31868312757201646090e-1 * t460;
2353   t1383 = t16 * t1382;
2354   t1394 = t701 * t542;
2355   t1395 = t1394 * t115;
2356   t1398 = t339 * t361;
2357   t1402 = t228 * t565;
2358   t1403 = t1402 * t115;
2359   t1406 = t56 * t546;
2360   t1419 = t561 * t313;
2361   t1422 = t56 * t537;
2362   t1436 = t537 * t258;
2363   t1437 = t1436 * t313;
2364   t1440 = t52 * t334;
2365   t1444 = t546 * t755;
2366   t1451 = 0.53114609167735973502e-1 * t826 * t1406 * t88 - 0.12461621718547169973e1 * t830 * t301 * t546 - 0.70819478890314631336e-1 * t295 * t343 * t334 + 0.33230991249459119928e1 * t300 * t585 * t334 - 0.11432585570925925678e2 * t731 * t1419 - 0.35409739445157315668e-1 * t295 * t1422 * t88 + 0.16615495624729559964e1 * t300 * t301 * t537 + 0.70819478890314631335e-1 * t44 * t94 * t1382 + 0.16615495624729559964e1 * t99 * t51 * t1382 * t111 - 0.76217237139506171188e1 * t256 * t1437 - 0.15243447427901234238e2 * t256 * t357 * t1440 + 0.10488523547622316684e3 * t752 * t1444 * t1150 - 0.76217237139506171188e1 * t256 * t561 * t88;
2367   t1452 = t92 * t1451;
2368   t1454 = -t538 * t116 + t1383 * t61 - 0.6e1 * t42 * t1395 + 0.4e1 * t42 * t1398 + 0.2e1 * t42 * t1403 - t42 * t1452 + 0.4e1 * t150 * t340 - 0.2e1 * t150 * t362 - 0.2e1 * t335 * t160 + 0.2e1 * t89 * t543 - t89 * t566;
2369   t1455 = t70 * t1454;
2370   if(v3rho3 != NULL && (p->info->flags & XC_FLAGS_NEEDS_LAPLACIAN) && (p->info->flags & XC_FLAGS_HAVE_KXC))
2371     v3rholapl2[0] = -t270 * t569 / 0.2e1 - 0.3e1 / 0.8e1 * t69 * t1455;
2372 
2373   t1465 = 0.96434284497020963181e-3 * t1371 - 0.12635556556378600823e0 * t1375 - 0.63177782781893004113e-1 * t457 - 0.64858199692921511265e-3 * t1379 + 0.12747325102880658436e0 * t460;
2374   t1466 = t16 * t1465;
2375   t1479 = t178 * t159;
2376   t1480 = t1479 * t115;
2377   t1483 = t1006 * t159;
2378   t1486 = t379 * t361;
2379   t1490 = t228 * t600;
2380   t1491 = t1490 * t115;
2381   t1494 = t149 * t88;
2382   t1498 = t168 * t149;
2383   t1508 = t334 * t111;
2384   t1512 = t255 * t149;
2385   t1513 = t730 * t1512;
2386   t1519 = t56 * t574;
2387   t1533 = t574 * t258;
2388   t1534 = t1533 * t313;
2389   t1537 = t1043 * t596;
2390   t1540 = t1256 * t1494;
2391   t1546 = t397 * t1440;
2392   t1549 = 0.53114609167735973502e-1 * t826 * t383 * t1494 - 0.12461621718547169973e1 * t830 * t301 * t1498 - 0.35409739445157315668e-1 * t295 * t1019 * t149 - 0.35409739445157315668e-1 * t295 * t383 * t334 + 0.16615495624729559964e1 * t300 * t1508 * t168 - 0.11432585570925925678e2 * t1513 * t398 + 0.16615495624729559964e1 * t300 * t585 * t374 - 0.35409739445157315668e-1 * t295 * t1519 * t88 + 0.16615495624729559964e1 * t300 * t301 * t574 + 0.70819478890314631335e-1 * t44 * t94 * t1465 + 0.16615495624729559964e1 * t99 * t51 * t1465 * t111 - 0.76217237139506171188e1 * t256 * t1534 - 0.76217237139506171188e1 * t256 * t1537 + 0.10488523547622316684e3 * t1352 * t1540 - 0.76217237139506171188e1 * t256 * t397 * t1494 - 0.76217237139506171188e1 * t256 * t1546;
2393   t1550 = t92 * t1549;
2394   t1552 = -t575 * t116 - 0.6e1 * t1192 * t1480 + t1466 * t61 + 0.2e1 * t42 * t1483 + 0.2e1 * t42 * t1486 + 0.2e1 * t42 * t1491 + 0.2e1 * t150 * t380 - t150 * t402 - t42 * t1550 - t375 * t160 + 0.2e1 * t169 * t340 - t169 * t362 - t335 * t179 + 0.2e1 * t89 * t579 - t89 * t601;
2395   t1553 = t70 * t1552;
2396   if(v3rho3 != NULL && (p->info->flags & XC_FLAGS_NEEDS_LAPLACIAN) && (p->info->flags & XC_FLAGS_HAVE_KXC))
2397     v3rholapltau[0] = -t270 * t604 / 0.2e1 - 0.3e1 / 0.8e1 * t69 * t1553;
2398 
2399   t1563 = -0.38573713798808385273e-2 * t1371 + 0.50542226225514403291e0 * t1375 + 0.25271113112757201646e0 * t457 + 0.25943279877168604506e-2 * t1379 - 0.50989300411522633743e0 * t460;
2400   t1564 = t16 * t1563;
2401   t1575 = t701 * t614;
2402   t1576 = t1575 * t115;
2403   t1579 = t379 * t401;
2404   t1583 = t228 * t637;
2405   t1584 = t1583 * t115;
2406   t1587 = t56 * t618;
2407   t1597 = t168 * t111;
2408   t1601 = t633 * t313;
2409   t1604 = t56 * t609;
2410   t1618 = t609 * t258;
2411   t1619 = t1618 * t313;
2412   t1622 = t52 * t374;
2413   t1626 = t618 * t755;
2414   t1633 = 0.53114609167735973502e-1 * t826 * t1587 * t88 - 0.12461621718547169973e1 * t830 * t301 * t618 - 0.70819478890314631336e-1 * t295 * t383 * t374 + 0.33230991249459119928e1 * t300 * t1597 * t374 - 0.11432585570925925678e2 * t731 * t1601 - 0.35409739445157315668e-1 * t295 * t1604 * t88 + 0.16615495624729559964e1 * t300 * t301 * t609 + 0.70819478890314631335e-1 * t44 * t94 * t1563 + 0.16615495624729559964e1 * t99 * t51 * t1563 * t111 - 0.76217237139506171188e1 * t256 * t1619 - 0.15243447427901234238e2 * t256 * t397 * t1622 + 0.10488523547622316684e3 * t752 * t1626 * t1150 - 0.76217237139506171188e1 * t256 * t633 * t88;
2415   t1634 = t92 * t1633;
2416   t1636 = -t610 * t116 + t1564 * t61 - 0.6e1 * t42 * t1576 + 0.4e1 * t42 * t1579 + 0.2e1 * t42 * t1584 - t42 * t1634 + 0.4e1 * t169 * t380 - 0.2e1 * t169 * t402 - 0.2e1 * t375 * t179 + 0.2e1 * t89 * t615 - t89 * t638;
2417   t1637 = t70 * t1636;
2418   if(v3rho3 != NULL && (p->info->flags & XC_FLAGS_HAVE_KXC))
2419     v3rhotau2[0] = -t270 * t641 / 0.2e1 - 0.3e1 / 0.8e1 * t69 * t1637;
2420 
2421   t1640 = t194 * t194;
2422   t1641 = 0.1e1 / t1640;
2423   t1642 = t670 * t1641;
2424   t1645 = t674 * t1641 * t676;
2425   t1647 = t206 * t1641;
2426   t1648 = t1647 * t36;
2427   t1650 = 0.75339284763297627492e-5 * t1642 - 0.98715285596707818933e-3 * t1645 - 0.50670468510094930677e-5 * t1648;
2428   t1651 = t16 * t1650;
2429   t1659 = t423 * t137;
2430   t1660 = t701 * t1659;
2431   t1663 = t291 * t446;
2432   t1666 = t427 * t127;
2433   t1680 = t1666 * t258;
2434   t1694 = t1666 * t755;
2435   t1702 = 0.53114609167735973502e-1 * t44 * t713 * t1666 - 0.12461621718547169973e1 * t718 * t51 * t1666 * t111 - 0.10622921833547194700e0 * t295 * t296 * t418 + 0.49846486874188679892e1 * t300 * t473 * t418 - 0.11432585570925925678e2 * t731 * t1680 * t52 + 0.70819478890314631335e-1 * t44 * t94 * t1650 + 0.16615495624729559964e1 * t99 * t51 * t1650 * t111 - 0.22865171141851851357e2 * t256 * t1141 * t484 + 0.10488523547622316684e3 * t752 * t1694 * t106 - 0.76217237139506171188e1 * t254 * t255 * t1666 * t258;
2436   t1703 = t92 * t1702;
2437   t1706 = t70 * (0.6e1 * t128 * t424 - 0.3e1 * t128 * t447 - 0.3e1 * t419 * t138 + t1651 * t61 - 0.6e1 * t42 * t1660 + 0.6e1 * t42 * t1663 - t42 * t1703);
2438   if(v3rho3 != NULL && (p->info->flags & XC_FLAGS_HAVE_KXC))
2439     v3sigma3[0] = -0.3e1 / 0.8e1 * t69 * t1706;
2440 
2441   t1709 = t194 * t73;
2442   t1710 = 0.1e1 / t1709;
2443   t1711 = t670 * t1710;
2444   t1714 = t674 * t1710 * t676;
2445   t1716 = t206 * t1710;
2446   t1717 = t1716 * t36;
2447   t1719 = 0.15067856952659525498e-4 * t1711 - 0.19743057119341563786e-2 * t1714 - 0.10134093702018986135e-4 * t1717;
2448   t1720 = t16 * t1719;
2449   t1732 = t916 * t423;
2450   t1735 = t1204 * t137;
2451   t1738 = t339 * t446;
2452   t1744 = t427 * t111;
2453   t1754 = t418 * t111;
2454   t1771 = t1247 * t484;
2455   t1774 = t106 * t427;
2456   t1781 = t52 * t418;
2457   t1785 = 0.53114609167735973502e-1 * t826 * t343 * t427 - 0.12461621718547169973e1 * t830 * t1744 * t149 - 0.70819478890314631336e-1 * t295 * t1233 * t127 - 0.35409739445157315668e-1 * t295 * t343 * t418 + 0.16615495624729559964e1 * t300 * t1754 * t149 - 0.11432585570925925678e2 * t731 * t442 * t596 + 0.33230991249459119928e1 * t300 * t473 * t462 + 0.70819478890314631335e-1 * t44 * t94 * t1719 + 0.16615495624729559964e1 * t99 * t51 * t1719 * t111 - 0.15243447427901234238e2 * t256 * t1771 + 0.10488523547622316684e3 * t752 * t960 * t1774 - 0.76217237139506171188e1 * t256 * t357 * t427 - 0.76217237139506171188e1 * t256 * t357 * t1781;
2458   t1786 = t92 * t1785;
2459   t1788 = 0.4e1 * t128 * t467 - 0.2e1 * t128 * t489 - 0.2e1 * t463 * t138 + 0.2e1 * t150 * t424 - t150 * t447 - t419 * t160 + t1720 * t61 - 0.6e1 * t42 * t1732 + 0.4e1 * t42 * t1735 + 0.2e1 * t42 * t1738 - t42 * t1786;
2460   t1789 = t70 * t1788;
2461   if(v3rho3 != NULL && (p->info->flags & XC_FLAGS_NEEDS_LAPLACIAN) && (p->info->flags & XC_FLAGS_HAVE_KXC))
2462     v3sigma2lapl[0] = -0.3e1 / 0.8e1 * t69 * t1789;
2463 
2464   t1795 = -0.60271427810638101992e-4 * t1711 + 0.78972228477366255144e-2 * t1714 + 0.40536374808075944541e-4 * t1717;
2465   t1796 = t16 * t1795;
2466   t1808 = t1002 * t423;
2467   t1811 = t1305 * t137;
2468   t1814 = t379 * t446;
2469   t1845 = t1344 * t484;
2470   t1848 = t1047 * t1774;
2471   t1854 = t397 * t1781;
2472   t1857 = 0.53114609167735973502e-1 * t826 * t383 * t427 - 0.12461621718547169973e1 * t830 * t1744 * t168 - 0.70819478890314631336e-1 * t295 * t1330 * t127 - 0.35409739445157315668e-1 * t295 * t383 * t418 + 0.16615495624729559964e1 * t300 * t1754 * t168 - 0.11432585570925925678e2 * t731 * t442 * t1029 + 0.33230991249459119928e1 * t300 * t473 * t497 + 0.70819478890314631335e-1 * t44 * t94 * t1795 + 0.16615495624729559964e1 * t99 * t51 * t1795 * t111 - 0.15243447427901234238e2 * t256 * t1845 + 0.10488523547622316684e3 * t752 * t1848 - 0.76217237139506171188e1 * t256 * t397 * t427 - 0.76217237139506171188e1 * t256 * t1854;
2473   t1858 = t92 * t1857;
2474   t1860 = 0.4e1 * t128 * t502 - 0.2e1 * t128 * t522 - 0.2e1 * t498 * t138 + 0.2e1 * t169 * t424 - t169 * t447 - t419 * t179 + t1796 * t61 - 0.6e1 * t42 * t1808 + 0.4e1 * t42 * t1811 + 0.2e1 * t42 * t1814 - t42 * t1858;
2475   t1861 = t70 * t1860;
2476   if(v3rho3 != NULL && (p->info->flags & XC_FLAGS_HAVE_KXC))
2477     v3sigma2tau[0] = -0.3e1 / 0.8e1 * t69 * t1861;
2478 
2479   t1864 = 0.1e1 / t1073;
2480   t1865 = t670 * t1864;
2481   t1868 = t674 * t1864 * t676;
2482   t1870 = t206 * t1864;
2483   t1871 = t1870 * t36;
2484   t1873 = 0.30135713905319050996e-4 * t1865 - 0.39486114238683127572e-2 * t1868 - 0.20268187404037972271e-4 * t1871;
2485   t1874 = t16 * t1873;
2486   t1885 = t1394 * t137;
2487   t1888 = t339 * t488;
2488   t1892 = t1402 * t137;
2489   t1923 = t1436 * t484;
2490   t1926 = t52 * t462;
2491   t1930 = t106 * t127;
2492   t1937 = 0.53114609167735973502e-1 * t826 * t1406 * t127 - 0.12461621718547169973e1 * t830 * t473 * t546 - 0.70819478890314631336e-1 * t295 * t343 * t462 + 0.33230991249459119928e1 * t300 * t585 * t462 - 0.11432585570925925678e2 * t731 * t561 * t484 - 0.35409739445157315668e-1 * t295 * t1422 * t127 + 0.16615495624729559964e1 * t300 * t473 * t537 + 0.70819478890314631335e-1 * t44 * t94 * t1873 + 0.16615495624729559964e1 * t99 * t51 * t1873 * t111 - 0.76217237139506171188e1 * t256 * t1923 - 0.15243447427901234238e2 * t256 * t357 * t1926 + 0.10488523547622316684e3 * t752 * t1444 * t1930 - 0.76217237139506171188e1 * t256 * t561 * t127;
2493   t1938 = t92 * t1937;
2494   t1940 = 0.2e1 * t128 * t543 - t128 * t566 - t538 * t138 + 0.4e1 * t150 * t467 - 0.2e1 * t150 * t489 - 0.2e1 * t463 * t160 + t1874 * t61 - 0.6e1 * t42 * t1885 + 0.4e1 * t42 * t1888 + 0.2e1 * t42 * t1892 - t42 * t1938;
2495   t1941 = t70 * t1940;
2496   if(v3rho3 != NULL && (p->info->flags & XC_FLAGS_NEEDS_LAPLACIAN) && (p->info->flags & XC_FLAGS_HAVE_KXC))
2497     v3sigmalapl2[0] = -0.3e1 / 0.8e1 * t69 * t1941;
2498 
2499   t1947 = -0.12054285562127620398e-3 * t1865 + 0.15794445695473251028e-1 * t1868 + 0.81072749616151889082e-4 * t1871;
2500   t1948 = t16 * t1947;
2501   t1961 = t1479 * t137;
2502   t1964 = t1305 * t159;
2503   t1967 = t379 * t488;
2504   t1971 = t1490 * t137;
2505   t1977 = t473 * t1498;
2506   t1986 = t462 * t111;
2507   t2008 = t1533 * t484;
2508   t2011 = t1344 * t596;
2509   t2014 = t1256 * t1212;
2510   t2020 = t397 * t1926;
2511   t2023 = 0.53114609167735973502e-1 * t826 * t383 * t1212 - 0.12461621718547169973e1 * t830 * t1977 - 0.35409739445157315668e-1 * t295 * t1330 * t149 - 0.35409739445157315668e-1 * t295 * t383 * t462 + 0.16615495624729559964e1 * t300 * t1986 * t168 - 0.11432585570925925678e2 * t1513 * t518 + 0.16615495624729559964e1 * t300 * t585 * t497 - 0.35409739445157315668e-1 * t295 * t1519 * t127 + 0.16615495624729559964e1 * t300 * t473 * t574 + 0.70819478890314631335e-1 * t44 * t94 * t1947 + 0.16615495624729559964e1 * t99 * t51 * t1947 * t111 - 0.76217237139506171188e1 * t256 * t2008 - 0.76217237139506171188e1 * t256 * t2011 + 0.10488523547622316684e3 * t1352 * t2014 - 0.76217237139506171188e1 * t256 * t397 * t1212 - 0.76217237139506171188e1 * t256 * t2020;
2512   t2024 = t92 * t2023;
2513   t2026 = -0.6e1 * t1192 * t1961 + 0.2e1 * t128 * t579 - t128 * t601 - t575 * t138 + 0.2e1 * t150 * t502 - t150 * t522 - t498 * t160 + 0.2e1 * t169 * t467 - t169 * t489 - t463 * t179 + t1948 * t61 + 0.2e1 * t42 * t1964 + 0.2e1 * t42 * t1967 + 0.2e1 * t42 * t1971 - t42 * t2024;
2514   t2027 = t70 * t2026;
2515   if(v3rho3 != NULL && (p->info->flags & XC_FLAGS_NEEDS_LAPLACIAN) && (p->info->flags & XC_FLAGS_HAVE_KXC))
2516     v3sigmalapltau[0] = -0.3e1 / 0.8e1 * t69 * t2027;
2517 
2518   t2033 = 0.48217142248510481592e-3 * t1865 - 0.63177782781893004114e-1 * t1868 - 0.32429099846460755632e-3 * t1871;
2519   t2034 = t16 * t2033;
2520   t2045 = t1575 * t137;
2521   t2048 = t379 * t521;
2522   t2052 = t1583 * t137;
2523   t2067 = t633 * t484;
2524   t2083 = t1618 * t484;
2525   t2086 = t52 * t497;
2526   t2096 = 0.53114609167735973502e-1 * t826 * t1587 * t127 - 0.12461621718547169973e1 * t830 * t473 * t618 - 0.70819478890314631336e-1 * t295 * t383 * t497 + 0.33230991249459119928e1 * t300 * t1597 * t497 - 0.11432585570925925678e2 * t731 * t2067 - 0.35409739445157315668e-1 * t295 * t1604 * t127 + 0.16615495624729559964e1 * t300 * t473 * t609 + 0.70819478890314631335e-1 * t44 * t94 * t2033 + 0.16615495624729559964e1 * t99 * t51 * t2033 * t111 - 0.76217237139506171188e1 * t256 * t2083 - 0.15243447427901234238e2 * t256 * t397 * t2086 + 0.10488523547622316684e3 * t752 * t1626 * t1930 - 0.76217237139506171188e1 * t256 * t633 * t127;
2527   t2097 = t92 * t2096;
2528   t2099 = 0.2e1 * t128 * t615 - t128 * t638 - t610 * t138 + 0.4e1 * t169 * t502 - 0.2e1 * t169 * t522 - 0.2e1 * t498 * t179 + t2034 * t61 - 0.6e1 * t42 * t2045 + 0.4e1 * t42 * t2048 + 0.2e1 * t42 * t2052 - t42 * t2097;
2529   t2100 = t70 * t2099;
2530   if(v3rho3 != NULL && (p->info->flags & XC_FLAGS_HAVE_KXC))
2531     v3sigmatau2[0] = -0.3e1 / 0.8e1 * t69 * t2100;
2532 
2533   t2103 = 0.1e1 / t408;
2534   t2104 = t670 * t2103;
2535   t2107 = t674 * t2103 * t676;
2536   t2109 = t206 * t2103;
2537   t2110 = t2109 * t36;
2538   t2112 = 0.60271427810638101989e-4 * t2104 - 0.78972228477366255143e-2 * t2107 - 0.40536374808075944541e-4 * t2110;
2539   t2113 = t16 * t2112;
2540   t2121 = t542 * t159;
2541   t2122 = t701 * t2121;
2542   t2125 = t339 * t565;
2543   t2128 = t546 * t149;
2544   t2142 = t2128 * t258;
2545   t2156 = t2128 * t755;
2546   t2164 = 0.53114609167735973502e-1 * t44 * t713 * t2128 - 0.12461621718547169973e1 * t718 * t51 * t2128 * t111 - 0.10622921833547194700e0 * t295 * t343 * t537 + 0.49846486874188679892e1 * t300 * t585 * t537 - 0.11432585570925925678e2 * t731 * t2142 * t52 + 0.70819478890314631335e-1 * t44 * t94 * t2112 + 0.16615495624729559964e1 * t99 * t51 * t2112 * t111 - 0.22865171141851851357e2 * t256 * t1436 * t596 + 0.10488523547622316684e3 * t752 * t2156 * t106 - 0.76217237139506171188e1 * t254 * t255 * t2128 * t258;
2547   t2165 = t92 * t2164;
2548   t2168 = t70 * (0.6e1 * t150 * t543 - 0.3e1 * t150 * t566 - 0.3e1 * t538 * t160 + t2113 * t61 - 0.6e1 * t42 * t2122 + 0.6e1 * t42 * t2125 - t42 * t2165);
2549   if(v3rho3 != NULL && (p->info->flags & XC_FLAGS_NEEDS_LAPLACIAN) && (p->info->flags & XC_FLAGS_HAVE_KXC))
2550     v3lapl3[0] = -0.3e1 / 0.8e1 * t69 * t2168;
2551 
2552   t2174 = -0.24108571124255240795e-3 * t2104 + 0.31588891390946502057e-1 * t2107 + 0.16214549923230377816e-3 * t2110;
2553   t2175 = t16 * t2174;
2554   t2187 = t1002 * t542;
2555   t2190 = t1490 * t159;
2556   t2193 = t379 * t565;
2557   t2199 = t546 * t111;
2558   t2209 = t537 * t111;
2559   t2226 = t1533 * t596;
2560   t2229 = t106 * t546;
2561   t2236 = t52 * t537;
2562   t2240 = 0.53114609167735973502e-1 * t826 * t383 * t546 - 0.12461621718547169973e1 * t830 * t2199 * t168 - 0.70819478890314631336e-1 * t295 * t1519 * t149 - 0.35409739445157315668e-1 * t295 * t383 * t537 + 0.16615495624729559964e1 * t300 * t2209 * t168 - 0.11432585570925925678e2 * t731 * t561 * t1029 + 0.33230991249459119928e1 * t300 * t585 * t574 + 0.70819478890314631335e-1 * t44 * t94 * t2174 + 0.16615495624729559964e1 * t99 * t51 * t2174 * t111 - 0.15243447427901234238e2 * t256 * t2226 + 0.10488523547622316684e3 * t752 * t1047 * t2229 - 0.76217237139506171188e1 * t256 * t397 * t546 - 0.76217237139506171188e1 * t256 * t397 * t2236;
2563   t2241 = t92 * t2240;
2564   t2243 = 0.4e1 * t150 * t579 - 0.2e1 * t150 * t601 - 0.2e1 * t575 * t160 + 0.2e1 * t169 * t543 - t169 * t566 - t538 * t179 + t2175 * t61 - 0.6e1 * t42 * t2187 + 0.4e1 * t42 * t2190 + 0.2e1 * t42 * t2193 - t42 * t2241;
2565   t2244 = t70 * t2243;
2566   if(v3rho3 != NULL && (p->info->flags & XC_FLAGS_NEEDS_LAPLACIAN) && (p->info->flags & XC_FLAGS_HAVE_KXC))
2567     v3lapl2tau[0] = -0.3e1 / 0.8e1 * t69 * t2244;
2568 
2569   t2250 = 0.96434284497020963182e-3 * t2104 - 0.12635556556378600823e0 * t2107 - 0.64858199692921511265e-3 * t2110;
2570   t2251 = t16 * t2250;
2571   t2262 = t1575 * t159;
2572   t2265 = t379 * t600;
2573   t2269 = t1583 * t159;
2574   t2300 = t1618 * t596;
2575   t2303 = t52 * t574;
2576   t2307 = t106 * t149;
2577   t2314 = 0.53114609167735973502e-1 * t826 * t1587 * t149 - 0.12461621718547169973e1 * t830 * t585 * t618 - 0.70819478890314631336e-1 * t295 * t383 * t574 + 0.33230991249459119928e1 * t300 * t1597 * t574 - 0.11432585570925925678e2 * t731 * t633 * t596 - 0.35409739445157315668e-1 * t295 * t1604 * t149 + 0.16615495624729559964e1 * t300 * t585 * t609 + 0.70819478890314631335e-1 * t44 * t94 * t2250 + 0.16615495624729559964e1 * t99 * t51 * t2250 * t111 - 0.76217237139506171188e1 * t256 * t2300 - 0.15243447427901234238e2 * t256 * t397 * t2303 + 0.10488523547622316684e3 * t752 * t1626 * t2307 - 0.76217237139506171188e1 * t256 * t633 * t149;
2578   t2315 = t92 * t2314;
2579   t2317 = 0.2e1 * t150 * t615 - t150 * t638 - t610 * t160 + 0.4e1 * t169 * t579 - 0.2e1 * t169 * t601 - 0.2e1 * t575 * t179 + t2251 * t61 - 0.6e1 * t42 * t2262 + 0.4e1 * t42 * t2265 + 0.2e1 * t42 * t2269 - t42 * t2315;
2580   t2318 = t70 * t2317;
2581   if(v3rho3 != NULL && (p->info->flags & XC_FLAGS_NEEDS_LAPLACIAN) && (p->info->flags & XC_FLAGS_HAVE_KXC))
2582     v3lapltau2[0] = -0.3e1 / 0.8e1 * t69 * t2318;
2583 
2584   t2324 = -0.38573713798808385273e-2 * t2104 + 0.50542226225514403291e0 * t2107 + 0.25943279877168604506e-2 * t2110;
2585   t2325 = t16 * t2324;
2586   t2333 = t614 * t178;
2587   t2334 = t701 * t2333;
2588   t2337 = t379 * t637;
2589   t2340 = t618 * t168;
2590   t2354 = t2340 * t258;
2591   t2368 = t2340 * t755;
2592   t2376 = 0.53114609167735973502e-1 * t44 * t713 * t2340 - 0.12461621718547169973e1 * t718 * t51 * t2340 * t111 - 0.10622921833547194700e0 * t295 * t383 * t609 + 0.49846486874188679892e1 * t300 * t1597 * t609 - 0.11432585570925925678e2 * t731 * t2354 * t52 + 0.70819478890314631335e-1 * t44 * t94 * t2324 + 0.16615495624729559964e1 * t99 * t51 * t2324 * t111 - 0.22865171141851851357e2 * t256 * t1618 * t1029 + 0.10488523547622316684e3 * t752 * t2368 * t106 - 0.76217237139506171188e1 * t254 * t255 * t2340 * t258;
2593   t2377 = t92 * t2376;
2594   t2380 = t70 * (0.6e1 * t169 * t615 - 0.3e1 * t169 * t638 - 0.3e1 * t610 * t179 + t2325 * t61 - 0.6e1 * t42 * t2334 + 0.6e1 * t42 * t2337 - t42 * t2377);
2595   if(v3rho3 != NULL && (p->info->flags & XC_FLAGS_HAVE_KXC))
2596     v3tau3[0] = -0.3e1 / 0.8e1 * t69 * t2380;
2597 
2598 #ifndef XC_DONT_COMPILE_LXC
2599 
2600   if(order < 4) return;
2601 
2602 
2603   t2398 = 0.1e1 / t17 / t1073;
2604   t2405 = (0.6160e4 / 0.81e2 * tau[0] * t657 - 0.2618e4 / 0.81e2 * sigma[0] * t2398 - 0.1540e4 / 0.81e2 * lapl[0] * t657) * t29 * t32;
2605   t2410 = t37 * t37;
2606   t2411 = 0.1e1 / t40 / t666 / t39 * t2410;
2607   t2412 = t208 * t208;
2608   t2414 = t2412 * t29 * t32;
2609   t2417 = t668 * t37;
2610   t2423 = t206 * t2412;
2611   t2424 = t29 * t32;
2612   t2425 = t2424 * t676;
2613   t2432 = t201 * t201;
2614   t2437 = t217 * t662;
2615   t2440 = t36 * t201;
2616   t2452 = -0.39111111111111111111e0 * t2405 - 0.53104860383639490765e-2 * t2411 * t2414 + 0.12857904599602795091e-1 * t2417 * t2414 - 0.23144228279285031164e-1 * t670 * t208 * t201 - 0.28079014569730224051e0 * t2423 * t2425 + 0.30325335735308641974e1 * t674 * t208 * t676 * t201 - 0.22744001801481481481e0 * t207 * t2432 * t209 * t212 - 0.30325335735308641975e0 * t680 * t2437 + 0.15565967926301162704e-1 * t790 * t2440 - 0.14412933265093669170e-2 * t2423 * t2424 + 0.45890370370370370369e0 * t84 * t2432 * t217 + 0.61187160493827160492e0 * t280 * t2437 - 0.27534222222222222222e0 * t85 * t2405;
2617   t2468 = 0.1e1 / t700 / t60;
2618   t2469 = t229 * t229;
2619   t2477 = t263 * t263;
2620   t2491 = t98 * t712;
2621   t2492 = t236 * t236;
2622   t2497 = t252 * t252;
2623   t2500 = 0.1e1 / t2497 / t101 * t45;
2624   t2501 = t750 * t255;
2625   t2502 = t2500 * t2501;
2626   t2505 = 0.1e1 / t110 / t753 / t109;
2627   t2507 = t106 * t52;
2628   t2511 = t222 * t222;
2629   t2523 = t748 * t93;
2630   t2524 = t2523 * t751;
2631   t2525 = t2492 * t755;
2632   t2536 = t253 * t234;
2633   t2537 = t2536 * t255;
2634   t2550 = 0.1e1 / t45 / t710 / t41;
2635   t2551 = t2550 * t56;
2636   t2576 = 0.16615495624729559964e1 * t99 * t51 * t2452 * t111 + 0.70819478890314631335e-1 * t44 * t94 * t2452 + 0.24923243437094339947e1 * t2491 * t51 * t2492 * t111 - 0.24056046973484009303e4 * t2502 * t2492 * t2505 * t2507 + 0.49846486874188679892e1 * t240 * t51 * t2511 * t111 + 0.66461982498918239856e1 * t300 * t301 * t691 - 0.15243447427901234237e2 * t730 * t255 * t2492 * t258 + 0.20977047095244633367e3 * t2524 * t2525 * t106 + 0.31868765500641584101e0 * t826 * t56 * t236 * t222 - 0.74769730311283019838e1 * t830 * t831 * t222 + 0.11432585570925925678e2 * t2537 * t2492 * t258 * t52 - 0.10622921833547194700e0 * t44 * t235 * t2511 - 0.14163895778062926267e0 * t295 * t723 * t691 - 0.13278652291933993376e0 * t44 * t2551 * t2492 - 0.30486894855802468476e2 * t256 * t691 * t258 * t313 - 0.45730342283703702713e2 * t256 * t743 * t236 - 0.22865171141851851357e2 * t256 * t2511 * t258 * t52 + 0.62931141285733900104e3 * t752 * t222 * t755 * t864 + 0.31465570642866950052e3 * t752 * t2525 * t52 - 0.68595513425555554068e2 * t731 * t259 * t871;
2637   t2579 = -0.36e2 * t42 * t701 * t229 * t263 + t16 * t2452 * t61 + 0.6e1 * t42 * t228 * t2477 + 0.24e2 * t42 * t2468 * t2469 - t42 * t92 * t2576 + 0.8e1 * t42 * t706 * t764 - 0.4e1 * t692 * t116 + 0.12e2 * t223 * t230 - 0.6e1 * t223 * t264 - 0.24e2 * t89 * t703 + 0.24e2 * t89 * t707 - 0.4e1 * t89 * t765;
2638   if(v4rho4 != NULL && (p->info->flags & XC_FLAGS_HAVE_LXC))
2639     v4rho4[0] = -0.5e1 / 0.27e2 * t5 * t7 * t23 * t63 + 0.4e1 / 0.9e1 * t5 * t644 * t118 - t5 * t186 * t266 - 0.2e1 * t5 * t9 * t767 - 0.3e1 / 0.8e1 * t69 * t70 * t2579;
2640 
2641   t2583 = t19 * t2;
2642   t2590 = t751 * t127;
2643   t2591 = t749 * t2590;
2644   t2592 = t88 * t222;
2645   t2593 = t1256 * t2592;
2646   t2597 = t730 * t255 * t222;
2647   t2600 = t44 * t2550;
2648   t2610 = t2491 * t51;
2649   t2611 = t714 * t111;
2650   t2627 = t691 * t111;
2651   t2641 = 0.31465570642866950052e3 * t2591 * t2593 - 0.34297756712777777034e2 * t2597 * t314 - 0.13278652291933993376e0 * t2600 * t296 * t714 - 0.10622921833547194700e0 * t295 * t835 * t222 + 0.15934382750320792050e0 * t826 * t835 * t236 + 0.24923243437094339947e1 * t2610 * t2611 * t127 - 0.37384865155641509919e1 * t830 * t831 * t286 - 0.15243447427901234237e2 * t731 * t732 * t127 + 0.49846486874188679892e1 * t300 * t301 * t802 - 0.35409739445157315668e-1 * t295 * t296 * t691 + 0.16615495624729559964e1 * t300 * t2627 * t127 + 0.49846486874188679892e1 * t300 * t842 * t286 - 0.10622921833547194700e0 * t295 * t56 * t802 * t88 - 0.22865171141851851357e2 * t256 * t859 * t236;
2652   t2642 = t206 * t80;
2653   t2651 = t84 * t662;
2654   t2655 = t657 * t29 * t32;
2655   t2666 = t671 * t29 * t32;
2656   t2678 = t676 * t80 * t201;
2657   t2681 = t684 * t29;
2658   t2700 = -0.97287299539382266899e-3 * t2642 * t791 * t201 + 0.25943279877168604506e-2 * t790 * t75 * t36 + 0.18016166581367086463e-3 * t684 * t123 - 0.19120987654320987654e-1 * t2651 * t281 - 0.22307818930041152263e1 * t2655 - 0.38573713798808385273e-2 * t670 * t75 * t208 + 0.14465142674553144478e-2 * t670 * t23 * t80 * t201 + 0.66381075479549363457e-3 * t2411 * t23 * t2666 - 0.16072380749503493864e-2 * t2417 * t23 * t2666 + 0.50542226225514403292e0 * t674 * t75 * t676 * t208 - 0.18953334834567901234e0 * t674 * t23 * t2678 + 0.35098768212162780064e-1 * t2681 * t32 * t23 * t676 - 0.75813339338271604938e-1 * t785 * t681 + 0.94766674172839506173e-2 * t276 * t2437 + 0.15296790123456790123e0 * t794 * t797 - 0.56088230452674897120e0 * t280 * t217 * t196 - 0.15704704526748971194e1 * t85 * t2655 + 0.27798224424032921811e0 * t207 * t196 * t277;
2659   t2708 = t52 * t714;
2660   t2728 = t127 * t222;
2661   t2732 = t52 * t691;
2662   t2744 = t2507 * t714;
2663   t2751 = 0.16615495624729559964e1 * t99 * t51 * t2700 * t111 + 0.70819478890314631335e-1 * t44 * t94 * t2700 + 0.31465570642866950052e3 * t752 * t863 * t2708 - 0.22865171141851851357e2 * t256 * t802 * t258 * t313 - 0.34297756712777777035e2 * t731 * t259 * t1145 + 0.20977047095244633367e3 * t2524 * t756 * t1930 + 0.11432585570925925678e2 * t2537 * t732 * t484 + 0.15934382750320792050e0 * t826 * t296 * t2592 - 0.37384865155641509919e1 * t830 * t301 * t2728 - 0.76217237139506171188e1 * t256 * t312 * t2732 - 0.22865171141851851357e2 * t256 * t859 * t871 + 0.31465570642866950052e3 * t752 * t286 * t755 * t864 - 0.24056046973484009303e4 * t2502 * t127 * t2505 * t2744 - 0.22865171141851851357e2 * t256 * t312 * t2592;
2664   t2769 = t137 * t115;
2665   t2804 = -0.18e2 * t42 * t701 * t317 * t229 + t16 * t2700 * t61 - 0.3e1 * t803 * t116 - 0.6e1 * t128 * t703 + 0.6e1 * t128 * t707 - t128 * t765 + 0.6e1 * t223 * t292 + 0.6e1 * t287 * t230 - 0.3e1 * t287 * t264 + 0.12e2 * t89 * t820 + 0.6e1 * t89 * t823;
2666   if(v4rho4 != NULL && (p->info->flags & XC_FLAGS_HAVE_LXC))
2667     v4rho3sigma[0] = t2583 * t141 / 0.9e1 - t771 * t321 / 0.2e1 - 0.3e1 / 0.2e1 * t270 * t879 - 0.3e1 / 0.8e1 * t69 * t70 * (-t42 * t92 * (t2641 + t2751) + 0.2e1 * t42 * t291 * t764 + 0.6e1 * t42 * t819 * t263 + 0.6e1 * t42 * t228 * t875 * t115 + 0.24e2 * t42 * t2468 * t137 * t702 - 0.18e2 * t1192 * t2769 * t263 - 0.18e2 * t89 * t816 - 0.3e1 * t89 * t876 - 0.3e1 * t223 * t318 - t692 * t138 + t2804);
2668 
2669   t2815 = t159 * t115;
2670   t2819 = t2468 * t159;
2671   t2829 = t228 * t970;
2672   t2833 = t701 * t361;
2673   t2858 = t56 * t903;
2674   t2878 = 0.15934382750320792050e0 * t826 * t933 * t236 + 0.24923243437094339947e1 * t2610 * t2611 * t149 - 0.37384865155641509919e1 * t830 * t831 * t334 - 0.13278652291933993376e0 * t2600 * t343 * t714 + 0.49846486874188679892e1 * t300 * t301 * t903 + 0.16615495624729559964e1 * t300 * t2627 * t149 + 0.49846486874188679892e1 * t300 * t842 * t334 - 0.10622921833547194700e0 * t295 * t2858 * t88 - 0.10622921833547194700e0 * t295 * t933 * t222 - 0.35409739445157315668e-1 * t295 * t343 * t691 - 0.15243447427901234237e2 * t731 * t732 * t149 - 0.22865171141851851357e2 * t256 * t956 * t236 + 0.31465570642866950052e3 * t1255 * t2593 - 0.34297756712777777034e2 * t2597 * t358;
2675   t2881 = t670 * t19 * t80 * t201;
2676   t2884 = t2642 * t896 * t201;
2677   t2886 = t684 * t145;
2678   t2888 = t2651 * t330;
2679   t2891 = t674 * t19 * t2678;
2680   t2895 = t2681 * t32 * t19 * t676;
2681   t2897 = t327 * t2437;
2682   t2900 = t2411 * t19 * t2666;
2683   t2903 = t2417 * t19 * t2666;
2684   t2914 = 0.28930285349106288954e-2 * t2881 - 0.19457459907876453380e-2 * t2884 + 0.36032333162734172925e-3 * t2886 - 0.38241975308641975308e-1 * t2888 - 0.37906669669135802469e0 * t2891 + 0.70197536424325560128e-1 * t2895 + 0.18953334834567901234e-1 * t2897 + 0.13276215095909872691e-2 * t2900 - 0.32144761499006987728e-2 * t2903 + 0.63177782781893004115e0 * t783 + 0.19120987654320987654e0 * t795 - 0.15934156378600823045e1 * t776 - 0.48217142248510481592e-2 * t779 + 0.32429099846460755633e-2 * t792 - 0.94766674172839506172e-1 * t788 - 0.50989300411522633745e0 * t798 - 0.11217646090534979424e1 * t800 + 0.25271113112757201647e0 * t786;
2685   t2925 = t149 * t222;
2686   t2935 = t334 * t755;
2687   t2939 = t149 * t2505;
2688   t2946 = t903 * t258;
2689   t2962 = 0.16615495624729559964e1 * t99 * t51 * t2914 * t111 + 0.70819478890314631335e-1 * t44 * t94 * t2914 + 0.15934382750320792050e0 * t826 * t343 * t2592 - 0.37384865155641509919e1 * t830 * t301 * t2925 + 0.31465570642866950052e3 * t752 * t960 * t2708 - 0.22865171141851851357e2 * t256 * t956 * t871 + 0.31465570642866950052e3 * t752 * t2935 * t864 - 0.24056046973484009303e4 * t2502 * t2939 * t2744 - 0.22865171141851851357e2 * t256 * t357 * t2592 - 0.22865171141851851357e2 * t256 * t2946 * t313 - 0.34297756712777777035e2 * t731 * t259 * t1440 + 0.20977047095244633367e3 * t2524 * t756 * t2307 + 0.11432585570925925678e2 * t2537 * t732 * t596 - 0.76217237139506171188e1 * t256 * t357 * t2732;
2690   t2993 = t16 * t2914 * t61 - 0.3e1 * t904 * t116 - 0.6e1 * t150 * t703 + 0.6e1 * t150 * t707 - t150 * t765 - t692 * t160 + 0.6e1 * t223 * t340 - 0.3e1 * t223 * t362 + 0.6e1 * t335 * t230 - 0.3e1 * t335 * t264 - 0.18e2 * t89 * t917;
2691   if(v4rho4 != NULL && (p->info->flags & XC_FLAGS_NEEDS_LAPLACIAN) && (p->info->flags & XC_FLAGS_HAVE_LXC))
2692     v4rho3lapl[0] = t2583 * t163 / 0.9e1 - t771 * t365 / 0.2e1 - 0.3e1 / 0.2e1 * t270 * t974 - 0.3e1 / 0.8e1 * t69 * t70 * (-0.18e2 * t1192 * t2815 * t263 + 0.24e2 * t42 * t2819 * t702 + 0.2e1 * t42 * t339 * t764 + 0.6e1 * t42 * t920 * t263 + 0.6e1 * t42 * t2829 * t115 - 0.18e2 * t42 * t2833 * t229 - t42 * t92 * (t2878 + t2962) - 0.3e1 * t89 * t971 + 0.6e1 * t89 * t924 + 0.12e2 * t89 * t921 + t2993);
2693 
2694   t3019 = t56 * t989;
2695   t3045 = -0.13278652291933993376e0 * t2600 * t383 * t714 - 0.15243447427901234237e2 * t731 * t732 * t168 + 0.16615495624729559964e1 * t300 * t2627 * t168 + 0.24923243437094339947e1 * t2610 * t2611 * t168 - 0.37384865155641509919e1 * t830 * t831 * t374 - 0.10622921833547194700e0 * t295 * t3019 * t88 - 0.10622921833547194700e0 * t295 * t1019 * t222 + 0.15934382750320792050e0 * t826 * t1019 * t236 - 0.22865171141851851357e2 * t256 * t1043 * t236 + 0.49846486874188679892e1 * t300 * t842 * t374 + 0.49846486874188679892e1 * t300 * t301 * t989 - 0.35409739445157315668e-1 * t295 * t383 * t691 + 0.31465570642866950052e3 * t1352 * t2593 - 0.34297756712777777034e2 * t2597 * t398;
2696   t3064 = -0.11572114139642515582e-1 * t2881 + 0.77829839631505813518e-2 * t2884 - 0.14412933265093669170e-2 * t2886 + 0.15296790123456790123e0 * t2888 + 0.15162667867654320987e1 * t2891 - 0.28079014569730224051e0 * t2895 - 0.75813339338271604937e-1 * t2897 - 0.53104860383639490765e-2 * t2900 + 0.12857904599602795091e-1 * t2903 - 0.25271113112757201646e1 * t783 - 0.76483950617283950616e0 * t795 + 0.63736625514403292180e1 * t776 + 0.19286856899404192636e-1 * t779 - 0.12971639938584302253e-1 * t792 + 0.37906669669135802469e0 * t788 + 0.20395720164609053498e1 * t798 + 0.44870584362139917696e1 * t800 - 0.10108445245102880658e1 * t786;
2697   t3075 = t374 * t755;
2698   t3079 = t168 * t2505;
2699   t3089 = t989 * t258;
2700   t3096 = t168 * t106;
2701   t3113 = 0.16615495624729559964e1 * t99 * t51 * t3064 * t111 + 0.70819478890314631335e-1 * t44 * t94 * t3064 - 0.22865171141851851357e2 * t256 * t1043 * t871 + 0.31465570642866950052e3 * t752 * t3075 * t864 - 0.24056046973484009303e4 * t2502 * t3079 * t2744 - 0.22865171141851851357e2 * t256 * t397 * t2592 - 0.76217237139506171188e1 * t256 * t397 * t2732 - 0.22865171141851851357e2 * t256 * t3089 * t313 - 0.34297756712777777035e2 * t731 * t259 * t1622 + 0.20977047095244633367e3 * t2524 * t756 * t3096 + 0.15934382750320792050e0 * t826 * t383 * t2592 - 0.37384865155641509919e1 * t830 * t301 * t168 * t222 + 0.11432585570925925678e2 * t2537 * t732 * t1029 + 0.31465570642866950052e3 * t752 * t1047 * t2708;
2702   t3123 = t228 * t1057;
2703   t3127 = t701 * t401;
2704   t3137 = t178 * t115;
2705   t3142 = t2468 * t178;
2706   t3166 = t16 * t3064 * t61 + 0.24e2 * t42 * t3142 * t702 - 0.18e2 * t89 * t1003 + 0.12e2 * t89 * t1007 + 0.6e1 * t89 * t1010 - 0.3e1 * t990 * t116 - 0.6e1 * t169 * t703 + 0.6e1 * t169 * t707 + 0.6e1 * t223 * t380 + 0.6e1 * t375 * t230 - 0.3e1 * t375 * t264;
2707   if(v4rho4 != NULL && (p->info->flags & XC_FLAGS_HAVE_LXC))
2708     v4rho3tau[0] = t2583 * t182 / 0.9e1 - t771 * t405 / 0.2e1 - 0.3e1 / 0.2e1 * t270 * t1061 - 0.3e1 / 0.8e1 * t69 * t70 * (-t42 * t92 * (t3045 + t3113) + 0.2e1 * t42 * t379 * t764 + 0.6e1 * t42 * t1006 * t263 + 0.6e1 * t42 * t3123 * t115 - 0.18e2 * t42 * t3127 * t229 - 0.3e1 * t89 * t1058 - 0.3e1 * t223 * t402 - t692 * t179 - t169 * t765 - 0.18e2 * t1192 * t3137 * t263 + t3166);
2709 
2710   t3203 = 0.24e2 * t42 * t2468 * t423 * t229 - 0.6e1 * t42 * t1099 * t263 + 0.4e1 * t42 * t291 * t875 - 0.12e2 * t89 * t1100 + 0.8e1 * t89 * t1103 + 0.4e1 * t89 * t1108 - 0.2e1 * t89 * t1158 - 0.12e2 * t128 * t816 + 0.8e1 * t128 * t820 + 0.4e1 * t128 * t823 + 0.2e1 * t223 * t424 - t223 * t447 + 0.8e1 * t287 * t292;
2711   t3217 = t208 * t29 * t32;
2712   t3229 = t790 * t29;
2713   t3242 = 0.1e1 / t8 / t1709;
2714   t3257 = -0.82976344349436704324e-4 * t2411 * t410 * t3217 + 0.20090475936879367331e-3 * t2417 * t410 * t3217 + 0.64289522998013975458e-3 * t670 * t1075 * t80 - 0.60271427810638101992e-4 * t670 * t410 * t201 - 0.43873460265203475082e-2 * t3229 * t32 * t410 * t676 - 0.84237043709190672156e-1 * t674 * t1075 * t676 * t80 + 0.78972228477366255147e-2 * t674 * t1069 * t201 - 0.40012595761865569274e-1 * t207 * t3242 * t209 * t212 - 0.43238799795281007511e-3 * t206 * t1075 * t1081 - 0.22520208226708858079e-4 * t1080 * t3217 + 0.40536374808075944542e-4 * t1080 * t2440 + 0.80733058984910836761e-1 * t84 * t3242 * t217;
2715   t3263 = t286 * t286;
2716   t3268 = t286 * t88;
2717   t3269 = t1256 * t3268;
2718   t3317 = -0.76217237139506171188e1 * t256 * t1141 * t236 - 0.15243447427901234238e2 * t256 * t3263 * t258 * t52 + 0.41954094190489266736e3 * t2591 * t3269 - 0.45730342283703702713e2 * t1227 * t860 + 0.33230991249459119928e1 * t300 * t473 * t802 + 0.53114609167735973502e-1 * t826 * t1111 * t222 + 0.24923243437094339947e1 * t2610 * t831 * t427 - 0.12461621718547169973e1 * t830 * t842 * t427 - 0.76217237139506171188e1 * t256 * t442 * t222 + 0.16615495624729559964e1 * t300 * t842 * t418 + 0.33230991249459119928e1 * t300 * t301 * t1087 - 0.70819478890314631336e-1 * t295 * t56 * t1087 * t88 - 0.35409739445157315668e-1 * t295 * t1127 * t222 - 0.12461621718547169973e1 * t830 * t831 * t418 - 0.70819478890314631336e-1 * t295 * t296 * t802 + 0.53114609167735973502e-1 * t826 * t1127 * t236 - 0.15243447427901234237e2 * t731 * t442 * t236 - 0.13278652291933993376e0 * t2600 * t1111 * t236;
2719   t3332 = t52 * t236;
2720   t3336 = t418 * t755;
2721   t3343 = t52 * t802;
2722   t3347 = t106 * t222;
2723   t3352 = t2507 * t236;
2724   t3362 = t1087 * t258;
2725   t3372 = t127 * t286;
2726   t3376 = t427 * t52;
2727   t3383 = -0.70819478890314631336e-1 * t44 * t235 * t3263 + 0.33230991249459119928e1 * t240 * t51 * t3263 * t111 + 0.16615495624729559964e1 * t99 * t51 * t3257 * t111 + 0.70819478890314631335e-1 * t44 * t94 * t3257 + 0.31465570642866950052e3 * t752 * t1149 * t3332 + 0.10488523547622316684e3 * t752 * t3336 * t864 - 0.30486894855802468476e2 * t256 * t312 * t3268 - 0.15243447427901234238e2 * t256 * t312 * t3343 + 0.10488523547622316684e3 * t752 * t1149 * t3347 - 0.24056046973484009303e4 * t2502 * t427 * t2505 * t3352 + 0.20977047095244633367e3 * t2524 * t1149 * t864 - 0.11432585570925925678e2 * t731 * t259 * t1781 - 0.15243447427901234238e2 * t256 * t3362 * t313 - 0.11432585570925925678e2 * t731 * t442 * t871 + 0.21245843667094389400e0 * t826 * t296 * t3268 - 0.49846486874188679892e1 * t830 * t301 * t3372 + 0.11432585570925925678e2 * t2537 * t259 * t3376 - 0.76217237139506171188e1 * t256 * t1141 * t871;
2728   t3396 = t317 * t317;
2729   t3405 = 0.4e1 * t42 * t228 * t1157 * t115 - 0.6e1 * t42 * t701 * t446 * t229 + 0.2e1 * t42 * t1107 * t263 + t16 * t3257 * t61 - t42 * t92 * (t3317 + t3383) - t419 * t264 - 0.2e1 * t1088 * t116 - 0.2e1 * t803 * t138 - 0.4e1 * t287 * t318 + 0.2e1 * t419 * t230 + 0.4e1 * t42 * t228 * t3396 - 0.24e2 * t1192 * t2769 * t317 - 0.2e1 * t128 * t876;
2730   if(v4rho4 != NULL && (p->info->flags & XC_FLAGS_HAVE_LXC))
2731     v4rho2sigma2[0] = -t771 * t450 / 0.6e1 - t270 * t1161 - 0.3e1 / 0.8e1 * t69 * t70 * (t3203 + t3405);
2732 
2733   t3422 = t802 * t111;
2734   t3435 = t56 * t1178;
2735   t3448 = 0.53114609167735973502e-1 * t826 * t1233 * t236 - 0.76217237139506171188e1 * t256 * t1247 * t236 - 0.35409739445157315668e-1 * t295 * t343 * t802 + 0.16615495624729559964e1 * t300 * t3422 * t149 + 0.33230991249459119928e1 * t300 * t1222 * t334 - 0.35409739445157315668e-1 * t295 * t2858 * t127 - 0.70819478890314631336e-1 * t295 * t933 * t286 - 0.70819478890314631336e-1 * t295 * t3435 * t88 - 0.35409739445157315668e-1 * t295 * t1233 * t222 - 0.12461621718547169973e1 * t830 * t831 * t462 + 0.16615495624729559964e1 * t300 * t842 * t462;
2736   t3456 = t2411 * t454 * t3217;
2737   t3459 = t2417 * t454 * t3217;
2738   t3463 = t670 * t454 * t201;
2739   t3467 = t3229 * t32 * t454 * t676;
2740   t3471 = t674 * t1169 * t201;
2741   t3475 = t1174 * t3217;
2742   t3477 = t1174 * t2440;
2743   t3480 = -0.16595268869887340864e-3 * t3456 + 0.40180951873758734660e-3 * t3459 + 0.10447047487177271012e-2 * t1067 - 0.12054285562127620398e-3 * t3463 - 0.87746920530406950161e-2 * t3467 - 0.13688519602743484225e0 * t1071 + 0.15794445695473251029e-1 * t3471 - 0.54754078410973936901e-1 * t1078 - 0.70263049667331637203e-3 * t1082 - 0.45040416453417716157e-4 * t3475 + 0.81072749616151889082e-4 * t3477 + 0.11047681755829903978e0 * t1085;
2744   t3488 = t149 * t286;
2745   t3492 = t149 * t236;
2746   t3496 = t127 * t236;
2747   t3503 = t462 * t755;
2748   t3513 = 0.33230991249459119928e1 * t300 * t301 * t1178 + 0.16615495624729559964e1 * t300 * t473 * t903 + 0.70819478890314631335e-1 * t44 * t94 * t3480 + 0.16615495624729559964e1 * t99 * t51 * t3480 * t111 - 0.24923243437094339946e1 * t830 * t301 * t3488 - 0.15243447427901234237e2 * t731 * t312 * t3492 - 0.13278652291933993376e0 * t2600 * t343 * t3496 - 0.76217237139506171188e1 * t256 * t357 * t3343 + 0.10488523547622316684e3 * t752 * t3503 * t864 - 0.76217237139506171188e1 * t256 * t2946 * t484 - 0.15243447427901234238e2 * t256 * t956 * t1208;
2749   t3527 = t1178 * t258;
2750   t3549 = -0.15243447427901234238e2 * t256 * t956 * t1145 - 0.76217237139506171188e1 * t256 * t357 * t2728 - 0.15243447427901234238e2 * t256 * t357 * t3268 - 0.11432585570925925678e2 * t731 * t259 * t1926 - 0.15243447427901234238e2 * t256 * t3527 * t313 - 0.76217237139506171188e1 * t256 * t1247 * t871 + 0.10622921833547194700e0 * t826 * t933 * t1208 + 0.10622921833547194700e0 * t826 * t343 * t3268 + 0.53114609167735973502e-1 * t826 * t343 * t2728 + 0.24923243437094339947e1 * t2610 * t831 * t1212 - 0.12461621718547169973e1 * t830 * t842 * t1212;
2751   t3550 = t334 * t127;
2752   t3554 = t755 * t52;
2753   t3555 = t3554 * t3496;
2754   t3559 = t2536 * t255 * t236;
2755   t3563 = t730 * t255 * t286;
2756   t3570 = t2523 * t2590;
2757   t3579 = t1256 * t2728;
2758   t3583 = t2500 * t2501 * t149;
2759   t3584 = t2505 * t2507;
2760   t3585 = t3584 * t3496;
2761   t3588 = -0.24923243437094339946e1 * t830 * t301 * t3550 + 0.31465570642866950052e3 * t1255 * t3555 + 0.11432585570925925678e2 * t3559 * t485 - 0.22865171141851851356e2 * t3563 * t358 - 0.22865171141851851356e2 * t1227 * t957 - 0.11432585570925925678e2 * t1227 * t967 + 0.20977047095244633367e3 * t3570 * t961 + 0.20977047095244633368e3 * t749 * t751 * t334 * t1257 + 0.20977047095244633368e3 * t1255 * t3269 + 0.10488523547622316684e3 * t1255 * t3579 - 0.24056046973484009303e4 * t3583 * t3585;
2762   t3626 = -t42 * t92 * (t3448 + t3513 + t3549 + t3588) + 0.2e1 * t42 * t1204 * t263 + 0.2e1 * t463 * t230 + 0.4e1 * t335 * t292 - 0.6e1 * t150 * t816 + 0.4e1 * t150 * t820 + 0.2e1 * t150 * t823 - t463 * t264 - 0.2e1 * t1179 * t116 - 0.2e1 * t335 * t318 - t904 * t138 + 0.4e1 * t128 * t921 + 0.4e1 * t287 * t340 + 0.2e1 * t223 * t467 + 0.4e1 * t89 * t1197 + 0.2e1 * t128 * t924 - 0.6e1 * t128 * t917 + 0.4e1 * t89 * t1200;
2763   t3641 = t228 * t1266;
2764   t3645 = t701 * t488;
2765   t3656 = t89 * t701;
2766   t3670 = t42 * t2468;
2767   t3674 = 0.2e1 * t42 * t2829 * t137 - t150 * t876 - 0.2e1 * t287 * t362 + 0.4e1 * t42 * t920 * t317 + 0.2e1 * t42 * t339 * t875 + 0.4e1 * t89 * t1205 + 0.4e1 * t42 * t3641 * t115 - 0.6e1 * t42 * t3645 * t229 - t128 * t971 - t803 * t160 - t223 * t489 - 0.2e1 * t89 * t1267 + t16 * t3480 * t61 - 0.12e2 * t3656 * t1194 - 0.12e2 * t1192 * t361 * t137 * t115 - 0.6e1 * t1192 * t1193 * t263 - 0.12e2 * t1192 * t159 * t317 * t115 + 0.24e2 * t3670 * t1193 * t229;
2768   if(v4rho4 != NULL && (p->info->flags & XC_FLAGS_NEEDS_LAPLACIAN) && (p->info->flags & XC_FLAGS_HAVE_LXC))
2769     v4rho2sigmalapl[0] = -t771 * t492 / 0.6e1 - t270 * t1270 - 0.3e1 / 0.8e1 * t69 * t70 * (t3626 + t3674);
2770 
2771   t3717 = t701 * t521;
2772   t3721 = t228 * t1361;
2773   t3725 = 0.4e1 * t42 * t1006 * t317 + 0.4e1 * t42 * t3721 * t115 + 0.2e1 * t42 * t3123 * t137 - 0.6e1 * t42 * t3717 * t229 + 0.2e1 * t42 * t379 * t875 - 0.6e1 * t128 * t1003 + 0.4e1 * t128 * t1007 + 0.2e1 * t128 * t1010 + 0.4e1 * t89 * t1298 + 0.4e1 * t89 * t1301 + 0.4e1 * t89 * t1306 - 0.2e1 * t89 * t1362 - 0.6e1 * t169 * t816 + 0.4e1 * t169 * t820 + 0.2e1 * t169 * t823 + 0.2e1 * t223 * t502 + 0.4e1 * t287 * t380 + 0.4e1 * t375 * t292;
2774   t3755 = t56 * t1280;
2775   t3771 = 0.53114609167735973502e-1 * t826 * t1330 * t236 - 0.76217237139506171188e1 * t256 * t1344 * t236 + 0.33230991249459119928e1 * t300 * t1222 * t374 - 0.70819478890314631336e-1 * t295 * t1019 * t286 - 0.35409739445157315668e-1 * t295 * t383 * t802 - 0.35409739445157315668e-1 * t295 * t3019 * t127 - 0.70819478890314631336e-1 * t295 * t3755 * t88 - 0.35409739445157315668e-1 * t295 * t1330 * t222 - 0.12461621718547169973e1 * t830 * t831 * t497 + 0.16615495624729559964e1 * t300 * t842 * t497 + 0.33230991249459119928e1 * t300 * t301 * t1280;
2776   t3790 = 0.66381075479549363457e-3 * t3456 - 0.16072380749503493864e-2 * t3459 - 0.41788189948709084046e-2 * t1067 + 0.48217142248510481592e-3 * t3463 + 0.35098768212162780064e-1 * t3467 + 0.54754078410973936900e0 * t1071 - 0.63177782781893004115e-1 * t3471 + 0.21901631364389574760e0 * t1078 + 0.28105219866932654882e-2 * t1082 + 0.18016166581367086463e-3 * t3475 - 0.32429099846460755633e-3 * t3477 - 0.44190727023319615911e0 * t1085;
2777   t3810 = t374 * t127;
2778   t3814 = t168 * t286;
2779   t3821 = 0.16615495624729559964e1 * t300 * t473 * t989 + 0.16615495624729559964e1 * t300 * t3422 * t168 + 0.16615495624729559964e1 * t99 * t51 * t3790 * t111 + 0.70819478890314631335e-1 * t44 * t94 * t3790 - 0.76217237139506171188e1 * t256 * t3089 * t484 + 0.53114609167735973502e-1 * t826 * t383 * t2728 + 0.24923243437094339947e1 * t2610 * t831 * t1312 - 0.12461621718547169973e1 * t830 * t842 * t1312 - 0.24923243437094339946e1 * t830 * t301 * t3810 - 0.24923243437094339946e1 * t830 * t301 * t3814 + 0.10622921833547194700e0 * t826 * t1019 * t1208;
2780   t3829 = t168 * t236;
2781   t3851 = t1280 * t258;
2782   t3858 = 0.10622921833547194700e0 * t826 * t383 * t3268 - 0.13278652291933993376e0 * t2600 * t383 * t3496 - 0.15243447427901234237e2 * t731 * t312 * t3829 - 0.76217237139506171188e1 * t256 * t397 * t3343 - 0.15243447427901234238e2 * t256 * t1043 * t1208 - 0.15243447427901234238e2 * t256 * t1043 * t1145 - 0.76217237139506171188e1 * t256 * t397 * t2728 - 0.15243447427901234238e2 * t256 * t397 * t3268 - 0.11432585570925925678e2 * t731 * t259 * t2086 - 0.15243447427901234238e2 * t256 * t3851 * t313 - 0.76217237139506171188e1 * t256 * t1344 * t871;
2783   t3859 = t497 * t755;
2784   t3876 = t749 * t751 * t374;
2785   t3884 = t2500 * t2501 * t168;
2786   t3887 = 0.10488523547622316684e3 * t752 * t3859 * t864 + 0.31465570642866950052e3 * t1352 * t3555 + 0.11432585570925925678e2 * t3559 * t518 - 0.22865171141851851356e2 * t3563 * t398 - 0.22865171141851851356e2 * t1227 * t1044 - 0.11432585570925925678e2 * t1227 * t1054 + 0.20977047095244633367e3 * t3570 * t1048 + 0.20977047095244633368e3 * t3876 * t1257 + 0.20977047095244633368e3 * t1352 * t3269 + 0.10488523547622316684e3 * t1352 * t3579 - 0.24056046973484009303e4 * t3884 * t3585;
2787   t3916 = 0.2e1 * t42 * t1305 * t263 - t169 * t876 - 0.2e1 * t375 * t318 - t803 * t179 - 0.2e1 * t287 * t402 - t223 * t522 - t990 * t138 - t42 * t92 * (t3771 + t3821 + t3858 + t3887) + t16 * t3790 * t61 - t128 * t1058 + 0.2e1 * t498 * t230 + 0.24e2 * t3670 * t1294 * t229 - 0.12e2 * t3656 * t1295 - 0.12e2 * t1192 * t401 * t137 * t115 - 0.12e2 * t1192 * t178 * t317 * t115 - 0.6e1 * t1192 * t1294 * t263 - t498 * t264 - 0.2e1 * t1281 * t116;
2788   if(v4rho4 != NULL && (p->info->flags & XC_FLAGS_HAVE_LXC))
2789     v4rho2sigmatau[0] = -t771 * t525 / 0.6e1 - t270 * t1365 - 0.3e1 / 0.8e1 * t69 * t70 * (t3725 + t3916);
2790 
2791   t3930 = t228 * t1451;
2792   t3934 = t2468 * t542;
2793   t3938 = t701 * t565;
2794   t3953 = t2411 * t529 * t3217;
2795   t3956 = t2417 * t529 * t3217;
2796   t3960 = t670 * t529 * t201;
2797   t3964 = t3229 * t32 * t529 * t676;
2798   t3968 = t674 * t1373 * t201;
2799   t3972 = t1378 * t3217;
2800   t3974 = t1378 * t2440;
2801   t3977 = -0.33190537739774681728e-3 * t3953 + 0.80361903747517469321e-3 * t3956 + 0.16072380749503493864e-2 * t1167 - 0.24108571124255240796e-3 * t3960 - 0.17549384106081390032e-1 * t3964 - 0.21059260927297668038e0 * t1171 + 0.31588891390946502057e-1 * t3968 - 0.68442598013717421126e-1 * t413 - 0.10809699948820251878e-2 * t1175 - 0.90080832906835432317e-4 * t3972 + 0.16214549923230377817e-3 * t3974 + 0.13809602194787379972e0 * t416;
2802   t3981 = t334 * t334;
2803   t3993 = t88 * t334;
2804   t4003 = t546 * t2505;
2805   t4007 = t1382 * t258;
2806   t4014 = t537 * t755;
2807   t4021 = t52 * t903;
2808   t4034 = t149 * t334;
2809   t4038 = t546 * t52;
2810   t4042 = 0.70819478890314631335e-1 * t44 * t94 * t3977 + 0.33230991249459119928e1 * t240 * t51 * t3981 * t111 - 0.70819478890314631336e-1 * t44 * t235 * t3981 + 0.16615495624729559964e1 * t99 * t51 * t3977 * t111 + 0.21245843667094389400e0 * t826 * t343 * t3993 + 0.31465570642866950052e3 * t752 * t1444 * t3332 + 0.10488523547622316684e3 * t752 * t1444 * t3347 - 0.24056046973484009303e4 * t2502 * t4003 * t3352 - 0.15243447427901234238e2 * t256 * t4007 * t313 - 0.76217237139506171188e1 * t256 * t1436 * t871 + 0.10488523547622316684e3 * t752 * t4014 * t864 - 0.30486894855802468476e2 * t256 * t357 * t3993 - 0.15243447427901234238e2 * t256 * t357 * t4021 - 0.11432585570925925678e2 * t731 * t561 * t871 + 0.20977047095244633367e3 * t2524 * t1444 * t864 - 0.11432585570925925678e2 * t731 * t259 * t2236 - 0.49846486874188679892e1 * t830 * t301 * t4034 + 0.11432585570925925678e2 * t2537 * t259 * t4038;
2811   t4080 = t56 * t1382;
2812   t4093 = t1256 * t3993;
2813   t4098 = -0.15243447427901234237e2 * t731 * t561 * t236 + 0.53114609167735973502e-1 * t826 * t1422 * t236 - 0.13278652291933993376e0 * t2600 * t1406 * t236 - 0.76217237139506171188e1 * t256 * t1436 * t236 - 0.15243447427901234238e2 * t256 * t3981 * t258 * t52 + 0.33230991249459119928e1 * t300 * t585 * t903 + 0.24923243437094339947e1 * t2610 * t831 * t546 - 0.12461621718547169973e1 * t830 * t842 * t546 - 0.70819478890314631336e-1 * t295 * t343 * t903 + 0.53114609167735973502e-1 * t826 * t1406 * t222 - 0.76217237139506171188e1 * t256 * t561 * t222 + 0.33230991249459119928e1 * t300 * t301 * t1382 - 0.70819478890314631336e-1 * t295 * t4080 * t88 - 0.35409739445157315668e-1 * t295 * t1422 * t222 - 0.12461621718547169973e1 * t830 * t831 * t537 + 0.16615495624729559964e1 * t300 * t842 * t537 + 0.41954094190489266736e3 * t1255 * t4093 - 0.45730342283703702713e2 * t1513 * t957;
2814   t4104 = 0.2e1 * t223 * t543 - 0.2e1 * t89 * t1452 + 0.4e1 * t89 * t1403 + 0.4e1 * t42 * t3930 * t115 + 0.24e2 * t42 * t3934 * t229 - 0.6e1 * t42 * t3938 * t229 + 0.2e1 * t42 * t1402 * t263 - 0.4e1 * t335 * t362 - 0.2e1 * t904 * t160 - t538 * t264 - 0.2e1 * t1383 * t116 - t42 * t92 * (t4042 + t4098) - 0.12e2 * t150 * t917;
2815   t4126 = t361 * t361;
2816   t4135 = -0.24e2 * t1192 * t2815 * t361 - 0.6e1 * t42 * t1394 * t263 + t16 * t3977 * t61 + 0.4e1 * t42 * t228 * t4126 + 0.4e1 * t42 * t339 * t970 - 0.12e2 * t89 * t1395 + 0.8e1 * t89 * t1398 + 0.8e1 * t150 * t921 + 0.4e1 * t150 * t924 - 0.2e1 * t150 * t971 - t223 * t566 + 0.2e1 * t538 * t230 + 0.8e1 * t335 * t340;
2817   if(v4rho4 != NULL && (p->info->flags & XC_FLAGS_NEEDS_LAPLACIAN) && (p->info->flags & XC_FLAGS_HAVE_LXC))
2818     v4rho2lapl2[0] = -t771 * t569 / 0.6e1 - t270 * t1455 - 0.3e1 / 0.8e1 * t69 * t70 * (t4104 + t4135);
2819 
2820   t4145 = t701 * t600;
2821   t4177 = t228 * t1549;
2822   t4184 = 0.2e1 * t575 * t230 - 0.6e1 * t42 * t4145 * t229 - t575 * t264 - 0.2e1 * t1466 * t116 - t990 * t160 - 0.2e1 * t375 * t362 - t169 * t971 + 0.4e1 * t89 * t1486 + 0.4e1 * t89 * t1483 + 0.2e1 * t223 * t579 + 0.2e1 * t42 * t3123 * t159 - 0.6e1 * t169 * t917 + 0.4e1 * t42 * t1006 * t361 - 0.6e1 * t150 * t1003 + 0.2e1 * t42 * t379 * t970 + 0.4e1 * t89 * t1491 + 0.4e1 * t42 * t4177 * t115 + 0.2e1 * t42 * t1490 * t263;
2823   t4197 = t178 * t361;
2824   t4204 = t401 * t159;
2825   t4232 = 0.13276215095909872691e-2 * t3953 - 0.32144761499006987728e-2 * t3956 - 0.64289522998013975454e-2 * t1167 + 0.96434284497020963181e-3 * t3960 + 0.70197536424325560128e-1 * t3964 + 0.84237043709190672152e0 * t1171 - 0.12635556556378600823e0 * t3968 + 0.27377039205486968449e0 * t413 + 0.43238799795281007510e-2 * t1175 + 0.36032333162734172925e-3 * t3972 - 0.64858199692921511265e-3 * t3974 - 0.55238408779149519889e0 * t416;
2826   t4243 = t374 * t149;
2827   t4262 = t1465 * t258;
2828   t4269 = 0.16615495624729559964e1 * t99 * t51 * t4232 * t111 + 0.70819478890314631335e-1 * t44 * t94 * t4232 - 0.12461621718547169973e1 * t830 * t842 * t1498 - 0.24923243437094339946e1 * t830 * t301 * t4243 - 0.15243447427901234237e2 * t731 * t357 * t3829 - 0.13278652291933993376e0 * t2600 * t383 * t3492 - 0.76217237139506171188e1 * t256 * t397 * t2925 - 0.15243447427901234238e2 * t256 * t397 * t3993 - 0.76217237139506171188e1 * t256 * t397 * t4021 - 0.15243447427901234238e2 * t256 * t4262 * t313 - 0.76217237139506171188e1 * t256 * t1533 * t871;
2829   t4270 = t574 * t755;
2830   t4286 = t168 * t334;
2831   t4305 = 0.10488523547622316684e3 * t752 * t4270 * t864 - 0.76217237139506171188e1 * t256 * t3089 * t596 - 0.15243447427901234238e2 * t256 * t1043 * t1494 - 0.15243447427901234238e2 * t256 * t1043 * t1440 - 0.11432585570925925678e2 * t731 * t259 * t2303 - 0.24923243437094339946e1 * t830 * t301 * t4286 + 0.10622921833547194700e0 * t826 * t1019 * t1494 + 0.10622921833547194700e0 * t826 * t383 * t3993 + 0.53114609167735973502e-1 * t826 * t383 * t2925 + 0.24923243437094339947e1 * t2610 * t831 * t1498 + 0.16615495624729559964e1 * t300 * t842 * t574;
2832   t4313 = t56 * t1465;
2833   t4342 = 0.33230991249459119928e1 * t300 * t301 * t1465 + 0.16615495624729559964e1 * t300 * t585 * t989 - 0.70819478890314631336e-1 * t295 * t4313 * t88 - 0.35409739445157315668e-1 * t295 * t1519 * t222 + 0.33230991249459119928e1 * t300 * t1508 * t374 - 0.35409739445157315668e-1 * t295 * t383 * t903 - 0.12461621718547169973e1 * t830 * t831 * t574 + 0.53114609167735973502e-1 * t826 * t1519 * t236 - 0.76217237139506171188e1 * t256 * t1533 * t236 + 0.16615495624729559964e1 * t300 * t903 * t111 * t168 - 0.35409739445157315668e-1 * t295 * t3019 * t149;
2834   t4360 = t730 * t255 * t334;
2835   t4367 = t2523 * t1254;
2836   t4372 = -0.70819478890314631336e-1 * t295 * t1019 * t334 + 0.31465570642866950052e3 * t1352 * t3554 * t3492 - 0.24056046973484009303e4 * t3884 * t3584 * t3492 + 0.20977047095244633368e3 * t3876 * t1540 + 0.20977047095244633368e3 * t1352 * t4093 + 0.10488523547622316684e3 * t1352 * t1256 * t2925 - 0.22865171141851851356e2 * t4360 * t398 - 0.22865171141851851356e2 * t1513 * t1044 - 0.11432585570925925678e2 * t1513 * t1054 + 0.20977047095244633367e3 * t4367 * t1048 + 0.11432585570925925678e2 * t3559 * t597;
2837   t4379 = -0.2e1 * t335 * t402 - t904 * t179 - t150 * t1058 + 0.24e2 * t3670 * t1479 * t229 - 0.2e1 * t89 * t1550 - t223 * t601 - 0.12e2 * t3656 * t1480 - 0.12e2 * t1192 * t4197 * t115 - 0.6e1 * t1192 * t1479 * t263 - 0.12e2 * t1192 * t4204 * t115 + 0.4e1 * t169 * t921 + 0.4e1 * t375 * t340 + 0.2e1 * t169 * t924 + 0.4e1 * t335 * t380 + 0.2e1 * t150 * t1010 + 0.4e1 * t150 * t1007 - t42 * t92 * (t4269 + t4305 + t4342 + t4372) + t16 * t4232 * t61;
2838   if(v4rho4 != NULL && (p->info->flags & XC_FLAGS_NEEDS_LAPLACIAN) && (p->info->flags & XC_FLAGS_HAVE_LXC))
2839     v4rho2lapltau[0] = -t771 * t604 / 0.6e1 - t270 * t1553 - 0.3e1 / 0.8e1 * t69 * t70 * (t4184 + t4379);
2840 
2841   t4399 = -0.53104860383639490765e-2 * t3953 + 0.12857904599602795091e-1 * t3956 + 0.25715809199205590182e-1 * t1167 - 0.38573713798808385273e-2 * t3960 - 0.28079014569730224051e0 * t3964 - 0.33694817483676268861e1 * t1171 + 0.50542226225514403291e0 * t3968 - 0.10950815682194787380e1 * t413 - 0.17295519918112403004e-1 * t1175 - 0.14412933265093669170e-2 * t3972 + 0.25943279877168604506e-2 * t3974 + 0.22095363511659807955e1 * t416;
2842   t4405 = t228 * t1633;
2843   t4426 = t401 * t401;
2844   t4430 = 0.4e1 * t42 * t4405 * t115 - 0.24e2 * t1192 * t3137 * t401 + 0.2e1 * t42 * t1583 * t263 + t16 * t4399 * t61 + 0.4e1 * t42 * t228 * t4426 + 0.8e1 * t169 * t1007 + 0.4e1 * t169 * t1010 - 0.2e1 * t1564 * t116 - 0.2e1 * t89 * t1634 + 0.2e1 * t223 * t615 - t223 * t638 - t610 * t264 + 0.8e1 * t375 * t380;
2845   t4451 = t701 * t637;
2846   t4455 = t2468 * t614;
2847   t4483 = t374 * t374;
2848   t4497 = t56 * t1563;
2849   t4517 = 0.53114609167735973502e-1 * t826 * t1604 * t236 - 0.15243447427901234237e2 * t731 * t633 * t236 - 0.13278652291933993376e0 * t2600 * t1587 * t236 + 0.33230991249459119928e1 * t300 * t1597 * t989 + 0.53114609167735973502e-1 * t826 * t1587 * t222 + 0.24923243437094339947e1 * t2610 * t831 * t618 - 0.12461621718547169973e1 * t830 * t842 * t618 - 0.76217237139506171188e1 * t256 * t1618 * t236 - 0.15243447427901234238e2 * t256 * t4483 * t258 * t52 - 0.12461621718547169973e1 * t830 * t831 * t609 + 0.16615495624729559964e1 * t300 * t842 * t609 + 0.33230991249459119928e1 * t300 * t301 * t1563 - 0.70819478890314631336e-1 * t295 * t4497 * t88 - 0.35409739445157315668e-1 * t295 * t1604 * t222 - 0.70819478890314631336e-1 * t295 * t383 * t989 + 0.70819478890314631335e-1 * t44 * t94 * t4399 - 0.70819478890314631336e-1 * t44 * t235 * t4483 + 0.16615495624729559964e1 * t99 * t51 * t4399 * t111;
2850   t4524 = t609 * t755;
2851   t4528 = t88 * t374;
2852   t4539 = t618 * t2505;
2853   t4549 = t609 * t52;
2854   t4553 = t1563 * t258;
2855   t4557 = t618 * t52;
2856   t4564 = t168 * t374;
2857   t4579 = t730 * t255 * t168;
2858   t4582 = -0.76217237139506171188e1 * t256 * t633 * t222 - 0.76217237139506171188e1 * t256 * t1618 * t871 + 0.10488523547622316684e3 * t752 * t4524 * t864 - 0.30486894855802468476e2 * t256 * t397 * t4528 - 0.15243447427901234238e2 * t256 * t397 * t52 * t989 + 0.10488523547622316684e3 * t752 * t1626 * t3347 - 0.24056046973484009303e4 * t2502 * t4539 * t3352 - 0.11432585570925925678e2 * t731 * t633 * t871 + 0.20977047095244633367e3 * t2524 * t1626 * t864 - 0.11432585570925925678e2 * t731 * t259 * t4549 - 0.15243447427901234238e2 * t256 * t4553 * t313 + 0.11432585570925925678e2 * t2537 * t259 * t4557 + 0.21245843667094389400e0 * t826 * t383 * t4528 - 0.49846486874188679892e1 * t830 * t301 * t4564 + 0.31465570642866950052e3 * t752 * t1626 * t3332 + 0.33230991249459119928e1 * t240 * t51 * t4483 * t111 + 0.41954094190489266736e3 * t1352 * t1256 * t4528 - 0.45730342283703702713e2 * t4579 * t1044;
2859   t4588 = -0.4e1 * t375 * t402 - 0.2e1 * t990 * t179 - 0.2e1 * t169 * t1058 - 0.6e1 * t42 * t1575 * t263 - 0.12e2 * t89 * t1576 + 0.8e1 * t89 * t1579 + 0.4e1 * t42 * t379 * t1057 + 0.4e1 * t89 * t1584 - 0.12e2 * t169 * t1003 - 0.6e1 * t42 * t4451 * t229 + 0.24e2 * t42 * t4455 * t229 - t42 * t92 * (t4517 + t4582) + 0.2e1 * t610 * t230;
2860   if(v4rho4 != NULL && (p->info->flags & XC_FLAGS_HAVE_LXC))
2861     v4rho2tau2[0] = -t771 * t641 / 0.6e1 - t270 * t1637 - 0.3e1 / 0.8e1 * t69 * t70 * (t4430 + t4588);
2862 
2863   t4601 = t1640 * rho[0];
2864   t4602 = 0.1e1 / t4601;
2865   t4605 = t2642 * t29;
2866   t4618 = 0.10372043043679588041e-4 * t2411 * t1641 * t82 - 0.25113094921099209164e-4 * t2417 * t1641 * t82 - 0.60271427810638101994e-4 * t670 * t4602 + 0.54841825331504343852e-3 * t4605 * t32 * t1641 * t676 + 0.78972228477366255146e-2 * t674 * t4602 * t676 + 0.40536374808075944542e-4 * t206 * t4602 * t36 + 0.28150260283386072598e-5 * t1647 * t82;
2867   t4667 = t1650 * t258;
2868   t4680 = t106 * t286;
2869   t4688 = t2507 * t88;
2870   t4695 = t418 * t88;
2871   t4699 = t127 * t418;
2872   t4716 = -0.76217237139506171188e1 * t256 * t4667 * t313 - 0.22865171141851851357e2 * t256 * t3362 * t484 - 0.22865171141851851357e2 * t256 * t1141 * t1208 - 0.22865171141851851357e2 * t256 * t1141 * t1145 + 0.31465570642866950052e3 * t752 * t1149 * t4680 + 0.31465570642866950052e3 * t752 * t1694 * t313 - 0.24056046973484009303e4 * t2502 * t1666 * t2505 * t4688 + 0.11432585570925925678e2 * t2537 * t1680 * t313 + 0.15934382750320792050e0 * t826 * t296 * t4695 - 0.37384865155641509919e1 * t830 * t301 * t4699 - 0.34297756712777777034e2 * t731 * t442 * t1145 + 0.20977047095244633367e3 * t2524 * t1694 * t1150 + 0.16615495624729559964e1 * t99 * t51 * t4618 * t111 + 0.70819478890314631335e-1 * t44 * t94 * t4618;
2873   t4761 = -0.37384865155641509919e1 * t830 * t1744 * t286 - 0.22865171141851851356e2 * t256 * t442 * t286 - 0.15243447427901234237e2 * t731 * t1680 * t88 - 0.35409739445157315668e-1 * t295 * t56 * t1650 * t88 + 0.16615495624729559964e1 * t300 * t301 * t1650 - 0.10622921833547194700e0 * t295 * t835 * t418 - 0.10622921833547194700e0 * t295 * t296 * t1087 + 0.49846486874188679892e1 * t300 * t1222 * t418 + 0.49846486874188679892e1 * t300 * t473 * t1087 - 0.13278652291933993376e0 * t2600 * t56 * t1666 * t88 + 0.15934382750320792051e0 * t826 * t1111 * t286 + 0.24923243437094339947e1 * t2610 * t301 * t1666 - 0.34297756712777777034e2 * t1227 * t1142 + 0.31465570642866950052e3 * t749 * t751 * t418 * t1257;
2874   t4765 = -0.3e1 * t128 * t1158 - 0.6e1 * t89 * t1660 + 0.24e2 * t42 * t2468 * t1659 * t115 - 0.18e2 * t42 * t1099 * t317 + 0.6e1 * t89 * t1663 - 0.18e2 * t1192 * t137 * t446 * t115 + 0.6e1 * t42 * t819 * t446 + 0.6e1 * t42 * t291 * t1157 - t89 * t1703 + 0.2e1 * t42 * t228 * t1702 * t115 - t42 * t92 * (t4716 + t4761);
2875   if(v4rho4 != NULL && (p->info->flags & XC_FLAGS_HAVE_LXC))
2876     v4rhosigma3[0] = -t270 * t1706 / 0.2e1 - 0.3e1 / 0.8e1 * t69 * t70 * (t16 * t4618 * t61 - 0.3e1 * t1088 * t138 - 0.18e2 * t128 * t1100 + 0.12e2 * t128 * t1103 + 0.6e1 * t128 * t1108 - t1651 * t116 + 0.6e1 * t287 * t424 - 0.3e1 * t287 * t447 + 0.6e1 * t419 * t292 - 0.3e1 * t419 * t318 + t4765);
2877 
2878   t4793 = t52 * t1087;
2879   t4797 = t149 * t418;
2880   t4807 = -0.15243447427901234238e2 * t256 * t3527 * t484 - 0.15243447427901234238e2 * t256 * t1247 * t1208 - 0.15243447427901234238e2 * t256 * t1247 * t1145 + 0.10488523547622316684e3 * t752 * t2935 * t1774 - 0.15243447427901234238e2 * t256 * t357 * t3372 - 0.76217237139506171188e1 * t256 * t956 * t1781 - 0.76217237139506171188e1 * t256 * t357 * t4695 - 0.76217237139506171188e1 * t256 * t357 * t4793 - 0.12461621718547169973e1 * t830 * t301 * t4797 - 0.11432585570925925678e2 * t731 * t442 * t1440 - 0.15243447427901234237e2 * t731 * t442 * t1494;
2881   t4808 = t1719 * t258;
2882   t4812 = t427 * t88;
2883   t4819 = t149 * t427;
2884   t4829 = t462 * t127;
2885   t4837 = t2411 * t1710 * t82;
2886   t4840 = t2417 * t1710 * t82;
2887   t4845 = t4605 * t32 * t1710 * t676;
2888   t4849 = t1716 * t82;
2889   t4851 = 0.20744086087359176081e-4 * t4837 - 0.50226189842198418326e-4 * t4840 - 0.10547499866861667849e-3 * t1642 + 0.10968365066300868770e-2 * t4845 + 0.13820139983539094650e-1 * t1645 + 0.70938655914132902945e-4 * t1648 + 0.56300520566772145194e-5 * t4849;
2890   t4862 = -0.76217237139506171188e1 * t256 * t4808 * t313 - 0.13278652291933993376e0 * t2600 * t343 * t4812 + 0.10622921833547194700e0 * t826 * t343 * t3372 + 0.24923243437094339947e1 * t2610 * t301 * t4819 - 0.24923243437094339946e1 * t830 * t473 * t3488 + 0.10622921833547194700e0 * t826 * t1233 * t1208 - 0.24923243437094339946e1 * t830 * t301 * t4829 + 0.53114609167735973502e-1 * t826 * t343 * t4695 + 0.70819478890314631335e-1 * t44 * t94 * t4851 + 0.16615495624729559964e1 * t99 * t51 * t4851 * t111 + 0.16615495624729559964e1 * t300 * t1754 * t334;
2891   t4876 = t56 * t1719;
2892   t4883 = t1087 * t111;
2893   t4899 = -0.76217237139506171188e1 * t256 * t956 * t427 + 0.16615495624729559964e1 * t300 * t301 * t1719 + 0.33230991249459119928e1 * t300 * t1222 * t462 + 0.33230991249459119928e1 * t300 * t473 * t1178 - 0.35409739445157315668e-1 * t295 * t4876 * t88 - 0.35409739445157315668e-1 * t295 * t343 * t1087 + 0.16615495624729559964e1 * t300 * t4883 * t149 - 0.35409739445157315668e-1 * t295 * t933 * t418 + 0.53114609167735973502e-1 * t826 * t933 * t427 - 0.12461621718547169973e1 * t830 * t1744 * t334 - 0.70819478890314631336e-1 * t295 * t3435 * t127;
2894   t4903 = t3554 * t4812;
2895   t4906 = t1256 * t3372;
2896   t4909 = t3584 * t4812;
2897   t4912 = t1256 * t4695;
2898   t4916 = t730 * t255 * t418;
2899   t4922 = t2523 * t751 * t427;
2900   t4932 = t2536 * t255 * t427;
2901   t4935 = -0.70819478890314631336e-1 * t295 * t1233 * t286 + 0.31465570642866950052e3 * t1255 * t4903 + 0.20977047095244633368e3 * t1255 * t4906 - 0.24056046973484009303e4 * t3583 * t4909 + 0.10488523547622316684e3 * t1255 * t4912 - 0.11432585570925925678e2 * t4916 * t358 - 0.22865171141851851356e2 * t1227 * t1263 + 0.20977047095244633367e3 * t4922 * t1540 - 0.22865171141851851357e2 * t1227 * t1248 + 0.20977047095244633368e3 * t749 * t751 * t462 * t1257 + 0.11432585570925925678e2 * t4932 * t358;
2902   t4976 = -t42 * t92 * (t4807 + t4862 + t4899 + t4935) + 0.4e1 * t150 * t1103 + 0.4e1 * t463 * t292 + 0.2e1 * t150 * t1108 - 0.6e1 * t150 * t1100 + 0.4e1 * t287 * t467 + 0.4e1 * t128 * t1197 + 0.2e1 * t419 * t340 - t89 * t1786 + 0.4e1 * t128 * t1200 - 0.6e1 * t42 * t2833 * t423 - 0.6e1 * t89 * t1732 + 0.4e1 * t128 * t1205 + 0.4e1 * t42 * t3641 * t137 + 0.4e1 * t89 * t1735 + 0.2e1 * t42 * t920 * t446 + 0.4e1 * t42 * t1204 * t317 - t1720 * t116;
2903   t4987 = t128 * t701;
2904   t5014 = t228 * t1785;
2905   t5020 = -0.2e1 * t463 * t318 - 0.2e1 * t1179 * t138 - t150 * t1158 + 0.2e1 * t335 * t424 - 0.12e2 * t1192 * t1193 * t317 - 0.12e2 * t4987 * t1194 - 0.12e2 * t1192 * t488 * t137 * t115 + 0.24e2 * t3670 * t159 * t423 * t115 - 0.6e1 * t1192 * t159 * t446 * t115 - t335 * t447 - t1088 * t160 - t419 * t362 - 0.2e1 * t287 * t489 - 0.2e1 * t128 * t1267 + 0.2e1 * t42 * t339 * t1157 + 0.2e1 * t89 * t1738 + 0.2e1 * t42 * t5014 * t115 + t16 * t4851 * t61;
2906   if(v4rho4 != NULL && (p->info->flags & XC_FLAGS_NEEDS_LAPLACIAN) && (p->info->flags & XC_FLAGS_HAVE_LXC))
2907     v4rhosigma2lapl[0] = -t270 * t1789 / 0.2e1 - 0.3e1 / 0.8e1 * t69 * t70 * (t4976 + t5020);
2908 
2909   t5032 = t228 * t1857;
2910   t5061 = 0.2e1 * t42 * t5032 * t115 - t1088 * t179 - 0.6e1 * t169 * t1100 + 0.4e1 * t169 * t1103 + 0.2e1 * t169 * t1108 - t169 * t1158 + 0.4e1 * t128 * t1298 + 0.4e1 * t128 * t1306 - 0.2e1 * t128 * t1362 - 0.6e1 * t89 * t1808 + 0.4e1 * t287 * t502 - 0.2e1 * t287 * t522 + 0.4e1 * t498 * t292 - 0.2e1 * t498 * t318 + 0.2e1 * t375 * t424 - t375 * t447 + 0.2e1 * t419 * t380 - t419 * t402;
2911   t5098 = t168 * t418;
2912   t5105 = t168 * t88;
2913   t5109 = t1795 * t258;
2914   t5119 = 0.10488523547622316684e3 * t752 * t3075 * t1774 - 0.15243447427901234238e2 * t256 * t397 * t3372 - 0.76217237139506171188e1 * t256 * t1043 * t1781 - 0.76217237139506171188e1 * t256 * t397 * t4695 - 0.76217237139506171188e1 * t256 * t397 * t4793 - 0.12461621718547169973e1 * t830 * t301 * t5098 - 0.11432585570925925678e2 * t731 * t442 * t1622 - 0.15243447427901234237e2 * t731 * t442 * t5105 - 0.76217237139506171188e1 * t256 * t5109 * t313 - 0.13278652291933993376e0 * t2600 * t383 * t4812 + 0.10622921833547194700e0 * t826 * t383 * t3372;
2915   t5120 = t168 * t427;
2916   t5130 = t497 * t127;
2917   t5153 = -0.82976344349436704324e-4 * t4837 + 0.20090475936879367331e-3 * t4840 + 0.42189999467446671394e-3 * t1642 - 0.43873460265203475080e-2 * t4845 - 0.55280559934156378601e-1 * t1645 - 0.28375462365653161179e-3 * t1648 - 0.22520208226708858078e-4 * t4849;
2918   t5164 = 0.24923243437094339947e1 * t2610 * t301 * t5120 - 0.24923243437094339946e1 * t830 * t473 * t3814 + 0.10622921833547194700e0 * t826 * t1330 * t1208 - 0.24923243437094339946e1 * t830 * t301 * t5130 + 0.53114609167735973502e-1 * t826 * t383 * t4695 - 0.15243447427901234238e2 * t256 * t3851 * t484 - 0.15243447427901234238e2 * t256 * t1344 * t1208 - 0.15243447427901234238e2 * t256 * t1344 * t1145 + 0.70819478890314631335e-1 * t44 * t94 * t5153 + 0.16615495624729559964e1 * t99 * t51 * t5153 * t111 - 0.12461621718547169973e1 * t830 * t1744 * t374;
2919   t5178 = t56 * t1795;
2920   t5200 = -0.70819478890314631336e-1 * t295 * t3755 * t127 - 0.70819478890314631336e-1 * t295 * t1330 * t286 + 0.53114609167735973502e-1 * t826 * t1019 * t427 - 0.76217237139506171188e1 * t256 * t1043 * t427 - 0.35409739445157315668e-1 * t295 * t5178 * t88 + 0.16615495624729559964e1 * t300 * t301 * t1795 + 0.16615495624729559964e1 * t300 * t1754 * t374 + 0.33230991249459119928e1 * t300 * t1222 * t497 + 0.33230991249459119928e1 * t300 * t473 * t1280 - 0.35409739445157315668e-1 * t295 * t1019 * t418 - 0.35409739445157315668e-1 * t295 * t383 * t1087;
2921   t5205 = t749 * t751 * t497;
2922   t5222 = t1047 * t1150;
2923   t5227 = 0.16615495624729559964e1 * t300 * t4883 * t168 + 0.20977047095244633368e3 * t5205 * t1257 + 0.31465570642866950052e3 * t1352 * t4903 + 0.20977047095244633368e3 * t1352 * t4906 - 0.24056046973484009303e4 * t3884 * t4909 + 0.10488523547622316684e3 * t1352 * t4912 + 0.11432585570925925678e2 * t4932 * t398 - 0.11432585570925925678e2 * t4916 * t398 - 0.22865171141851851356e2 * t1227 * t1358 + 0.20977047095244633367e3 * t4922 * t5222 - 0.22865171141851851357e2 * t1227 * t1345;
2924   t5255 = 0.4e1 * t128 * t1301 + 0.4e1 * t89 * t1811 - 0.6e1 * t42 * t3127 * t423 + 0.4e1 * t42 * t3721 * t137 - 0.2e1 * t1281 * t138 - t1796 * t116 + 0.4e1 * t42 * t1305 * t317 + 0.2e1 * t89 * t1814 + 0.2e1 * t42 * t1006 * t446 - t42 * t92 * (t5119 + t5164 + t5200 + t5227) + 0.24e2 * t3670 * t178 * t423 * t115 - 0.12e2 * t4987 * t1295 + t16 * t5153 * t61 - t89 * t1858 - 0.12e2 * t1192 * t1294 * t317 - 0.6e1 * t1192 * t178 * t446 * t115 - 0.12e2 * t1192 * t521 * t137 * t115 + 0.2e1 * t42 * t379 * t1157;
2925   if(v4rho4 != NULL && (p->info->flags & XC_FLAGS_HAVE_LXC))
2926     v4rhosigma2tau[0] = -t270 * t1861 / 0.2e1 - 0.3e1 / 0.8e1 * t69 * t70 * (t5061 + t5255);
2927 
2928   t5292 = t56 * t1873;
2929   t5299 = -0.35409739445157315668e-1 * t295 * t1422 * t286 - 0.70819478890314631336e-1 * t295 * t933 * t462 - 0.70819478890314631336e-1 * t295 * t343 * t1178 + 0.33230991249459119928e1 * t300 * t1508 * t462 + 0.33230991249459119928e1 * t300 * t585 * t1178 + 0.53114609167735973502e-1 * t826 * t1406 * t286 - 0.12461621718547169973e1 * t830 * t1222 * t546 + 0.16615495624729559964e1 * t300 * t1222 * t537 + 0.16615495624729559964e1 * t300 * t473 * t1382 - 0.35409739445157315668e-1 * t295 * t5292 * t88 + 0.16615495624729559964e1 * t300 * t301 * t1873;
2930   t5309 = t88 * t462;
2931   t5313 = t52 * t1178;
2932   t5320 = t149 * t462;
2933   t5333 = t537 * t127;
2934   t5337 = -0.35409739445157315668e-1 * t295 * t4080 * t127 - 0.76217237139506171188e1 * t256 * t561 * t286 - 0.15243447427901234238e2 * t256 * t956 * t1926 - 0.15243447427901234238e2 * t256 * t357 * t5309 - 0.15243447427901234238e2 * t256 * t357 * t5313 + 0.10488523547622316684e3 * t752 * t1444 * t4680 - 0.24923243437094339946e1 * t830 * t301 * t5320 - 0.15243447427901234237e2 * t731 * t561 * t1208 - 0.11432585570925925678e2 * t731 * t561 * t1145 + 0.53114609167735973502e-1 * t826 * t1422 * t1208 - 0.12461621718547169973e1 * t830 * t301 * t5333;
2935   t5345 = t546 * t127;
2936   t5358 = t1873 * t258;
2937   t5372 = t2411 * t1864 * t82;
2938   t5375 = t2417 * t1864 * t82;
2939   t5380 = t4605 * t32 * t1864 * t676;
2940   t5384 = t1870 * t82;
2941   t5386 = 0.41488172174718352162e-4 * t5372 - 0.10045237968439683665e-3 * t5375 - 0.18081428343191430598e-3 * t1711 + 0.21936730132601737540e-2 * t5380 + 0.23691668543209876543e-1 * t1714 + 0.12160912442422783363e-3 * t1717 + 0.11260104113354429039e-4 * t5384;
2942   t5390 = -0.13278652291933993376e0 * t2600 * t1406 * t1208 + 0.10622921833547194700e0 * t826 * t343 * t3550 + 0.24923243437094339947e1 * t2610 * t301 * t5345 - 0.24923243437094339946e1 * t830 * t473 * t4034 + 0.10622921833547194700e0 * t826 * t343 * t5309 - 0.15243447427901234238e2 * t256 * t357 * t3550 - 0.76217237139506171188e1 * t256 * t5358 * t313 - 0.76217237139506171188e1 * t256 * t4007 * t484 - 0.76217237139506171188e1 * t256 * t1436 * t1208 - 0.76217237139506171188e1 * t256 * t1436 * t1145 + 0.70819478890314631335e-1 * t44 * t94 * t5386;
2943   t5395 = t751 * t546;
2944   t5396 = t2523 * t5395;
2945   t5402 = t749 * t751 * t537;
2946   t5405 = t2536 * t1226;
2947   t5414 = t3584 * t1208;
2948   t5417 = t1256 * t5309;
2949   t5420 = t1256 * t3550;
2950   t5424 = t3554 * t1208;
2951   t5427 = 0.16615495624729559964e1 * t99 * t51 * t5386 * t111 + 0.20977047095244633367e3 * t5396 * t1257 - 0.11432585570925925678e2 * t1227 * t1437 + 0.10488523547622316684e3 * t5402 * t1257 + 0.11432585570925925678e2 * t5405 * t1419 - 0.22865171141851851357e2 * t1513 * t1248 - 0.22865171141851851356e2 * t1513 * t1251 - 0.24056046973484009303e4 * t2500 * t2501 * t546 * t5414 + 0.20977047095244633368e3 * t1255 * t5417 + 0.20977047095244633368e3 * t1255 * t5420 + 0.31465570642866950052e3 * t749 * t5395 * t5424;
2952   t5473 = -0.2e1 * t335 * t489 - t89 * t1938 - t42 * t92 * (t5299 + t5337 + t5390 + t5427) - 0.2e1 * t463 * t362 - t128 * t1452 - 0.12e2 * t1192 * t1193 * t361 - 0.12e2 * t1192 * t159 * t488 * t115 + 0.24e2 * t3670 * t542 * t137 * t115 - 0.6e1 * t1192 * t565 * t137 * t115 - 0.6e1 * t42 * t1394 * t317 - 0.6e1 * t89 * t1885 + 0.4e1 * t42 * t920 * t488 + 0.4e1 * t89 * t1888 + 0.4e1 * t42 * t339 * t1266 + 0.2e1 * t128 * t1403 + 0.2e1 * t42 * t3930 * t137 + 0.2e1 * t42 * t1402 * t317 + 0.2e1 * t89 * t1892;
2953   t5474 = t228 * t1937;
2954   t5483 = t150 * t701;
2955   t5509 = 0.2e1 * t42 * t5474 * t115 - t287 * t566 - 0.2e1 * t150 * t1267 - 0.2e1 * t1179 * t160 - 0.12e2 * t5483 * t1194 - t1874 * t116 - t1383 * t138 - t538 * t318 + t16 * t5386 * t61 + 0.4e1 * t463 * t340 + 0.2e1 * t538 * t292 + 0.4e1 * t150 * t1200 + 0.4e1 * t335 * t467 + 0.4e1 * t150 * t1197 + 0.4e1 * t128 * t1398 + 0.4e1 * t150 * t1205 - 0.6e1 * t128 * t1395 + 0.2e1 * t287 * t543;
2956   if(v4rho4 != NULL && (p->info->flags & XC_FLAGS_NEEDS_LAPLACIAN) && (p->info->flags & XC_FLAGS_HAVE_LXC))
2957     v4rhosigmalapl2[0] = -t270 * t1941 / 0.2e1 - 0.3e1 / 0.8e1 * t69 * t70 * (t5473 + t5509);
2958 
2959   t5516 = t169 * t701;
2960   t5531 = t521 * t159;
2961   t5538 = t178 * t488;
2962   t5551 = -0.6e1 * t1192 * t5531 * t115 - 0.6e1 * t1192 * t5538 * t115 - 0.6e1 * t1192 * t4197 * t137 - 0.6e1 * t1192 * t4204 * t137 - 0.6e1 * t1192 * t1479 * t317 + 0.2e1 * t42 * t4177 * t137 - 0.6e1 * t5516 * t1194 + 0.2e1 * t128 * t1491 - 0.6e1 * t5483 * t1295 + 0.2e1 * t150 * t1301 - 0.6e1 * t4987 * t1480 - 0.6e1 * t3656 * t1961 + 0.2e1 * t335 * t502;
2963   t5566 = t228 * t2023;
2964   t5578 = -0.16595268869887340864e-3 * t5372 + 0.40180951873758734660e-3 * t5375 + 0.72325713372765722388e-3 * t1711 - 0.87746920530406950156e-2 * t5380 - 0.94766674172839506168e-1 * t1714 - 0.48643649769691133449e-3 * t1717 - 0.45040416453417716157e-4 * t5384;
2965   t5586 = -0.6e1 * t1192 * t600 * t137 * t115 + 0.2e1 * t42 * t5566 * t115 + 0.24e2 * t3670 * t1479 * t2769 + 0.2e1 * t42 * t1490 * t317 + t16 * t5578 * t61 - t1948 * t116 - t169 * t1267 - t1466 * t138 + 0.2e1 * t89 * t1971 - t89 * t2024 - t575 * t318 - t498 * t362 + 0.2e1 * t463 * t380;
2966   t5609 = 0.2e1 * t42 * t1006 * t488 + 0.2e1 * t42 * t379 * t1266 + 0.2e1 * t42 * t1305 * t361 - t1179 * t179 - t128 * t1550 - t1281 * t160 - t150 * t1362 + 0.2e1 * t89 * t1967 - t287 * t601 + 0.2e1 * t575 * t292 - t335 * t522 - t375 * t489 - t463 * t402;
2967   t5631 = t56 * t1947;
2968   t5656 = 0.16615495624729559964e1 * t300 * t585 * t1280 - 0.35409739445157315668e-1 * t295 * t4313 * t127 - 0.35409739445157315668e-1 * t295 * t1519 * t286 + 0.16615495624729559964e1 * t300 * t1986 * t374 + 0.16615495624729559964e1 * t300 * t1508 * t497 + 0.16615495624729559964e1 * t300 * t1222 * t574 + 0.16615495624729559964e1 * t300 * t473 * t1465 - 0.35409739445157315668e-1 * t295 * t5631 * t88 + 0.16615495624729559964e1 * t300 * t301 * t1947 - 0.35409739445157315668e-1 * t295 * t1330 * t334 - 0.35409739445157315668e-1 * t295 * t1019 * t462 - 0.35409739445157315668e-1 * t295 * t383 * t1178 + 0.16615495624729559964e1 * t300 * t1178 * t111 * t168 - 0.35409739445157315668e-1 * t295 * t3755 * t149 - 0.11432585570925925678e2 * t1513 * t1348;
2969   t5667 = t1212 * t88;
2970   t5694 = t1947 * t258;
2971   t5704 = -0.15243447427901234237e2 * t1513 * t1355 - 0.11432585570925925678e2 * t1513 * t1358 - 0.11432585570925925678e2 * t1513 * t1345 - 0.13278652291933993376e0 * t44 * t2551 * t1498 * t1208 + 0.31465570642866950052e3 * t1352 * t3554 * t5667 - 0.24056046973484009303e4 * t3884 * t3584 * t5667 + 0.11432585570925925678e2 * t5405 * t397 * t596 * t88 + 0.20977047095244633367e3 * t4367 * t1047 * t1930 * t88 - 0.76217237139506171188e1 * t256 * t397 * t3550 - 0.76217237139506171188e1 * t256 * t1043 * t1926 - 0.76217237139506171188e1 * t256 * t397 * t5309 - 0.76217237139506171188e1 * t256 * t397 * t5313 - 0.76217237139506171188e1 * t256 * t5694 * t313 - 0.76217237139506171188e1 * t256 * t4262 * t484 - 0.76217237139506171188e1 * t256 * t1533 * t1208;
2972   t5718 = t168 * t462;
2973   t5725 = t574 * t127;
2974   t5753 = -0.76217237139506171188e1 * t256 * t1533 * t1145 - 0.76217237139506171188e1 * t256 * t3851 * t596 - 0.76217237139506171188e1 * t256 * t1344 * t1494 - 0.76217237139506171188e1 * t256 * t1344 * t1440 - 0.12461621718547169973e1 * t830 * t301 * t5718 + 0.53114609167735973502e-1 * t826 * t1519 * t1208 - 0.12461621718547169973e1 * t830 * t301 * t5725 + 0.53114609167735973502e-1 * t826 * t383 * t3550 + 0.53114609167735973502e-1 * t826 * t383 * t3488 - 0.12461621718547169973e1 * t830 * t1222 * t1498 - 0.12461621718547169973e1 * t830 * t473 * t4243 - 0.12461621718547169973e1 * t830 * t473 * t4286 - 0.76217237139506171188e1 * t256 * t1043 * t1212 - 0.76217237139506171188e1 * t256 * t397 * t3488 + 0.53114609167735973502e-1 * t826 * t1330 * t1494;
2975   t5754 = t497 * t149;
2976   t5769 = t749 * t751 * t574;
2977   t5785 = t730 * t255 * t462;
2978   t5797 = -0.12461621718547169973e1 * t830 * t301 * t5754 + 0.53114609167735973502e-1 * t826 * t383 * t5309 + 0.53114609167735973502e-1 * t826 * t1019 * t1212 + 0.10488523547622316684e3 * t1352 * t5417 - 0.11432585570925925678e2 * t1227 * t1534 + 0.10488523547622316684e3 * t5769 * t1257 + 0.10488523547622316684e3 * t5205 * t1540 + 0.10488523547622316684e3 * t3876 * t2014 + 0.10488523547622316684e3 * t1352 * t5420 + 0.10488523547622316684e3 * t1352 * t1256 * t3488 + 0.24923243437094339947e1 * t2491 * t100 * t1977 - 0.11432585570925925678e2 * t5785 * t398 - 0.11432585570925925678e2 * t4360 * t518 + 0.70819478890314631335e-1 * t44 * t94 * t5578 + 0.16615495624729559964e1 * t99 * t51 * t5578 * t111;
2979   t5827 = -t42 * t92 * (t5656 + t5704 + t5753 + t5797) + 0.2e1 * t150 * t1306 + 0.2e1 * t150 * t1298 + 0.2e1 * t128 * t1486 + 0.2e1 * t287 * t579 + 0.2e1 * t128 * t1483 + 0.2e1 * t42 * t3721 * t159 + 0.2e1 * t89 * t1964 + 0.2e1 * t169 * t1200 + 0.2e1 * t375 * t467 + 0.2e1 * t169 * t1197 + 0.2e1 * t498 * t340 + 0.2e1 * t169 * t1205;
2980   if(v4rho4 != NULL && (p->info->flags & XC_FLAGS_NEEDS_LAPLACIAN) && (p->info->flags & XC_FLAGS_HAVE_LXC))
2981     v4rhosigmalapltau[0] = -t270 * t2027 / 0.2e1 - 0.3e1 / 0.8e1 * t69 * t70 * (t5551 + t5586 + t5609 + t5827);
2982 
2983   t5848 = t88 * t497;
2984   t5859 = t168 * t497;
2985   t5872 = t609 * t127;
2986   t5882 = -0.15243447427901234238e2 * t256 * t1043 * t2086 - 0.15243447427901234238e2 * t256 * t397 * t5848 - 0.15243447427901234238e2 * t256 * t397 * t52 * t1280 + 0.10622921833547194700e0 * t826 * t383 * t5848 - 0.24923243437094339946e1 * t830 * t301 * t5859 - 0.15243447427901234237e2 * t731 * t633 * t1208 - 0.11432585570925925678e2 * t731 * t633 * t1145 + 0.53114609167735973502e-1 * t826 * t1604 * t1208 - 0.12461621718547169973e1 * t830 * t301 * t5872 - 0.13278652291933993376e0 * t2600 * t1587 * t1208 + 0.10622921833547194700e0 * t826 * t383 * t3810;
2987   t5896 = t2033 * t258;
2988   t5918 = 0.24923243437094339947e1 * t2610 * t301 * t618 * t127 - 0.24923243437094339946e1 * t830 * t473 * t4564 + 0.10488523547622316684e3 * t752 * t1626 * t4680 - 0.15243447427901234238e2 * t256 * t397 * t3810 - 0.76217237139506171188e1 * t256 * t5896 * t313 - 0.76217237139506171188e1 * t256 * t4553 * t484 - 0.76217237139506171188e1 * t256 * t1618 * t1208 - 0.76217237139506171188e1 * t256 * t1618 * t1145 - 0.70819478890314631336e-1 * t295 * t1019 * t497 - 0.35409739445157315668e-1 * t295 * t1604 * t286 + 0.16615495624729559964e1 * t300 * t1222 * t609;
2989   t5926 = t374 * t111;
2990   t5942 = t56 * t2033;
2991   t5955 = 0.16615495624729559964e1 * t300 * t473 * t1563 - 0.70819478890314631336e-1 * t295 * t383 * t1280 + 0.33230991249459119928e1 * t300 * t5926 * t497 + 0.33230991249459119928e1 * t300 * t1597 * t1280 + 0.53114609167735973502e-1 * t826 * t1587 * t286 - 0.12461621718547169973e1 * t830 * t1222 * t618 - 0.76217237139506171188e1 * t256 * t633 * t286 - 0.35409739445157315668e-1 * t295 * t5942 * t88 + 0.16615495624729559964e1 * t300 * t301 * t2033 - 0.35409739445157315668e-1 * t295 * t4497 * t127 + 0.20977047095244633368e3 * t1352 * t1256 * t5848;
2992   t5959 = t751 * t618;
2993   t5960 = t749 * t5959;
2994   t5964 = t2500 * t2501 * t618;
2995   t5973 = t2523 * t5959;
2996   t5979 = t749 * t751 * t609;
2997   t5989 = 0.66381075479549363457e-3 * t5372 - 0.16072380749503493864e-2 * t5375 - 0.28930285349106288955e-2 * t1711 + 0.35098768212162780063e-1 * t5380 + 0.37906669669135802468e0 * t1714 + 0.19457459907876453379e-2 * t1717 + 0.18016166581367086462e-3 * t5384;
2998   t5997 = 0.20977047095244633368e3 * t1352 * t1256 * t3810 + 0.31465570642866950052e3 * t5960 * t5424 - 0.24056046973484009303e4 * t5964 * t5414 + 0.11432585570925925678e2 * t5405 * t1601 - 0.22865171141851851357e2 * t4579 * t1345 - 0.22865171141851851356e2 * t4579 * t1348 + 0.20977047095244633367e3 * t5973 * t1257 - 0.11432585570925925678e2 * t1227 * t1619 + 0.10488523547622316684e3 * t5979 * t1257 + 0.16615495624729559964e1 * t99 * t51 * t5989 * t111 + 0.70819478890314631335e-1 * t44 * t94 * t5989;
2999   t6025 = -0.2e1 * t169 * t1362 - 0.2e1 * t498 * t402 - 0.2e1 * t375 * t522 - t128 * t1634 + 0.2e1 * t287 * t615 - t287 * t638 - t42 * t92 * (t5882 + t5918 + t5955 + t5997) - 0.12e2 * t5516 * t1295 - t89 * t2097 - t610 * t318 - 0.6e1 * t128 * t1576 + 0.4e1 * t128 * t1579 + 0.4e1 * t169 * t1306 + 0.4e1 * t89 * t2048 - 0.6e1 * t42 * t1575 * t317 - 0.6e1 * t89 * t2045 + 0.4e1 * t42 * t379 * t1361 + 0.4e1 * t42 * t1006 * t521;
3000   t6052 = t228 * t2096;
3001   t6071 = 0.2e1 * t128 * t1584 - t1564 * t138 - 0.2e1 * t1281 * t179 - t2034 * t116 + 0.24e2 * t3670 * t614 * t137 * t115 - 0.12e2 * t1192 * t1294 * t401 - 0.6e1 * t1192 * t637 * t137 * t115 - 0.12e2 * t1192 * t178 * t521 * t115 + 0.2e1 * t42 * t4405 * t137 + 0.2e1 * t89 * t2052 + 0.2e1 * t42 * t6052 * t115 + 0.2e1 * t42 * t1583 * t317 + 0.2e1 * t610 * t292 + 0.4e1 * t169 * t1298 + 0.4e1 * t498 * t380 + 0.4e1 * t169 * t1301 + 0.4e1 * t375 * t502 + t16 * t5989 * t61;
3002   if(v4rho4 != NULL && (p->info->flags & XC_FLAGS_HAVE_LXC))
3003     v4rhosigmatau2[0] = -t270 * t2100 / 0.2e1 - 0.3e1 / 0.8e1 * t69 * t70 * (t6025 + t6071);
3004 
3005   t6079 = t2411 * t2103 * t82;
3006   t6082 = t2417 * t2103 * t82;
3007   t6087 = t4605 * t32 * t2103 * t676;
3008   t6091 = t2109 * t82;
3009   t6093 = 0.82976344349436704320e-4 * t6079 - 0.20090475936879367330e-3 * t6082 - 0.30135713905319050994e-3 * t1865 + 0.43873460265203475079e-2 * t6087 + 0.39486114238683127572e-1 * t1868 + 0.20268187404037972270e-3 * t1871 + 0.22520208226708858078e-4 * t6091;
3010   t6118 = t2468 * t2121;
3011   t6127 = t159 * t565;
3012   t6138 = t228 * t2164;
3013   t6149 = t56 * t2112;
3014   t6168 = t56 * t2128;
3015   t6184 = -0.34297756712777777034e2 * t1513 * t1437 + 0.31465570642866950052e3 * t5402 * t1540 - 0.15243447427901234237e2 * t731 * t2142 * t88 - 0.35409739445157315668e-1 * t295 * t6149 * t88 + 0.16615495624729559964e1 * t300 * t301 * t2112 - 0.37384865155641509919e1 * t830 * t2199 * t334 - 0.10622921833547194700e0 * t295 * t933 * t537 - 0.10622921833547194700e0 * t295 * t343 * t1382 + 0.49846486874188679892e1 * t300 * t1508 * t537 - 0.13278652291933993376e0 * t2600 * t6168 * t88 + 0.15934382750320792051e0 * t826 * t1406 * t334 + 0.24923243437094339947e1 * t2610 * t301 * t2128 - 0.22865171141851851356e2 * t256 * t561 * t334 + 0.49846486874188679892e1 * t300 * t585 * t1382;
3016   t6188 = t2112 * t258;
3017   t6201 = t106 * t334;
3018   t6208 = t2128 * t2505;
3019   t6215 = t537 * t88;
3020   t6219 = t149 * t537;
3021   t6233 = 0.20977047095244633367e3 * t2524 * t2156 * t1150 - 0.76217237139506171188e1 * t256 * t6188 * t313 - 0.22865171141851851357e2 * t256 * t4007 * t596 - 0.22865171141851851357e2 * t256 * t1436 * t1494 - 0.22865171141851851357e2 * t256 * t1436 * t1440 + 0.31465570642866950052e3 * t752 * t1444 * t6201 + 0.31465570642866950052e3 * t752 * t2156 * t313 - 0.24056046973484009303e4 * t2502 * t6208 * t4688 + 0.11432585570925925678e2 * t2537 * t2142 * t313 + 0.15934382750320792050e0 * t826 * t343 * t6215 - 0.37384865155641509919e1 * t830 * t301 * t6219 - 0.34297756712777777034e2 * t731 * t561 * t1440 + 0.70819478890314631335e-1 * t44 * t94 * t6093 + 0.16615495624729559964e1 * t99 * t51 * t6093 * t111;
3022   t6237 = -0.3e1 * t150 * t1452 - 0.6e1 * t89 * t2122 + 0.24e2 * t42 * t6118 * t115 - 0.18e2 * t42 * t1394 * t361 + 0.6e1 * t89 * t2125 - 0.18e2 * t1192 * t6127 * t115 + 0.6e1 * t42 * t920 * t565 + 0.6e1 * t42 * t339 * t1451 - t89 * t2165 + 0.2e1 * t42 * t6138 * t115 - t42 * t92 * (t6184 + t6233);
3023   if(v4rho4 != NULL && (p->info->flags & XC_FLAGS_NEEDS_LAPLACIAN) && (p->info->flags & XC_FLAGS_HAVE_LXC))
3024     v4rholapl3[0] = -t270 * t2168 / 0.2e1 - 0.3e1 / 0.8e1 * t69 * t70 * (t16 * t6093 * t61 - t2113 * t116 - 0.3e1 * t1383 * t160 - 0.18e2 * t150 * t1395 + 0.12e2 * t150 * t1398 + 0.6e1 * t150 * t1403 + 0.6e1 * t335 * t543 - 0.3e1 * t335 * t566 + 0.6e1 * t538 * t340 - 0.3e1 * t538 * t362 + t6237);
3025 
3026   t6277 = t228 * t2240;
3027   t6283 = -0.12e2 * t5483 * t1480 - t375 * t566 - t538 * t402 - t1383 * t179 - 0.2e1 * t335 * t601 - 0.6e1 * t42 * t3127 * t542 + 0.4e1 * t42 * t4177 * t159 + 0.4e1 * t89 * t2190 - 0.6e1 * t89 * t2187 + 0.4e1 * t335 * t579 + 0.2e1 * t538 * t380 + 0.2e1 * t169 * t1403 + 0.4e1 * t150 * t1486 + 0.4e1 * t150 * t1483 + 0.2e1 * t42 * t379 * t1451 + 0.2e1 * t42 * t1006 * t565 + 0.2e1 * t42 * t6277 * t115 + 0.4e1 * t150 * t1491;
3028   t6300 = t546 * t88;
3029   t6311 = t2536 * t255 * t546;
3030   t6315 = t730 * t255 * t537;
3031   t6323 = 0.10488523547622316684e3 * t1352 * t1256 * t6215 + 0.20977047095244633367e3 * t5396 * t5222 - 0.22865171141851851357e2 * t1513 * t1534 + 0.20977047095244633368e3 * t5769 * t1540 + 0.31465570642866950052e3 * t1352 * t3554 * t6300 + 0.20977047095244633368e3 * t1352 * t1256 * t4034 - 0.24056046973484009303e4 * t3884 * t3584 * t6300 + 0.11432585570925925678e2 * t6311 * t398 - 0.11432585570925925678e2 * t6315 * t398 - 0.22865171141851851356e2 * t1513 * t1546 - 0.70819478890314631336e-1 * t295 * t1519 * t334;
3032   t6340 = -0.33190537739774681727e-3 * t6079 + 0.80361903747517469318e-3 * t6082 + 0.12054285562127620398e-2 * t1865 - 0.17549384106081390032e-1 * t6087 - 0.15794445695473251028e0 * t1868 - 0.81072749616151889080e-3 * t1871 - 0.90080832906835432311e-4 * t6091;
3033   t6357 = t56 * t2174;
3034   t6367 = -0.35409739445157315668e-1 * t295 * t1019 * t537 + 0.53114609167735973502e-1 * t826 * t1019 * t546 - 0.12461621718547169973e1 * t830 * t2199 * t374 + 0.16615495624729559964e1 * t99 * t51 * t6340 * t111 + 0.70819478890314631335e-1 * t44 * t94 * t6340 - 0.76217237139506171188e1 * t256 * t1043 * t546 + 0.33230991249459119928e1 * t300 * t1508 * t574 + 0.33230991249459119928e1 * t300 * t585 * t1465 - 0.35409739445157315668e-1 * t295 * t6357 * t88 + 0.16615495624729559964e1 * t300 * t301 * t2174 - 0.35409739445157315668e-1 * t295 * t383 * t1382;
3035   t6392 = t2174 * t258;
3036   t6405 = 0.16615495624729559964e1 * t300 * t1382 * t111 * t168 + 0.16615495624729559964e1 * t300 * t2209 * t374 - 0.70819478890314631336e-1 * t295 * t4313 * t149 - 0.24923243437094339946e1 * t830 * t585 * t4286 + 0.10622921833547194700e0 * t826 * t1519 * t1494 - 0.76217237139506171188e1 * t256 * t397 * t6215 - 0.76217237139506171188e1 * t256 * t397 * t52 * t1382 - 0.76217237139506171188e1 * t256 * t6392 * t313 - 0.15243447427901234238e2 * t256 * t4262 * t596 - 0.15243447427901234238e2 * t256 * t1533 * t1494 - 0.15243447427901234238e2 * t256 * t1533 * t1440;
3037   t6415 = t574 * t149;
3038   t6422 = t168 * t537;
3039   t6438 = t168 * t546;
3040   t6442 = 0.10488523547622316684e3 * t752 * t3075 * t2229 - 0.15243447427901234238e2 * t256 * t397 * t4034 - 0.76217237139506171188e1 * t256 * t1043 * t2236 - 0.24923243437094339946e1 * t830 * t301 * t6415 + 0.53114609167735973502e-1 * t826 * t383 * t6215 - 0.12461621718547169973e1 * t830 * t301 * t6422 - 0.11432585570925925678e2 * t731 * t561 * t1622 - 0.15243447427901234237e2 * t731 * t561 * t5105 - 0.13278652291933993376e0 * t2600 * t383 * t6300 + 0.10622921833547194700e0 * t826 * t383 * t4034 + 0.24923243437094339947e1 * t2610 * t301 * t6438;
3041   t6450 = t178 * t565;
3042   t6454 = t600 * t159;
3043   t6458 = t178 * t542;
3044   t6479 = -0.2e1 * t150 * t1550 + 0.2e1 * t89 * t2193 + 0.4e1 * t42 * t1490 * t361 - t42 * t92 * (t6323 + t6367 + t6405 + t6442) - 0.12e2 * t1192 * t1479 * t361 - 0.6e1 * t1192 * t6450 * t115 - 0.12e2 * t1192 * t6454 * t115 + 0.24e2 * t3670 * t6458 * t115 + 0.4e1 * t169 * t1398 - 0.6e1 * t169 * t1395 + 0.4e1 * t575 * t340 - t2175 * t116 - 0.2e1 * t575 * t362 - 0.2e1 * t1466 * t160 - t169 * t1452 + 0.2e1 * t375 * t543 - t89 * t2241 + t16 * t6340 * t61;
3045   if(v4rho4 != NULL && (p->info->flags & XC_FLAGS_NEEDS_LAPLACIAN) && (p->info->flags & XC_FLAGS_HAVE_LXC))
3046     v4rholapl2tau[0] = -t270 * t2244 / 0.2e1 - 0.3e1 / 0.8e1 * t69 * t70 * (t6283 + t6479);
3047 
3048   t6496 = t228 * t2314;
3049   t6507 = t178 * t600;
3050   t6511 = t614 * t159;
3051   t6525 = t637 * t159;
3052   t6531 = 0.2e1 * t42 * t4405 * t159 + 0.2e1 * t42 * t1583 * t361 + 0.2e1 * t89 * t2269 - 0.12e2 * t5516 * t1480 + 0.2e1 * t42 * t6496 * t115 + 0.4e1 * t575 * t380 + 0.2e1 * t610 * t340 - 0.12e2 * t1192 * t1479 * t401 - 0.12e2 * t1192 * t6507 * t115 + 0.24e2 * t3670 * t6511 * t115 + 0.4e1 * t375 * t579 + 0.4e1 * t169 * t1483 + 0.4e1 * t150 * t1579 + 0.4e1 * t169 * t1491 + 0.4e1 * t169 * t1486 - 0.6e1 * t1192 * t6525 * t115 - t610 * t362 - t1564 * t160;
3053   t6564 = t2536 * t1512;
3054   t6567 = t574 * t88;
3055   t6578 = 0.13276215095909872691e-2 * t6079 - 0.32144761499006987728e-2 * t6082 - 0.48217142248510481591e-2 * t1865 + 0.70197536424325560128e-1 * t6087 + 0.63177782781893004115e0 * t1868 + 0.32429099846460755632e-2 * t1871 + 0.36032333162734172925e-3 * t6091;
3056   t6583 = 0.20977047095244633368e3 * t1352 * t1256 * t4243 + 0.31465570642866950052e3 * t5960 * t3554 * t1494 - 0.24056046973484009303e4 * t5964 * t3584 * t1494 - 0.22865171141851851357e2 * t4579 * t1534 - 0.22865171141851851356e2 * t4579 * t1537 + 0.20977047095244633367e3 * t5973 * t1540 - 0.11432585570925925678e2 * t1513 * t1619 + 0.10488523547622316684e3 * t5979 * t1540 + 0.11432585570925925678e2 * t6564 * t1601 + 0.20977047095244633368e3 * t1352 * t1256 * t6567 + 0.16615495624729559964e1 * t99 * t51 * t6578 * t111;
3057   t6611 = t56 * t2250;
3058   t6618 = 0.70819478890314631335e-1 * t44 * t94 * t6578 + 0.16615495624729559964e1 * t300 * t1508 * t609 - 0.70819478890314631336e-1 * t295 * t383 * t1465 + 0.33230991249459119928e1 * t300 * t5926 * t574 + 0.33230991249459119928e1 * t300 * t1597 * t1465 + 0.53114609167735973502e-1 * t826 * t1587 * t334 - 0.12461621718547169973e1 * t830 * t1508 * t618 - 0.70819478890314631336e-1 * t295 * t1019 * t574 + 0.16615495624729559964e1 * t300 * t585 * t1563 - 0.35409739445157315668e-1 * t295 * t6611 * t88 + 0.16615495624729559964e1 * t300 * t301 * t2250;
3059   t6651 = t609 * t149;
3060   t6655 = -0.35409739445157315668e-1 * t295 * t4497 * t149 - 0.35409739445157315668e-1 * t295 * t1604 * t334 - 0.76217237139506171188e1 * t256 * t633 * t334 - 0.15243447427901234238e2 * t256 * t397 * t6567 - 0.15243447427901234238e2 * t256 * t397 * t52 * t1465 + 0.10488523547622316684e3 * t752 * t1626 * t6201 - 0.15243447427901234238e2 * t256 * t397 * t4243 - 0.15243447427901234237e2 * t731 * t633 * t1494 - 0.11432585570925925678e2 * t731 * t633 * t1440 + 0.53114609167735973502e-1 * t826 * t1604 * t1494 - 0.12461621718547169973e1 * t830 * t301 * t6651;
3061   t6662 = t618 * t149;
3062   t6672 = t168 * t574;
3063   t6676 = t2250 * t258;
3064   t6692 = -0.13278652291933993376e0 * t2600 * t1587 * t1494 + 0.10622921833547194700e0 * t826 * t383 * t4243 + 0.24923243437094339947e1 * t2610 * t301 * t6662 - 0.24923243437094339946e1 * t830 * t585 * t4564 + 0.10622921833547194700e0 * t826 * t383 * t6567 - 0.24923243437094339946e1 * t830 * t301 * t6672 - 0.76217237139506171188e1 * t256 * t6676 * t313 - 0.76217237139506171188e1 * t256 * t4553 * t596 - 0.76217237139506171188e1 * t256 * t1618 * t1494 - 0.76217237139506171188e1 * t256 * t1618 * t1440 - 0.15243447427901234238e2 * t256 * t1043 * t2303;
3065   t6717 = -0.2e1 * t1466 * t179 - t2251 * t116 - 0.2e1 * t575 * t402 - 0.2e1 * t169 * t1550 - 0.2e1 * t375 * t601 - t150 * t1634 + 0.2e1 * t335 * t615 - t335 * t638 - t42 * t92 * (t6583 + t6618 + t6655 + t6692) - t89 * t2315 - 0.6e1 * t42 * t1575 * t361 - 0.6e1 * t89 * t2262 - 0.6e1 * t150 * t1576 + 0.4e1 * t42 * t1006 * t600 + 0.4e1 * t89 * t2265 + 0.4e1 * t42 * t379 * t1549 + 0.2e1 * t150 * t1584 + t16 * t6578 * t61;
3066   if(v4rho4 != NULL && (p->info->flags & XC_FLAGS_NEEDS_LAPLACIAN) && (p->info->flags & XC_FLAGS_HAVE_LXC))
3067     v4rholapltau2[0] = -t270 * t2318 / 0.2e1 - 0.3e1 / 0.8e1 * t69 * t70 * (t6531 + t6717);
3068 
3069   t6731 = -0.53104860383639490765e-2 * t6079 + 0.12857904599602795091e-1 * t6082 + 0.19286856899404192636e-1 * t1865 - 0.28079014569730224051e0 * t6087 - 0.25271113112757201646e1 * t1868 - 0.12971639938584302253e-1 * t1871 - 0.14412933265093669170e-2 * t6091;
3070   t6756 = t2468 * t2333;
3071   t6765 = t178 * t637;
3072   t6776 = t228 * t2376;
3073   t6787 = t2324 * t258;
3074   t6807 = t2340 * t2505;
3075   t6818 = t168 * t609;
3076   t6825 = -0.22865171141851851356e2 * t256 * t633 * t374 - 0.34297756712777777034e2 * t4579 * t1619 + 0.31465570642866950052e3 * t5979 * t5222 - 0.76217237139506171188e1 * t256 * t6787 * t313 - 0.22865171141851851357e2 * t256 * t4553 * t1029 - 0.22865171141851851357e2 * t256 * t1618 * t5105 - 0.22865171141851851357e2 * t256 * t1618 * t1622 + 0.31465570642866950052e3 * t752 * t1626 * t106 * t374 + 0.31465570642866950052e3 * t752 * t2368 * t313 - 0.24056046973484009303e4 * t2502 * t6807 * t4688 + 0.11432585570925925678e2 * t2537 * t2354 * t313 + 0.15934382750320792050e0 * t826 * t383 * t609 * t88 - 0.37384865155641509919e1 * t830 * t301 * t6818 - 0.34297756712777777034e2 * t731 * t633 * t1622;
3077   t6829 = t618 * t111;
3078   t6836 = t56 * t2324;
3079   t6855 = t56 * t2340;
3080   t6872 = 0.20977047095244633367e3 * t2524 * t2368 * t1150 - 0.37384865155641509919e1 * t830 * t6829 * t374 - 0.15243447427901234237e2 * t731 * t2354 * t88 - 0.35409739445157315668e-1 * t295 * t6836 * t88 + 0.16615495624729559964e1 * t300 * t301 * t2324 - 0.10622921833547194700e0 * t295 * t1019 * t609 - 0.10622921833547194700e0 * t295 * t383 * t1563 + 0.49846486874188679892e1 * t300 * t5926 * t609 + 0.49846486874188679892e1 * t300 * t1597 * t1563 - 0.13278652291933993376e0 * t2600 * t6855 * t88 + 0.15934382750320792051e0 * t826 * t1587 * t374 + 0.24923243437094339947e1 * t2610 * t301 * t2340 + 0.70819478890314631335e-1 * t44 * t94 * t6731 + 0.16615495624729559964e1 * t99 * t51 * t6731 * t111;
3081   t6876 = -0.3e1 * t169 * t1634 - 0.6e1 * t89 * t2334 + 0.24e2 * t42 * t6756 * t115 - 0.18e2 * t42 * t1575 * t401 + 0.6e1 * t89 * t2337 - 0.18e2 * t1192 * t6765 * t115 + 0.6e1 * t42 * t1006 * t637 + 0.6e1 * t42 * t379 * t1633 - t89 * t2377 + 0.2e1 * t42 * t6776 * t115 - t42 * t92 * (t6825 + t6872);
3082   if(v4rho4 != NULL && (p->info->flags & XC_FLAGS_HAVE_LXC))
3083     v4rhotau3[0] = -t270 * t2380 / 0.2e1 - 0.3e1 / 0.8e1 * t69 * t70 * (t16 * t6731 * t61 - t2325 * t116 - 0.3e1 * t1564 * t179 - 0.18e2 * t169 * t1576 + 0.12e2 * t169 * t1579 + 0.6e1 * t169 * t1584 + 0.6e1 * t375 * t615 - 0.3e1 * t375 * t638 + 0.6e1 * t610 * t380 - 0.3e1 * t610 * t402 + t6876);
3084 
3085   t6883 = 0.1e1 / t17 / t1640 / t21;
3086   t6885 = t6883 * t29 * t32;
3087   t6890 = t206 * t6883;
3088   t6895 = -0.12965053804599485051e-5 * t2411 * t6885 + 0.31391368651374011455e-5 * t2417 * t6885 - 0.68552281664380429815e-4 * t6890 * t2425 - 0.35187825354232590748e-6 * t6890 * t2424;
3089   t6910 = t423 * t423;
3090   t6917 = t446 * t446;
3091   t6931 = t427 * t427;
3092   t6944 = t6931 * t755;
3093   t6948 = t418 * t418;
3094   t6994 = 0.16615495624729559964e1 * t99 * t51 * t6895 * t111 + 0.70819478890314631335e-1 * t44 * t94 * t6895 + 0.24923243437094339947e1 * t2491 * t51 * t6931 * t111 - 0.24056046973484009303e4 * t2502 * t6931 * t2505 * t2507 - 0.15243447427901234237e2 * t730 * t255 * t6931 * t258 + 0.20977047095244633367e3 * t2524 * t6944 * t106 - 0.10622921833547194700e0 * t44 * t235 * t6948 - 0.14163895778062926267e0 * t295 * t296 * t1650 + 0.49846486874188679892e1 * t240 * t51 * t6948 * t111 + 0.66461982498918239856e1 * t300 * t473 * t1650 - 0.13278652291933993376e0 * t44 * t2551 * t6931 + 0.31868765500641584101e0 * t826 * t1111 * t418 - 0.74769730311283019838e1 * t830 * t1744 * t418 + 0.11432585570925925678e2 * t2537 * t6931 * t258 * t52 + 0.31465570642866950052e3 * t752 * t6944 * t52 - 0.68595513425555554068e2 * t731 * t442 * t1781 - 0.30486894855802468476e2 * t256 * t4667 * t484 - 0.45730342283703702713e2 * t256 * t1141 * t427 - 0.22865171141851851357e2 * t256 * t6948 * t258 * t52 + 0.62931141285733900104e3 * t752 * t3336 * t1774;
3095   t6997 = -0.36e2 * t42 * t1099 * t446 + t16 * t6895 * t61 + 0.8e1 * t42 * t291 * t1702 + 0.6e1 * t42 * t228 * t6917 + 0.24e2 * t42 * t2468 * t6910 - t42 * t92 * t6994 - 0.24e2 * t128 * t1660 + 0.24e2 * t128 * t1663 - 0.4e1 * t128 * t1703 - 0.4e1 * t1651 * t138 + 0.12e2 * t419 * t424 - 0.6e1 * t419 * t447;
3096   if(v4rho4 != NULL && (p->info->flags & XC_FLAGS_HAVE_LXC))
3097     v4sigma4[0] = -0.3e1 / 0.8e1 * t69 * t70 * t6997;
3098 
3099   t7002 = 0.1e1 / t17 / t4601;
3100   t7004 = t7002 * t29 * t32;
3101   t7005 = t2411 * t7004;
3102   t7007 = t2417 * t7004;
3103   t7009 = t206 * t7002;
3104   t7010 = t7009 * t2425;
3105   t7012 = t7009 * t2424;
3106   t7014 = -0.25930107609198970102e-5 * t7005 + 0.62782737302748022908e-5 * t7007 - 0.13710456332876085962e-3 * t7010 - 0.70375650708465181493e-6 * t7012;
3107   t7019 = t1256 * t4699;
3108   t7022 = t2507 * t1666;
3109   t7047 = t52 * t1666;
3110   t7051 = t52 * t1650;
3111   t7061 = -0.34297756712777777034e2 * t4916 * t485 + 0.31465570642866950052e3 * t1255 * t7019 - 0.24056046973484009303e4 * t2502 * t2939 * t7022 - 0.22865171141851851357e2 * t256 * t357 * t4699 - 0.34297756712777777035e2 * t731 * t442 * t1926 + 0.20977047095244633367e3 * t2524 * t1694 * t2307 - 0.22865171141851851357e2 * t256 * t4808 * t484 + 0.15934382750320792050e0 * t826 * t343 * t4699 - 0.37384865155641509919e1 * t830 * t473 * t4797 + 0.11432585570925925678e2 * t2537 * t1680 * t596 + 0.31465570642866950052e3 * t752 * t960 * t7047 - 0.76217237139506171188e1 * t256 * t357 * t7051 - 0.22865171141851851357e2 * t256 * t1247 * t1781 + 0.31465570642866950052e3 * t752 * t3503 * t1774;
3112   t7075 = t1650 * t111;
3113   t7094 = t1666 * t111;
3114   t7107 = 0.16615495624729559964e1 * t99 * t51 * t7014 * t111 + 0.70819478890314631335e-1 * t44 * t94 * t7014 - 0.15243447427901234237e2 * t731 * t1680 * t149 - 0.13278652291933993376e0 * t2600 * t343 * t1666 + 0.16615495624729559964e1 * t300 * t7075 * t149 + 0.49846486874188679892e1 * t300 * t1754 * t462 - 0.37384865155641509919e1 * t830 * t1744 * t462 - 0.10622921833547194700e0 * t295 * t4876 * t127 - 0.10622921833547194700e0 * t295 * t1233 * t418 + 0.15934382750320792050e0 * t826 * t1233 * t427 + 0.24923243437094339947e1 * t2610 * t7094 * t149 - 0.22865171141851851357e2 * t256 * t1247 * t427 + 0.49846486874188679892e1 * t300 * t473 * t1719 - 0.35409739445157315668e-1 * t295 * t343 * t1650;
3115   t7154 = -0.18e2 * t1192 * t1193 * t446 + 0.6e1 * t42 * t5014 * t137 + 0.24e2 * t42 * t2819 * t1659 - 0.18e2 * t42 * t3645 * t423 - 0.18e2 * t128 * t1732 + 0.12e2 * t128 * t1735 + 0.6e1 * t128 * t1738 - 0.6e1 * t150 * t1660 + 0.6e1 * t150 * t1663 + 0.6e1 * t419 * t467 + 0.6e1 * t463 * t424;
3116   if(v4rho4 != NULL && (p->info->flags & XC_FLAGS_NEEDS_LAPLACIAN) && (p->info->flags & XC_FLAGS_HAVE_LXC))
3117     v4sigma3lapl[0] = -0.3e1 / 0.8e1 * t69 * t70 * (t16 * t7014 * t61 - t42 * t92 * (t7061 + t7107) - 0.3e1 * t128 * t1786 - t1651 * t160 - 0.3e1 * t419 * t489 - t150 * t1703 - 0.3e1 * t463 * t447 - 0.3e1 * t1720 * t138 + 0.2e1 * t42 * t339 * t1702 + 0.6e1 * t42 * t1204 * t446 + t7154);
3118 
3119   t7239 = -0.13278652291933993376e0 * t2600 * t383 * t1666 + 0.24923243437094339947e1 * t2610 * t7094 * t168 - 0.22865171141851851357e2 * t256 * t1344 * t427 - 0.15243447427901234237e2 * t731 * t1680 * t168 - 0.34297756712777777034e2 * t4916 * t518 + 0.31465570642866950052e3 * t1352 * t7019 - 0.22865171141851851357e2 * t256 * t1344 * t1781 + 0.31465570642866950052e3 * t752 * t3859 * t1774 - 0.24056046973484009303e4 * t2502 * t3079 * t7022 - 0.22865171141851851357e2 * t256 * t397 * t4699 - 0.76217237139506171188e1 * t256 * t397 * t7051 - 0.34297756712777777035e2 * t731 * t442 * t2086 + 0.20977047095244633367e3 * t2524 * t1694 * t3096 - 0.22865171141851851357e2 * t256 * t5109 * t484;
3120   t7280 = 0.10372043043679588041e-4 * t7005 - 0.25113094921099209164e-4 * t7007 + 0.54841825331504343850e-3 * t7010 + 0.28150260283386072598e-5 * t7012;
3121   t7288 = -0.37384865155641509919e1 * t830 * t473 * t5098 + 0.11432585570925925678e2 * t2537 * t1680 * t1029 + 0.15934382750320792050e0 * t826 * t383 * t4699 + 0.31465570642866950052e3 * t752 * t1047 * t7047 + 0.49846486874188679892e1 * t300 * t473 * t1795 - 0.35409739445157315668e-1 * t295 * t383 * t1650 + 0.16615495624729559964e1 * t300 * t7075 * t168 + 0.49846486874188679892e1 * t300 * t1754 * t497 - 0.37384865155641509919e1 * t830 * t1744 * t497 - 0.10622921833547194700e0 * t295 * t5178 * t127 - 0.10622921833547194700e0 * t295 * t1330 * t418 + 0.15934382750320792050e0 * t826 * t1330 * t427 + 0.70819478890314631335e-1 * t44 * t94 * t7280 + 0.16615495624729559964e1 * t99 * t51 * t7280 * t111;
3122   t7297 = -0.18e2 * t42 * t3717 * t423 + 0.6e1 * t128 * t1814 + 0.12e2 * t128 * t1811 + 0.6e1 * t419 * t502 + 0.6e1 * t169 * t1663 - 0.6e1 * t169 * t1660 + 0.6e1 * t498 * t424 - t42 * t92 * (t7239 + t7288) + t16 * t7280 * t61 - 0.3e1 * t419 * t522 - t1651 * t179;
3123   if(v4rho4 != NULL && (p->info->flags & XC_FLAGS_HAVE_LXC))
3124     v4sigma3tau[0] = -0.3e1 / 0.8e1 * t69 * t70 * (-0.18e2 * t1192 * t1294 * t446 + 0.6e1 * t42 * t1305 * t446 + 0.6e1 * t42 * t5032 * t137 + 0.24e2 * t42 * t3142 * t1659 + 0.2e1 * t42 * t379 * t1702 - 0.18e2 * t128 * t1808 - 0.3e1 * t128 * t1858 - 0.3e1 * t1796 * t138 - t169 * t1703 - 0.3e1 * t498 * t447 + t7297);
3125 
3126   t7347 = t462 * t462;
3127   t7352 = t1256 * t4829;
3128   t7357 = -0.76217237139506171188e1 * t256 * t561 * t418 - 0.12461621718547169973e1 * t830 * t1744 * t537 + 0.16615495624729559964e1 * t300 * t1754 * t537 + 0.33230991249459119928e1 * t300 * t473 * t1873 + 0.33230991249459119928e1 * t300 * t585 * t1719 - 0.70819478890314631336e-1 * t295 * t5292 * t127 - 0.35409739445157315668e-1 * t295 * t1422 * t418 - 0.70819478890314631336e-1 * t295 * t343 * t1719 - 0.15243447427901234237e2 * t731 * t561 * t427 + 0.53114609167735973502e-1 * t826 * t1422 * t427 - 0.13278652291933993376e0 * t2600 * t1406 * t427 + 0.53114609167735973502e-1 * t826 * t1406 * t418 + 0.24923243437094339947e1 * t2610 * t1744 * t546 - 0.12461621718547169973e1 * t830 * t1754 * t546 - 0.76217237139506171188e1 * t256 * t1436 * t427 - 0.15243447427901234238e2 * t256 * t7347 * t258 * t52 + 0.41954094190489266736e3 * t1255 * t7352 - 0.45730342283703702713e2 * t1513 * t1771;
3129   t7367 = t52 * t1719;
3130   t7389 = t106 * t418;
3131   t7393 = t2507 * t427;
3132   t7404 = 0.1e1 / t17 / t1640;
3133   t7406 = t7404 * t29 * t32;
3134   t7407 = t2411 * t7406;
3135   t7409 = t2417 * t7406;
3136   t7411 = t206 * t7404;
3137   t7412 = t7411 * t2425;
3138   t7414 = t7411 * t2424;
3139   t7416 = -0.51860215218397940203e-5 * t7407 + 0.12556547460549604582e-4 * t7409 - 0.27420912665752171925e-3 * t7412 - 0.14075130141693036299e-5 * t7414;
3140   t7431 = -0.76217237139506171188e1 * t256 * t1436 * t1781 + 0.10488523547622316684e3 * t752 * t4014 * t1774 - 0.30486894855802468476e2 * t256 * t357 * t4829 - 0.15243447427901234238e2 * t256 * t357 * t7367 - 0.11432585570925925678e2 * t731 * t561 * t1781 + 0.20977047095244633367e3 * t2524 * t1444 * t1774 + 0.21245843667094389400e0 * t826 * t343 * t4829 - 0.49846486874188679892e1 * t830 * t473 * t5320 + 0.11432585570925925678e2 * t2537 * t442 * t4038 + 0.31465570642866950052e3 * t752 * t1444 * t3376 + 0.10488523547622316684e3 * t752 * t1444 * t7389 - 0.24056046973484009303e4 * t2502 * t4003 * t7393 - 0.11432585570925925678e2 * t731 * t442 * t2236 - 0.15243447427901234238e2 * t256 * t5358 * t484 + 0.16615495624729559964e1 * t99 * t51 * t7416 * t111 + 0.70819478890314631335e-1 * t44 * t94 * t7416 - 0.70819478890314631336e-1 * t44 * t235 * t7347 + 0.33230991249459119928e1 * t240 * t51 * t7347 * t111;
3141   t7435 = t488 * t488;
3142   t7461 = -t42 * t92 * (t7357 + t7431) + 0.4e1 * t42 * t228 * t7435 - 0.24e2 * t1192 * t1193 * t488 - 0.2e1 * t128 * t1938 - 0.2e1 * t1874 * t138 + 0.2e1 * t419 * t543 + 0.2e1 * t538 * t424 - 0.4e1 * t463 * t489 - 0.2e1 * t1720 * t160 - t419 * t566 - 0.2e1 * t150 * t1786 + 0.8e1 * t463 * t467 + 0.4e1 * t150 * t1738;
3143   t7493 = 0.4e1 * t42 * t5474 * t137 - 0.6e1 * t42 * t1394 * t446 + 0.2e1 * t42 * t1402 * t446 + t16 * t7416 * t61 + 0.4e1 * t42 * t339 * t1785 + 0.24e2 * t42 * t3934 * t423 - 0.6e1 * t42 * t3938 * t423 - 0.12e2 * t128 * t1885 + 0.8e1 * t128 * t1888 + 0.4e1 * t128 * t1892 - 0.12e2 * t150 * t1732 + 0.8e1 * t150 * t1735 - t538 * t447;
3144   if(v4rho4 != NULL && (p->info->flags & XC_FLAGS_NEEDS_LAPLACIAN) && (p->info->flags & XC_FLAGS_HAVE_LXC))
3145     v4sigma2lapl2[0] = -0.3e1 / 0.8e1 * t69 * t70 * (t7461 + t7493);
3146 
3147   t7520 = 0.20744086087359176081e-4 * t7407 - 0.50226189842198418325e-4 * t7409 + 0.10968365066300868769e-2 * t7412 + 0.56300520566772145196e-5 * t7414;
3148   t7544 = -0.12e2 * t1192 * t5531 * t137 - 0.12e2 * t4987 * t1961 - 0.12e2 * t1192 * t5538 * t137 - t150 * t1858 - t1720 * t179 - 0.2e1 * t463 * t522 - 0.6e1 * t1192 * t1479 * t446 + 0.24e2 * t3670 * t1479 * t423 + t16 * t7520 * t61 - 0.6e1 * t150 * t1808 + 0.4e1 * t128 * t1967 + 0.4e1 * t169 * t1735 + 0.2e1 * t42 * t5032 * t159 + 0.2e1 * t169 * t1738 - 0.6e1 * t169 * t1732 + 0.2e1 * t42 * t379 * t1785 + 0.4e1 * t42 * t1305 * t488 + 0.4e1 * t128 * t1971;
3149   t7605 = -0.12461621718547169973e1 * t830 * t1744 * t574 + 0.16615495624729559964e1 * t300 * t1754 * t574 + 0.33230991249459119928e1 * t300 * t473 * t1947 + 0.16615495624729559964e1 * t300 * t585 * t1795 - 0.70819478890314631336e-1 * t295 * t5631 * t127 - 0.35409739445157315668e-1 * t295 * t1519 * t418 + 0.16615495624729559964e1 * t300 * t1719 * t111 * t168 + 0.33230991249459119928e1 * t300 * t1986 * t497 - 0.35409739445157315668e-1 * t295 * t5178 * t149 - 0.70819478890314631336e-1 * t295 * t1330 * t462 - 0.35409739445157315668e-1 * t295 * t383 * t1719;
3150   t7639 = -0.76217237139506171188e1 * t256 * t1533 * t427 + 0.53114609167735973502e-1 * t826 * t1519 * t427 - 0.13278652291933993376e0 * t2600 * t383 * t4819 - 0.15243447427901234238e2 * t256 * t5694 * t484 - 0.76217237139506171188e1 * t256 * t1533 * t1781 - 0.12461621718547169973e1 * t830 * t1754 * t1498 - 0.24923243437094339946e1 * t830 * t473 * t5754 - 0.24923243437094339946e1 * t830 * t473 * t5718 - 0.76217237139506171188e1 * t256 * t397 * t7367 + 0.10488523547622316684e3 * t752 * t4270 * t1774 - 0.76217237139506171188e1 * t256 * t5109 * t596;
3151   t7672 = -0.15243447427901234238e2 * t256 * t1344 * t1212 - 0.15243447427901234238e2 * t256 * t1344 * t1926 - 0.76217237139506171188e1 * t256 * t397 * t4797 - 0.15243447427901234238e2 * t256 * t397 * t4829 + 0.10622921833547194700e0 * t826 * t1330 * t1212 + 0.10622921833547194700e0 * t826 * t383 * t4829 + 0.53114609167735973502e-1 * t826 * t383 * t4797 + 0.24923243437094339947e1 * t2610 * t1744 * t1498 - 0.15243447427901234237e2 * t731 * t357 * t5120 + 0.20977047095244633368e3 * t5205 * t2014 + 0.20977047095244633368e3 * t1352 * t7352;
3152   t7702 = 0.10488523547622316684e3 * t1352 * t1256 * t4797 - 0.24056046973484009303e4 * t3884 * t3584 * t4819 + 0.11432585570925925678e2 * t4932 * t597 - 0.22865171141851851356e2 * t5785 * t518 - 0.22865171141851851356e2 * t1513 * t1845 - 0.11432585570925925678e2 * t1513 * t1854 + 0.20977047095244633367e3 * t4367 * t1848 + 0.31465570642866950052e3 * t1352 * t3554 * t4819 - 0.11432585570925925678e2 * t731 * t442 * t2303 + 0.16615495624729559964e1 * t99 * t51 * t7520 * t111 + 0.70819478890314631335e-1 * t44 * t94 * t7520;
3153   t7714 = 0.4e1 * t42 * t5566 * t137 - 0.2e1 * t128 * t2024 + 0.4e1 * t463 * t502 + 0.2e1 * t150 * t1814 + 0.4e1 * t150 * t1811 + 0.4e1 * t128 * t1964 + 0.2e1 * t419 * t579 + 0.2e1 * t42 * t1490 * t446 + 0.4e1 * t498 * t467 - 0.6e1 * t42 * t4145 * t423 - t419 * t601 + 0.2e1 * t575 * t424 - t42 * t92 * (t7605 + t7639 + t7672 + t7702) - 0.2e1 * t1948 * t138 - t575 * t447 - t169 * t1786 - t1796 * t160 - 0.2e1 * t498 * t489;
3154   if(v4rho4 != NULL && (p->info->flags & XC_FLAGS_NEEDS_LAPLACIAN) && (p->info->flags & XC_FLAGS_HAVE_LXC))
3155     v4sigma2lapltau[0] = -0.3e1 / 0.8e1 * t69 * t70 * (t7544 + t7714);
3156 
3157   t7719 = t521 * t521;
3158   t7782 = -0.15243447427901234237e2 * t731 * t633 * t427 + 0.53114609167735973502e-1 * t826 * t1604 * t427 - 0.13278652291933993376e0 * t2600 * t1587 * t427 + 0.41954094190489266736e3 * t1352 * t1256 * t5130 - 0.45730342283703702713e2 * t4579 * t1845 - 0.11432585570925925678e2 * t731 * t633 * t1781 + 0.20977047095244633367e3 * t2524 * t1626 * t1774 - 0.11432585570925925678e2 * t731 * t442 * t4549 - 0.49846486874188679892e1 * t830 * t473 * t5859 + 0.11432585570925925678e2 * t2537 * t442 * t4557 + 0.21245843667094389400e0 * t826 * t383 * t5130 - 0.15243447427901234238e2 * t256 * t5896 * t484 - 0.76217237139506171188e1 * t256 * t1618 * t1781 + 0.10488523547622316684e3 * t752 * t4524 * t1774 - 0.30486894855802468476e2 * t256 * t397 * t5130 - 0.15243447427901234238e2 * t256 * t397 * t52 * t1795 + 0.10488523547622316684e3 * t752 * t1626 * t7389 - 0.24056046973484009303e4 * t2502 * t4539 * t7393;
3159   t7786 = t497 * t497;
3160   t7798 = -0.82976344349436704322e-4 * t7407 + 0.20090475936879367330e-3 * t7409 - 0.43873460265203475079e-2 * t7412 - 0.22520208226708858078e-4 * t7414;
3161   t7846 = 0.31465570642866950052e3 * t752 * t1626 * t3376 + 0.33230991249459119928e1 * t240 * t51 * t7786 * t111 - 0.70819478890314631336e-1 * t44 * t235 * t7786 + 0.16615495624729559964e1 * t99 * t51 * t7798 * t111 + 0.70819478890314631335e-1 * t44 * t94 * t7798 - 0.12461621718547169973e1 * t830 * t1744 * t609 + 0.16615495624729559964e1 * t300 * t1754 * t609 + 0.33230991249459119928e1 * t300 * t473 * t2033 + 0.33230991249459119928e1 * t300 * t1597 * t1795 - 0.70819478890314631336e-1 * t295 * t5942 * t127 - 0.12461621718547169973e1 * t830 * t1754 * t618 - 0.70819478890314631336e-1 * t295 * t383 * t1795 + 0.53114609167735973502e-1 * t826 * t1587 * t418 + 0.24923243437094339947e1 * t2610 * t1744 * t618 - 0.76217237139506171188e1 * t256 * t1618 * t427 - 0.15243447427901234238e2 * t256 * t7786 * t258 * t52 - 0.76217237139506171188e1 * t256 * t633 * t418 - 0.35409739445157315668e-1 * t295 * t1604 * t418;
3162   t7866 = 0.4e1 * t42 * t228 * t7719 - 0.24e2 * t1192 * t1294 * t521 - 0.2e1 * t128 * t2097 - t42 * t92 * (t7782 + t7846) - t419 * t638 - t610 * t447 - 0.2e1 * t2034 * t138 - 0.4e1 * t498 * t522 - 0.2e1 * t169 * t1858 - 0.2e1 * t1796 * t179 + 0.2e1 * t419 * t615 + 0.2e1 * t610 * t424 + t16 * t7798 * t61;
3163   t7899 = 0.4e1 * t42 * t6052 * t137 - 0.6e1 * t42 * t1575 * t446 + 0.2e1 * t42 * t1583 * t446 + 0.4e1 * t42 * t379 * t1857 - 0.6e1 * t42 * t4451 * t423 + 0.24e2 * t42 * t4455 * t423 - 0.12e2 * t128 * t2045 + 0.8e1 * t128 * t2048 + 0.4e1 * t128 * t2052 - 0.12e2 * t169 * t1808 + 0.8e1 * t169 * t1811 + 0.4e1 * t169 * t1814 + 0.8e1 * t498 * t502;
3164   if(v4rho4 != NULL && (p->info->flags & XC_FLAGS_HAVE_LXC))
3165     v4sigma2tau2[0] = -0.3e1 / 0.8e1 * t69 * t70 * (t7866 + t7899);
3166 
3167   t7905 = 0.1e1 / t17 / t1709;
3168   t7907 = t7905 * t29 * t32;
3169   t7908 = t2411 * t7907;
3170   t7910 = t2417 * t7907;
3171   t7912 = t206 * t7905;
3172   t7913 = t7912 * t2425;
3173   t7915 = t7912 * t2424;
3174   t7917 = -0.10372043043679588040e-4 * t7908 + 0.25113094921099209163e-4 * t7910 - 0.54841825331504343849e-3 * t7913 - 0.28150260283386072598e-5 * t7915;
3175   t7979 = t106 * t462;
3176   t7986 = t2507 * t127;
3177   t8005 = 0.31465570642866950052e3 * t5402 * t2014 - 0.34297756712777777034e2 * t1513 * t1923 - 0.76217237139506171188e1 * t256 * t6188 * t484 - 0.22865171141851851357e2 * t256 * t5358 * t596 - 0.22865171141851851357e2 * t256 * t1436 * t1212 - 0.22865171141851851357e2 * t256 * t1436 * t1926 + 0.31465570642866950052e3 * t752 * t1444 * t7979 + 0.31465570642866950052e3 * t752 * t2156 * t484 - 0.24056046973484009303e4 * t2502 * t6208 * t7986 + 0.11432585570925925678e2 * t2537 * t2142 * t484 + 0.15934382750320792050e0 * t826 * t343 * t5333 - 0.37384865155641509919e1 * t830 * t473 * t6219 - 0.34297756712777777034e2 * t731 * t561 * t1926 + 0.20977047095244633367e3 * t2524 * t2156 * t1930;
3178   t8049 = 0.70819478890314631335e-1 * t44 * t94 * t7917 + 0.16615495624729559964e1 * t99 * t51 * t7917 * t111 - 0.13278652291933993376e0 * t2600 * t6168 * t127 + 0.15934382750320792051e0 * t826 * t1406 * t462 + 0.24923243437094339947e1 * t2610 * t473 * t2128 - 0.37384865155641509919e1 * t830 * t2199 * t462 - 0.10622921833547194700e0 * t295 * t1233 * t537 - 0.22865171141851851356e2 * t256 * t561 * t462 - 0.35409739445157315668e-1 * t295 * t6149 * t127 + 0.16615495624729559964e1 * t300 * t473 * t2112 - 0.10622921833547194700e0 * t295 * t343 * t1873 + 0.49846486874188679892e1 * t300 * t1986 * t537 + 0.49846486874188679892e1 * t300 * t585 * t1873 - 0.15243447427901234237e2 * t731 * t2142 * t127;
3179   t8053 = -0.3e1 * t150 * t1938 - 0.6e1 * t128 * t2122 + 0.24e2 * t42 * t6118 * t137 - 0.18e2 * t42 * t1394 * t488 + 0.6e1 * t128 * t2125 - 0.18e2 * t1192 * t6127 * t137 + 0.6e1 * t42 * t1204 * t565 + 0.6e1 * t42 * t339 * t1937 - t128 * t2165 + 0.2e1 * t42 * t6138 * t137 - t42 * t92 * (t8005 + t8049);
3180   if(v4rho4 != NULL && (p->info->flags & XC_FLAGS_NEEDS_LAPLACIAN) && (p->info->flags & XC_FLAGS_HAVE_LXC))
3181     v4sigmalapl3[0] = -0.3e1 / 0.8e1 * t69 * t70 * (t16 * t7917 * t61 - t2113 * t138 - 0.18e2 * t150 * t1885 + 0.12e2 * t150 * t1888 + 0.6e1 * t150 * t1892 - 0.3e1 * t1874 * t160 + 0.6e1 * t463 * t543 - 0.3e1 * t463 * t566 + 0.6e1 * t538 * t467 - 0.3e1 * t538 * t489 + t8053);
3182 
3183   t8077 = t1047 * t1930;
3184   t8089 = 0.31465570642866950052e3 * t1352 * t3554 * t5345 + 0.20977047095244633368e3 * t1352 * t1256 * t5320 - 0.24056046973484009303e4 * t3884 * t3584 * t5345 + 0.10488523547622316684e3 * t1352 * t1256 * t5333 - 0.11432585570925925678e2 * t6315 * t518 - 0.22865171141851851356e2 * t1513 * t2020 + 0.20977047095244633367e3 * t5396 * t8077 - 0.22865171141851851357e2 * t1513 * t2008 + 0.20977047095244633368e3 * t5769 * t2014 + 0.11432585570925925678e2 * t6311 * t518 - 0.15243447427901234238e2 * t256 * t397 * t5320;
3185   t8124 = -0.76217237139506171188e1 * t256 * t1344 * t2236 - 0.76217237139506171188e1 * t256 * t397 * t5333 - 0.76217237139506171188e1 * t256 * t397 * t52 * t1873 - 0.12461621718547169973e1 * t830 * t473 * t6422 - 0.11432585570925925678e2 * t731 * t561 * t2086 - 0.15243447427901234237e2 * t731 * t561 * t1312 - 0.76217237139506171188e1 * t256 * t6392 * t484 - 0.15243447427901234238e2 * t256 * t5694 * t596 - 0.13278652291933993376e0 * t2600 * t383 * t5345 + 0.10622921833547194700e0 * t826 * t383 * t5320 + 0.24923243437094339947e1 * t2610 * t473 * t6438;
3186   t8151 = 0.41488172174718352159e-4 * t7908 - 0.10045237968439683665e-3 * t7910 + 0.21936730132601737540e-2 * t7913 + 0.11260104113354429039e-4 * t7915;
3187   t8165 = -0.24923243437094339946e1 * t830 * t585 * t5718 + 0.10622921833547194700e0 * t826 * t1519 * t1212 - 0.24923243437094339946e1 * t830 * t473 * t6415 + 0.53114609167735973502e-1 * t826 * t383 * t5333 - 0.15243447427901234238e2 * t256 * t1533 * t1212 - 0.15243447427901234238e2 * t256 * t1533 * t1926 + 0.10488523547622316684e3 * t752 * t3859 * t2229 + 0.16615495624729559964e1 * t99 * t51 * t8151 * t111 + 0.70819478890314631335e-1 * t44 * t94 * t8151 + 0.33230991249459119928e1 * t300 * t585 * t1947 - 0.35409739445157315668e-1 * t295 * t6357 * t127;
3188   t8200 = 0.16615495624729559964e1 * t300 * t473 * t2174 - 0.35409739445157315668e-1 * t295 * t1330 * t537 - 0.35409739445157315668e-1 * t295 * t383 * t1873 + 0.16615495624729559964e1 * t300 * t1873 * t111 * t168 + 0.16615495624729559964e1 * t300 * t2209 * t497 - 0.12461621718547169973e1 * t830 * t2199 * t497 - 0.70819478890314631336e-1 * t295 * t5631 * t149 - 0.70819478890314631336e-1 * t295 * t1519 * t462 + 0.53114609167735973502e-1 * t826 * t1330 * t546 - 0.76217237139506171188e1 * t256 * t1344 * t546 + 0.33230991249459119928e1 * t300 * t1986 * t574;
3189   t8232 = -0.2e1 * t1948 * t160 - t2175 * t138 - t42 * t92 * (t8089 + t8124 + t8165 + t8200) - t538 * t522 - 0.2e1 * t150 * t2024 - 0.2e1 * t575 * t489 + 0.2e1 * t498 * t543 - t498 * t566 - t169 * t1938 - t128 * t2241 - 0.2e1 * t463 * t601 + 0.2e1 * t169 * t1892 + 0.4e1 * t463 * t579 + 0.4e1 * t150 * t1964 + 0.2e1 * t538 * t502 + 0.4e1 * t150 * t1971 + 0.4e1 * t150 * t1967 + 0.4e1 * t42 * t5566 * t159;
3190   t8277 = -0.6e1 * t128 * t2187 - 0.6e1 * t42 * t3717 * t542 + 0.4e1 * t42 * t1490 * t488 + 0.4e1 * t128 * t2190 + 0.4e1 * t169 * t1888 - 0.6e1 * t169 * t1885 + 0.4e1 * t575 * t467 + 0.2e1 * t128 * t2193 + 0.2e1 * t42 * t1305 * t565 + 0.2e1 * t42 * t379 * t1937 + 0.2e1 * t42 * t6277 * t137 - t1874 * t179 - 0.12e2 * t1192 * t1479 * t488 + 0.24e2 * t3670 * t6458 * t137 - 0.12e2 * t1192 * t6454 * t137 - 0.6e1 * t1192 * t6450 * t137 - 0.12e2 * t5483 * t1961 + t16 * t8151 * t61;
3191   if(v4rho4 != NULL && (p->info->flags & XC_FLAGS_NEEDS_LAPLACIAN) && (p->info->flags & XC_FLAGS_HAVE_LXC))
3192     v4sigmalapl2tau[0] = -0.3e1 / 0.8e1 * t69 * t70 * (t8232 + t8277);
3193 
3194   t8324 = 0.4e1 * t42 * t1305 * t600 + 0.2e1 * t42 * t6496 * t137 - 0.6e1 * t42 * t1575 * t488 + 0.2e1 * t42 * t1583 * t488 + 0.2e1 * t42 * t6052 * t159 + 0.4e1 * t42 * t379 * t2023 - 0.6e1 * t128 * t2262 + 0.4e1 * t128 * t2265 + 0.2e1 * t128 * t2269 - 0.6e1 * t150 * t2045 + 0.4e1 * t150 * t2048 + 0.2e1 * t150 * t2052 + 0.4e1 * t169 * t1964 + 0.4e1 * t169 * t1967 + 0.4e1 * t169 * t1971 + 0.2e1 * t610 * t467 + 0.4e1 * t498 * t579 + 0.4e1 * t575 * t502;
3195   t8346 = -0.16595268869887340864e-3 * t7908 + 0.40180951873758734661e-3 * t7910 - 0.87746920530406950160e-2 * t7913 - 0.45040416453417716156e-4 * t7915;
3196   t8388 = 0.20977047095244633368e3 * t1352 * t1256 * t5725 + 0.20977047095244633368e3 * t1352 * t1256 * t5754 + 0.31465570642866950052e3 * t5960 * t3554 * t1212 - 0.24056046973484009303e4 * t5964 * t3584 * t1212 + 0.11432585570925925678e2 * t6564 * t2067 - 0.22865171141851851357e2 * t4579 * t2008 - 0.22865171141851851356e2 * t4579 * t2011 + 0.20977047095244633367e3 * t5973 * t2014 - 0.11432585570925925678e2 * t1513 * t2083 + 0.10488523547622316684e3 * t5979 * t2014 + 0.24923243437094339947e1 * t2610 * t473 * t6662;
3197   t8423 = -0.24923243437094339946e1 * t830 * t585 * t5859 + 0.10622921833547194700e0 * t826 * t383 * t5725 - 0.24923243437094339946e1 * t830 * t473 * t6672 - 0.76217237139506171188e1 * t256 * t1618 * t1212 - 0.76217237139506171188e1 * t256 * t1618 * t1926 - 0.15243447427901234238e2 * t256 * t1344 * t2303 - 0.15243447427901234238e2 * t256 * t397 * t5725 - 0.15243447427901234238e2 * t256 * t397 * t52 * t1947 + 0.10488523547622316684e3 * t752 * t1626 * t7979 - 0.15243447427901234238e2 * t256 * t397 * t5754 - 0.15243447427901234237e2 * t731 * t633 * t1212;
3198   t8459 = -0.11432585570925925678e2 * t731 * t633 * t1926 + 0.53114609167735973502e-1 * t826 * t1604 * t1212 - 0.12461621718547169973e1 * t830 * t473 * t6651 - 0.76217237139506171188e1 * t256 * t6676 * t484 - 0.76217237139506171188e1 * t256 * t5896 * t596 - 0.13278652291933993376e0 * t2600 * t1587 * t1212 + 0.10622921833547194700e0 * t826 * t383 * t5754 + 0.70819478890314631335e-1 * t44 * t94 * t8346 + 0.16615495624729559964e1 * t99 * t51 * t8346 * t111 - 0.76217237139506171188e1 * t256 * t633 * t462 + 0.16615495624729559964e1 * t300 * t585 * t2033;
3199   t8481 = t497 * t111;
3200   t8494 = -0.35409739445157315668e-1 * t295 * t6611 * t127 + 0.16615495624729559964e1 * t300 * t473 * t2250 - 0.35409739445157315668e-1 * t295 * t5942 * t149 - 0.35409739445157315668e-1 * t295 * t1604 * t462 + 0.16615495624729559964e1 * t300 * t1986 * t609 - 0.70819478890314631336e-1 * t295 * t1330 * t574 - 0.70819478890314631336e-1 * t295 * t383 * t1947 + 0.33230991249459119928e1 * t300 * t8481 * t574 + 0.33230991249459119928e1 * t300 * t1597 * t1947 + 0.53114609167735973502e-1 * t826 * t1587 * t462 - 0.12461621718547169973e1 * t830 * t1986 * t618;
3201   t8500 = 0.24e2 * t3670 * t6511 * t137 - 0.12e2 * t1192 * t1479 * t521 - 0.12e2 * t5516 * t1961 - 0.12e2 * t1192 * t6507 * t137 - 0.6e1 * t1192 * t6525 * t137 - t2251 * t138 - t610 * t489 - t2034 * t160 + t16 * t8346 * t61 - 0.2e1 * t575 * t522 - 0.2e1 * t1948 * t179 - 0.2e1 * t169 * t2024 - 0.2e1 * t498 * t601 + 0.2e1 * t463 * t615 - t150 * t2097 - t463 * t638 - t42 * t92 * (t8388 + t8423 + t8459 + t8494) - t128 * t2315;
3202   if(v4rho4 != NULL && (p->info->flags & XC_FLAGS_NEEDS_LAPLACIAN) && (p->info->flags & XC_FLAGS_HAVE_LXC))
3203     v4sigmalapltau2[0] = -0.3e1 / 0.8e1 * t69 * t70 * (t8324 + t8500);
3204 
3205   t8509 = 0.66381075479549363457e-3 * t7908 - 0.16072380749503493864e-2 * t7910 + 0.35098768212162780063e-1 * t7913 + 0.18016166581367086462e-3 * t7915;
3206   t8599 = 0.11432585570925925678e2 * t2537 * t2354 * t484 + 0.15934382750320792050e0 * t826 * t383 * t5872 - 0.37384865155641509919e1 * t830 * t473 * t6818 - 0.34297756712777777034e2 * t731 * t633 * t2086 + 0.20977047095244633367e3 * t2524 * t2368 * t1930 - 0.76217237139506171188e1 * t256 * t6787 * t484 - 0.22865171141851851357e2 * t256 * t5896 * t1029 - 0.22865171141851851357e2 * t256 * t1618 * t1312 - 0.22865171141851851357e2 * t256 * t1618 * t2086 + 0.31465570642866950052e3 * t752 * t1626 * t106 * t497 + 0.31465570642866950052e3 * t752 * t2368 * t484 - 0.24056046973484009303e4 * t2502 * t6807 * t7986 + 0.70819478890314631335e-1 * t44 * t94 * t8509 + 0.16615495624729559964e1 * t99 * t51 * t8509 * t111;
3207   t8640 = -0.22865171141851851356e2 * t256 * t633 * t497 + 0.49846486874188679892e1 * t300 * t1597 * t2033 - 0.15243447427901234237e2 * t731 * t2354 * t127 - 0.35409739445157315668e-1 * t295 * t6836 * t127 + 0.16615495624729559964e1 * t300 * t473 * t2324 + 0.24923243437094339947e1 * t2610 * t473 * t2340 - 0.37384865155641509919e1 * t830 * t6829 * t497 - 0.10622921833547194700e0 * t295 * t1330 * t609 - 0.10622921833547194700e0 * t295 * t383 * t2033 + 0.49846486874188679892e1 * t300 * t8481 * t609 - 0.13278652291933993376e0 * t2600 * t6855 * t127 + 0.15934382750320792051e0 * t826 * t1587 * t497 - 0.34297756712777777034e2 * t4579 * t2083 + 0.31465570642866950052e3 * t5979 * t8077;
3208   t8644 = -0.3e1 * t169 * t2097 - 0.6e1 * t128 * t2334 + 0.24e2 * t42 * t6756 * t137 - 0.18e2 * t42 * t1575 * t521 + 0.6e1 * t128 * t2337 - 0.18e2 * t1192 * t6765 * t137 + 0.6e1 * t42 * t1305 * t637 + 0.6e1 * t42 * t379 * t2096 - t128 * t2377 + 0.2e1 * t42 * t6776 * t137 - t42 * t92 * (t8599 + t8640);
3209   if(v4rho4 != NULL && (p->info->flags & XC_FLAGS_HAVE_LXC))
3210     v4sigmatau3[0] = -0.3e1 / 0.8e1 * t69 * t70 * (t16 * t8509 * t61 - t2325 * t138 - 0.18e2 * t169 * t2045 + 0.12e2 * t169 * t2048 + 0.6e1 * t169 * t2052 - 0.3e1 * t2034 * t179 + 0.6e1 * t498 * t615 - 0.3e1 * t498 * t638 + 0.6e1 * t610 * t502 - 0.3e1 * t610 * t522 + t8644);
3211 
3212   t8650 = t2398 * t29 * t32;
3213   t8651 = t2411 * t8650;
3214   t8653 = t2417 * t8650;
3215   t8655 = t206 * t2398;
3216   t8656 = t8655 * t2425;
3217   t8658 = t8655 * t2424;
3218   t8660 = -0.20744086087359176080e-4 * t8651 + 0.50226189842198418324e-4 * t8653 - 0.10968365066300868770e-2 * t8656 - 0.56300520566772145196e-5 * t8658;
3219   t8675 = t542 * t542;
3220   t8682 = t565 * t565;
3221   t8689 = t546 * t546;
3222   t8698 = t8689 * t755;
3223   t8709 = t537 * t537;
3224   t8759 = -0.24056046973484009303e4 * t2502 * t8689 * t2505 * t2507 - 0.15243447427901234237e2 * t730 * t255 * t8689 * t258 + 0.20977047095244633367e3 * t2524 * t8698 * t106 + 0.70819478890314631335e-1 * t44 * t94 * t8660 + 0.16615495624729559964e1 * t99 * t51 * t8660 * t111 - 0.10622921833547194700e0 * t44 * t235 * t8709 - 0.14163895778062926267e0 * t295 * t343 * t2112 + 0.49846486874188679892e1 * t240 * t51 * t8709 * t111 + 0.66461982498918239856e1 * t300 * t585 * t2112 - 0.13278652291933993376e0 * t44 * t2551 * t8689 + 0.31868765500641584101e0 * t826 * t1406 * t537 - 0.74769730311283019838e1 * t830 * t2199 * t537 + 0.11432585570925925678e2 * t2537 * t8689 * t258 * t52 - 0.45730342283703702713e2 * t256 * t1436 * t546 - 0.22865171141851851357e2 * t256 * t8709 * t258 * t52 + 0.62931141285733900104e3 * t752 * t4014 * t2229 + 0.31465570642866950052e3 * t752 * t8698 * t52 - 0.68595513425555554068e2 * t731 * t561 * t2236 - 0.30486894855802468476e2 * t256 * t6188 * t596 + 0.24923243437094339947e1 * t2491 * t51 * t8689 * t111;
3225   t8762 = -0.36e2 * t42 * t1394 * t565 + t16 * t8660 * t61 + 0.8e1 * t42 * t339 * t2164 + 0.6e1 * t42 * t228 * t8682 + 0.24e2 * t42 * t2468 * t8675 - t42 * t92 * t8759 - 0.24e2 * t150 * t2122 + 0.24e2 * t150 * t2125 - 0.4e1 * t150 * t2165 - 0.4e1 * t2113 * t160 + 0.12e2 * t538 * t543 - 0.6e1 * t538 * t566;
3226   if(v4rho4 != NULL && (p->info->flags & XC_FLAGS_NEEDS_LAPLACIAN) && (p->info->flags & XC_FLAGS_HAVE_LXC))
3227     v4lapl4[0] = -0.3e1 / 0.8e1 * t69 * t70 * t8762;
3228 
3229   t8838 = 0.82976344349436704319e-4 * t8651 - 0.20090475936879367329e-3 * t8653 + 0.43873460265203475079e-2 * t8656 + 0.22520208226708858078e-4 * t8658;
3230   t8846 = 0.31465570642866950052e3 * t752 * t1047 * t52 * t2128 - 0.22865171141851851357e2 * t256 * t1533 * t2236 + 0.31465570642866950052e3 * t752 * t4270 * t2229 - 0.24056046973484009303e4 * t2502 * t3079 * t2507 * t2128 - 0.22865171141851851357e2 * t256 * t397 * t6219 - 0.76217237139506171188e1 * t256 * t397 * t52 * t2112 - 0.34297756712777777035e2 * t731 * t561 * t2303 + 0.20977047095244633367e3 * t2524 * t2156 * t3096 - 0.22865171141851851357e2 * t256 * t6392 * t596 + 0.15934382750320792050e0 * t826 * t383 * t6219 - 0.37384865155641509919e1 * t830 * t585 * t6422 + 0.11432585570925925678e2 * t2537 * t2142 * t1029 + 0.70819478890314631335e-1 * t44 * t94 * t8838 + 0.16615495624729559964e1 * t99 * t51 * t8838 * t111;
3231   t8890 = 0.16615495624729559964e1 * t300 * t2112 * t111 * t168 + 0.49846486874188679892e1 * t300 * t2209 * t574 - 0.10622921833547194700e0 * t295 * t6357 * t149 - 0.10622921833547194700e0 * t295 * t1519 * t537 - 0.35409739445157315668e-1 * t295 * t383 * t2112 + 0.15934382750320792050e0 * t826 * t1519 * t546 + 0.24923243437094339947e1 * t2610 * t2128 * t111 * t168 - 0.37384865155641509919e1 * t830 * t2199 * t574 - 0.15243447427901234237e2 * t731 * t2142 * t168 - 0.22865171141851851357e2 * t256 * t1533 * t546 - 0.13278652291933993376e0 * t2600 * t383 * t2128 + 0.49846486874188679892e1 * t300 * t585 * t2174 - 0.34297756712777777034e2 * t6315 * t597 + 0.31465570642866950052e3 * t1352 * t1256 * t6219;
3232   t8910 = -0.18e2 * t150 * t2187 - t42 * t92 * (t8846 + t8890) - 0.3e1 * t150 * t2241 - t2113 * t179 - 0.3e1 * t538 * t601 - t169 * t2165 - 0.3e1 * t575 * t566 + t16 * t8838 * t61 + 0.12e2 * t150 * t2190 + 0.6e1 * t150 * t2193 + 0.6e1 * t538 * t579;
3233   if(v4rho4 != NULL && (p->info->flags & XC_FLAGS_NEEDS_LAPLACIAN) && (p->info->flags & XC_FLAGS_HAVE_LXC))
3234     v4lapl3tau[0] = -0.3e1 / 0.8e1 * t69 * t70 * (-0.18e2 * t1192 * t1479 * t565 + 0.6e1 * t42 * t1490 * t565 + 0.6e1 * t42 * t6277 * t159 + 0.24e2 * t42 * t3142 * t2121 + 0.2e1 * t42 * t379 * t2164 - 0.18e2 * t42 * t4145 * t542 - 0.3e1 * t2175 * t160 - 0.6e1 * t169 * t2122 + 0.6e1 * t169 * t2125 + 0.6e1 * t575 * t543 + t8910);
3235 
3236   t8947 = -0.24e2 * t1192 * t1479 * t600 - 0.6e1 * t42 * t1575 * t565 + 0.2e1 * t42 * t1583 * t565 + 0.4e1 * t42 * t379 * t2240 - 0.6e1 * t42 * t4451 * t542 + 0.24e2 * t42 * t4455 * t542 - 0.12e2 * t150 * t2262 + 0.8e1 * t150 * t2265 - 0.12e2 * t169 * t2187 + 0.8e1 * t169 * t2190 + 0.4e1 * t169 * t2193 + 0.2e1 * t610 * t543 + 0.8e1 * t575 * t579;
3237   t9012 = 0.31465570642866950052e3 * t752 * t1626 * t4038 - 0.76217237139506171188e1 * t256 * t1618 * t2236 + 0.10488523547622316684e3 * t752 * t4524 * t2229 - 0.30486894855802468476e2 * t256 * t397 * t6415 - 0.15243447427901234238e2 * t256 * t397 * t52 * t2174 + 0.10488523547622316684e3 * t752 * t1626 * t106 * t537 - 0.24056046973484009303e4 * t2502 * t4539 * t2507 * t546 - 0.11432585570925925678e2 * t731 * t633 * t2236 + 0.20977047095244633367e3 * t2524 * t1626 * t2229 - 0.11432585570925925678e2 * t731 * t561 * t4549 - 0.15243447427901234238e2 * t256 * t6676 * t596 + 0.21245843667094389400e0 * t826 * t383 * t6415 - 0.49846486874188679892e1 * t830 * t585 * t6672 + 0.11432585570925925678e2 * t2537 * t561 * t4557 + 0.33230991249459119928e1 * t300 * t1597 * t2174 + 0.53114609167735973502e-1 * t826 * t1587 * t537 + 0.24923243437094339947e1 * t2610 * t2199 * t618 - 0.12461621718547169973e1 * t830 * t2209 * t618;
3238   t9028 = t574 * t574;
3239   t9062 = -0.33190537739774681728e-3 * t8651 + 0.80361903747517469318e-3 * t8653 - 0.17549384106081390032e-1 * t8656 - 0.90080832906835432313e-4 * t8658;
3240   t9075 = -0.35409739445157315668e-1 * t295 * t1604 * t537 - 0.12461621718547169973e1 * t830 * t2199 * t609 + 0.16615495624729559964e1 * t300 * t2209 * t609 + 0.33230991249459119928e1 * t300 * t585 * t2250 - 0.76217237139506171188e1 * t256 * t1618 * t546 - 0.15243447427901234238e2 * t256 * t9028 * t258 * t52 - 0.70819478890314631336e-1 * t295 * t383 * t2174 - 0.15243447427901234237e2 * t731 * t633 * t546 + 0.53114609167735973502e-1 * t826 * t1604 * t546 - 0.13278652291933993376e0 * t2600 * t1587 * t546 - 0.76217237139506171188e1 * t256 * t633 * t537 - 0.70819478890314631336e-1 * t295 * t6611 * t149 - 0.70819478890314631336e-1 * t44 * t235 * t9028 + 0.33230991249459119928e1 * t240 * t51 * t9028 * t111 + 0.16615495624729559964e1 * t99 * t51 * t9062 * t111 + 0.70819478890314631335e-1 * t44 * t94 * t9062 - 0.45730342283703702713e2 * t4579 * t2226 + 0.41954094190489266736e3 * t1352 * t1256 * t6415;
3241   t9087 = t600 * t600;
3242   t9097 = 0.4e1 * t150 * t2269 + 0.4e1 * t42 * t6496 * t159 - 0.2e1 * t2175 * t179 - t42 * t92 * (t9012 + t9075) + t16 * t9062 * t61 - t538 * t638 - t610 * t566 - 0.2e1 * t2251 * t160 - 0.4e1 * t575 * t601 + 0.4e1 * t42 * t228 * t9087 - 0.2e1 * t169 * t2241 - 0.2e1 * t150 * t2315 + 0.2e1 * t538 * t615;
3243   if(v4rho4 != NULL && (p->info->flags & XC_FLAGS_NEEDS_LAPLACIAN) && (p->info->flags & XC_FLAGS_HAVE_LXC))
3244     v4lapl2tau2[0] = -0.3e1 / 0.8e1 * t69 * t70 * (t8947 + t9097);
3245 
3246   t9106 = 0.13276215095909872691e-2 * t8651 - 0.32144761499006987727e-2 * t8653 + 0.70197536424325560126e-1 * t8656 + 0.36032333162734172925e-3 * t8658;
3247   t9197 = -0.22865171141851851357e2 * t256 * t1618 * t1498 - 0.22865171141851851357e2 * t256 * t1618 * t2303 + 0.31465570642866950052e3 * t752 * t1626 * t106 * t574 + 0.31465570642866950052e3 * t752 * t2368 * t596 - 0.24056046973484009303e4 * t2502 * t6807 * t2507 * t149 - 0.37384865155641509919e1 * t830 * t585 * t6818 - 0.34297756712777777034e2 * t731 * t633 * t2303 + 0.20977047095244633367e3 * t2524 * t2368 * t2307 - 0.76217237139506171188e1 * t256 * t6787 * t596 - 0.22865171141851851357e2 * t256 * t6676 * t1029 + 0.11432585570925925678e2 * t2537 * t2354 * t596 + 0.15934382750320792050e0 * t826 * t383 * t6651 - 0.10622921833547194700e0 * t295 * t383 * t2250 + 0.49846486874188679892e1 * t300 * t574 * t111 * t609;
3248   t9240 = 0.49846486874188679892e1 * t300 * t1597 * t2250 - 0.13278652291933993376e0 * t2600 * t6855 * t149 + 0.15934382750320792051e0 * t826 * t1587 * t574 + 0.24923243437094339947e1 * t2610 * t585 * t2340 - 0.37384865155641509919e1 * t830 * t6829 * t574 - 0.22865171141851851356e2 * t256 * t633 * t574 - 0.15243447427901234237e2 * t731 * t2354 * t149 - 0.35409739445157315668e-1 * t295 * t6836 * t149 + 0.16615495624729559964e1 * t300 * t585 * t2324 - 0.10622921833547194700e0 * t295 * t1519 * t609 + 0.16615495624729559964e1 * t99 * t51 * t9106 * t111 + 0.70819478890314631335e-1 * t44 * t94 * t9106 - 0.34297756712777777034e2 * t4579 * t2300 + 0.31465570642866950052e3 * t5979 * t1256 * t1498;
3249   t9244 = -0.3e1 * t169 * t2315 - 0.6e1 * t150 * t2334 + 0.24e2 * t42 * t6756 * t159 - 0.18e2 * t42 * t1575 * t600 + 0.6e1 * t150 * t2337 - 0.18e2 * t1192 * t6765 * t159 + 0.6e1 * t42 * t1490 * t637 + 0.6e1 * t42 * t379 * t2314 - t150 * t2377 + 0.2e1 * t42 * t6776 * t159 - t42 * t92 * (t9197 + t9240);
3250   if(v4rho4 != NULL && (p->info->flags & XC_FLAGS_NEEDS_LAPLACIAN) && (p->info->flags & XC_FLAGS_HAVE_LXC))
3251     v4lapltau3[0] = -0.3e1 / 0.8e1 * t69 * t70 * (t16 * t9106 * t61 - t2325 * t160 - 0.18e2 * t169 * t2262 + 0.12e2 * t169 * t2265 + 0.6e1 * t169 * t2269 - 0.3e1 * t2251 * t179 + 0.6e1 * t575 * t615 - 0.3e1 * t575 * t638 + 0.6e1 * t610 * t579 - 0.3e1 * t610 * t601 + t9244);
3252 
3253   t9253 = -0.53104860383639490765e-2 * t8651 + 0.12857904599602795091e-1 * t8653 - 0.28079014569730224051e0 * t8656 - 0.14412933265093669170e-2 * t8658;
3254   t9268 = t614 * t614;
3255   t9275 = t637 * t637;
3256   t9289 = t618 * t618;
3257   t9305 = t9289 * t755;
3258   t9316 = t609 * t609;
3259   t9353 = 0.16615495624729559964e1 * t99 * t51 * t9253 * t111 + 0.70819478890314631335e-1 * t44 * t94 * t9253 + 0.24923243437094339947e1 * t2491 * t51 * t9289 * t111 - 0.24056046973484009303e4 * t2502 * t9289 * t2505 * t2507 + 0.66461982498918239856e1 * t300 * t1597 * t2324 - 0.15243447427901234237e2 * t730 * t255 * t9289 * t258 + 0.20977047095244633367e3 * t2524 * t9305 * t106 - 0.74769730311283019838e1 * t830 * t6829 * t609 + 0.11432585570925925678e2 * t2537 * t9289 * t258 * t52 - 0.10622921833547194700e0 * t44 * t235 * t9316 - 0.14163895778062926267e0 * t295 * t383 * t2324 + 0.49846486874188679892e1 * t240 * t51 * t9316 * t111 - 0.13278652291933993376e0 * t44 * t2551 * t9289 + 0.31868765500641584101e0 * t826 * t1587 * t609 - 0.68595513425555554068e2 * t731 * t633 * t4549 - 0.30486894855802468476e2 * t256 * t6787 * t1029 - 0.45730342283703702713e2 * t256 * t1618 * t618 - 0.22865171141851851357e2 * t256 * t9316 * t258 * t52 + 0.62931141285733900104e3 * t752 * t4524 * t106 * t618 + 0.31465570642866950052e3 * t752 * t9305 * t52;
3260   t9356 = -0.36e2 * t42 * t1575 * t637 + t16 * t9253 * t61 + 0.6e1 * t42 * t228 * t9275 + 0.8e1 * t42 * t379 * t2376 + 0.24e2 * t42 * t2468 * t9268 - t42 * t92 * t9353 - 0.24e2 * t169 * t2334 + 0.24e2 * t169 * t2337 - 0.4e1 * t169 * t2377 - 0.4e1 * t2325 * t179 + 0.12e2 * t610 * t615 - 0.6e1 * t610 * t638;
3261   if(v4rho4 != NULL && (p->info->flags & XC_FLAGS_HAVE_LXC))
3262     v4tau4[0] = -0.3e1 / 0.8e1 * t69 * t70 * t9356;
3263 
3264 #ifndef XC_DONT_COMPILE_MXC
3265 
3266   if(order < 5) return;
3267 
3268 
3269 #endif
3270 
3271 #endif
3272 
3273 #endif
3274 
3275 #endif
3276 
3277 #endif
3278 
3279 
3280 }
3281 
3282 
3283 static inline void
func_pol(const xc_func_type * p,int order,const double * rho,const double * sigma,const double * lapl,const double * tau,double * zk,MGGA_OUT_PARAMS_NO_EXC (double *))3284 func_pol(const xc_func_type *p, int order, const double *rho, const double *sigma, const double *lapl, const double *tau, double *zk, MGGA_OUT_PARAMS_NO_EXC(double *))
3285 {
3286 
3287 #ifndef XC_DONT_COMPILE_EXC
3288   double t2, t4, t5, t6, t7, t8, t9, t10;
3289   double t11, t12, t14, t15, t16, t17, t18, t19;
3290   double t21, t22, t24, t25, t26, t27, t29, t31;
3291   double t33, t39, t41, t42, t43, t44, t46, t47;
3292   double t49, t50, t51, t52, t53, t54, t55, t56;
3293   double t59, t61, t62, t66, t70, t71, t73, t75;
3294   double t77, t78, t79, t80, t81, t82, t84, t86;
3295   double t88, t95, t96, t98, t99, t101, t102, t103;
3296   double t104, t105, t106, t110, t114, t115, t117, t119;
3297 
3298 #ifndef XC_DONT_COMPILE_VXC
3299   double t121, t122, t123, t124, t125, t126, t128, t129;
3300   double t131, t132, t133, t134, t135, t137, t138, t141;
3301   double t143, t148, t150, t152, t153, t156, t157, t159;
3302   double t160, t161, t162, t166, t167, t168, t169, t170;
3303   double t172, t173, t174, t177, t178, t179, t183, t184;
3304   double t186, t188, t189, t190, t191, t192, t194, t195;
3305   double t196, t198, t199, t203, t204, t206, t207, t208;
3306   double t209, t211, t212, t215, t217, t222, t224, t226;
3307   double t227, t230, t231, t233, t234, t235, t236, t240;
3308   double t241, t242, t245, t246, t247, t251, t252, t254;
3309   double t256, t257, t261, t262, t263, t265, t267, t269;
3310   double t270, t279, t280, t282, t286, t288, t290, t292;
3311   double t293, t302, t303, t305, t310, t312, t314, t315;
3312   double t324, t325, t327, t332, t334, t336, t337, t346;
3313   double t347, t349, t355, t356, t365, t366, t368, t374;
3314   double t375, t384, t385, t387;
3315 
3316 #ifndef XC_DONT_COMPILE_FXC
3317   double t391, t393, t394, t395, t396, t397, t398, t400;
3318   double t401, t402, t404, t405, t406, t408, t409, t410;
3319   double t411, t412, t413, t415, t416, t418, t419, t421;
3320   double t422, t424, t425, t428, t430, t435, t437, t440;
3321   double t441, t442, t443, t446, t451, t456, t457, t462;
3322   double t463, t464, t468, t469, t470, t474, t486, t487;
3323   double t488, t489, t490, t492, t493, t497, t498, t500;
3324   double t502, t503, t504, t505, t506, t507, t508, t510;
3325   double t511, t512, t514, t515, t516, t517, t519, t520;
3326   double t521, t523, t524, t525, t527, t528, t529, t530;
3327   double t532, t535, t537, t539, t542, t543, t544, t546;
3328   double t550, t551, t552, t553, t555, t558, t560, t561;
3329   double t563, t566, t568, t571, t573, t576, t577, t579;
3330   double t580, t581, t582, t583, t585, t586, t587, t588;
3331   double t590, t591, t592, t593, t595, t596, t597, t599;
3332   double t600, t601, t604, t606, t611, t613, t616, t617;
3333   double t618, t628, t629, t634, t635, t636, t640, t641;
3334   double t642, t646, t658, t659, t661, t662, t666, t667;
3335   double t669, t671, t672, t673, t676, t678, t679, t684;
3336   double t686, t687, t688, t690, t691, t692, t694, t696;
3337   double t697, t701, t702, t705, t706, t710, t711, t722;
3338   double t723, t724, t727, t728, t730, t735, t736, t737;
3339   double t742, t747, t751, t753, t754, t755, t757, t758;
3340   double t759, t761, t763, t764, t768, t769, t772, t773;
3341   double t777, t778, t789, t790, t791, t794, t795, t797;
3342   double t798, t802, t804, t809, t810, t812, t813, t816;
3343   double t817, t821, t822, t825, t839, t840, t843, t844;
3344   double t846, t851, t852, t857, t862, t866, t867, t869;
3345   double t870, t873, t874, t878, t879, t882, t896, t897;
3346   double t900, t901, t903, t904, t908, t910, t918, t919;
3347   double t923, t924, t927, t941, t942, t945, t946, t948;
3348   double t953, t954, t959, t964, t971, t972, t976, t977;
3349   double t980, t994, t995, t998, t999, t1001, t1002, t1005;
3350   double t1007, t1010, t1013, t1015, t1016, t1020, t1021, t1024;
3351   double t1039, t1043, t1044, t1046, t1047, t1050, t1052, t1055;
3352   double t1058, t1060, t1061, t1065, t1066, t1069, t1084, t1088;
3353   double t1089, t1091, t1092, t1096, t1099, t1102, t1104, t1105;
3354   double t1109, t1115, t1126, t1127, t1130, t1131, t1133, t1134;
3355   double t1138, t1141, t1144, t1146, t1147, t1151, t1157, t1168;
3356   double t1169, t1172, t1173, t1175, t1176, t1181, t1182, t1186;
3357   double t1202, t1205, t1206, t1208, t1209, t1214, t1215, t1219;
3358   double t1235, t1238, t1239, t1241, t1242, t1246, t1249, t1252;
3359   double t1254, t1255, t1259, t1260, t1263, t1278, t1282, t1283;
3360   double t1285, t1286, t1290, t1293, t1296, t1298, t1299, t1303;
3361   double t1304, t1307, t1322, t1326, t1327, t1329, t1330, t1335;
3362   double t1336, t1340, t1346, t1357, t1358, t1361, t1362, t1364;
3363   double t1365, t1370, t1371, t1375, t1381, t1392, t1393, t1396;
3364   double t1397, t1399, t1400, t1405, t1406, t1410, t1411, t1414;
3365   double t1429, t1433, t1434, t1436, t1437, t1442, t1443, t1447;
3366   double t1448, t1451, t1466, t1470, t1471, t1473, t1474;
3367 
3368 #ifndef XC_DONT_COMPILE_KXC
3369   double t1478, t1480, t1481, t1482, t1484, t1485, t1487, t1488;
3370   double t1489, t1491, t1492, t1493, t1495, t1496, t1497, t1498;
3371   double t1500, t1501, t1502, t1504, t1505, t1506, t1508, t1509;
3372   double t1511, t1513, t1515, t1517, t1518, t1523, t1528, t1530;
3373   double t1532, t1534, t1536, t1537, t1540, t1541, t1542, t1546;
3374   double t1547, t1550, t1557, t1558, t1566, t1567, t1568, t1569;
3375   double t1572, t1573, t1576, t1578, t1579, t1580, t1584, t1589;
3376   double t1596, t1597, t1598, t1609, t1614, t1615, t1616, t1617;
3377   double t1618, t1619, t1621, t1622, t1630, t1631, t1633, t1635;
3378   double t1636, t1638, t1639, t1641, t1644, t1645, t1646, t1647;
3379   double t1649, t1650, t1651, t1653, t1655, t1657, t1658, t1659;
3380   double t1661, t1662, t1663, t1665, t1666, t1667, t1669, t1670;
3381   double t1672, t1673, t1674, t1675, t1677, t1678, t1679, t1681;
3382   double t1683, t1689, t1691, t1696, t1699, t1702, t1706, t1707;
3383   double t1708, t1710, t1712, t1714, t1715, t1716, t1717, t1718;
3384   double t1720, t1722, t1724, t1725, t1726, t1727, t1729, t1731;
3385   double t1733, t1735, t1736, t1738, t1740, t1742, t1744, t1746;
3386   double t1748, t1750, t1751, t1753, t1755, t1757, t1760, t1761;
3387   double t1762, t1764, t1766, t1768, t1771, t1772, t1774, t1777;
3388   double t1779, t1781, t1783, t1785, t1793, t1800, t1801, t1802;
3389   double t1804, t1808, t1810, t1812, t1814, t1816, t1818, t1820;
3390   double t1822, t1824, t1826, t1828, t1830, t1832, t1834, t1837;
3391   double t1840, t1841, t1843, t1845, t1846, t1848, t1850, t1852;
3392   double t1854, t1856, t1858, t1859, t1861, t1863, t1865, t1867;
3393   double t1870, t1873, t1876, t1884, t1891, t1895, t1900, t1902;
3394   double t1904, t1906, t1908, t1909, t1912, t1916, t1917, t1920;
3395   double t1927, t1928, t1936, t1937, t1938, t1939, t1942, t1943;
3396   double t1946, t1948, t1949, t1950, t1954, t1959, t1966, t1967;
3397   double t1968, t1979, t1983, t1984, t1985, t1987, t1988, t1996;
3398   double t1997, t1999, t2001, t2002, t2004, t2005, t2007, t2008;
3399   double t2009, t2011, t2012, t2013, t2015, t2016, t2017, t2019;
3400   double t2020, t2021, t2022, t2024, t2025, t2026, t2027, t2029;
3401   double t2030, t2031, t2033, t2034, t2035, t2036, t2038, t2039;
3402   double t2040, t2042, t2043, t2049, t2051, t2052, t2053, t2064;
3403   double t2068, t2070, t2071, t2075, t2078, t2083, t2086, t2090;
3404   double t2092, t2093, t2095, t2097, t2098, t2099, t2101, t2102;
3405   double t2104, t2105, t2107, t2109, t2110, t2123, t2126, t2127;
3406   double t2130, t2133, t2137, t2138, t2142, t2149, t2166, t2167;
3407   double t2170, t2171, t2178, t2182, t2183, t2185, t2190, t2194;
3408   double t2195, t2199, t2205, t2206, t2207, t2209, t2210, t2211;
3409   double t2212, t2216, t2219, t2220, t2222, t2226, t2228, t2229;
3410   double t2233, t2236, t2239, t2244, t2248, t2253, t2257, t2260;
3411   double t2264, t2267, t2271, t2273, t2274, t2276, t2278, t2279;
3412   double t2280, t2282, t2283, t2285, t2286, t2288, t2290, t2291;
3413   double t2304, t2307, t2308, t2311, t2314, t2318, t2319, t2323;
3414   double t2330, t2347, t2348, t2351, t2352, t2359, t2363, t2364;
3415   double t2366, t2367, t2371, t2375, t2377, t2378, t2382, t2385;
3416   double t2391, t2395, t2398, t2400, t2401, t2403, t2407, t2408;
3417   double t2420, t2421, t2424, t2425, t2428, t2437, t2460, t2461;
3418   double t2464, t2465, t2471, t2474, t2475, t2477, t2482, t2486;
3419   double t2487, t2491, t2497, t2499, t2500, t2504, t2508, t2512;
3420   double t2514, t2515, t2519, t2522, t2525, t2530, t2534, t2539;
3421   double t2543, t2546, t2551, t2555, t2558, t2560, t2561, t2563;
3422   double t2567, t2568, t2580, t2581, t2584, t2585, t2588, t2597;
3423   double t2620, t2621, t2624, t2625, t2631, t2634, t2635, t2637;
3424   double t2638, t2642, t2646, t2648, t2649, t2653, t2656, t2669;
3425   double t2670, t2682, t2683, t2686, t2687, t2690, t2699, t2709;
3426   double t2723, t2724, t2727, t2728, t2734, t2737, t2738, t2740;
3427   double t2745, t2749, t2750, t2754, t2760, t2762, t2763, t2767;
3428   double t2771, t2775, t2777, t2778, t2782, t2785, t2788, t2793;
3429   double t2797, t2802, t2806, t2809, t2821, t2822, t2834, t2835;
3430   double t2838, t2839, t2842, t2851, t2861, t2875, t2876, t2879;
3431   double t2880, t2886, t2889, t2890, t2892, t2893, t2896, t2899;
3432   double t2903, t2905, t2907, t2909, t2911, t2914, t2916, t2917;
3433   double t2918, t2921, t2923, t2924, t2935, t2936, t2939, t2943;
3434   double t2944, t2947, t2963, t2977, t2978, t2981, t2985, t2986;
3435   double t2993, t2994, t2996, t2997, t3000, t3002, t3006, t3011;
3436   double t3015, t3017, t3019, t3021, t3023, t3026, t3028, t3029;
3437   double t3030, t3033, t3035, t3036, t3047, t3048, t3051, t3055;
3438   double t3056, t3059, t3075, t3089, t3090, t3093, t3097, t3098;
3439   double t3105, t3106, t3108, t3109, t3112, t3115, t3119, t3121;
3440   double t3123, t3126, t3127, t3130, t3131, t3144, t3145, t3146;
3441   double t3149, t3152, t3156, t3157, t3160, t3164, t3174, t3178;
3442   double t3179, t3185, t3199, t3200, t3203, t3206, t3207, t3208;
3443   double t3209, t3215, t3218, t3219, t3221, t3222, t3225, t3227;
3444   double t3231, t3236, t3240, t3242, t3244, t3247, t3248, t3251;
3445   double t3252, t3265, t3266, t3267, t3270, t3273, t3277, t3278;
3446   double t3281, t3285, t3295, t3299, t3300, t3306, t3320, t3321;
3447   double t3324, t3327, t3328, t3329, t3330, t3336, t3339, t3340;
3448   double t3342, t3343, t3346, t3349, t3357, t3358, t3371, t3372;
3449   double t3375, t3378, t3382, t3383, t3389, t3407, t3421, t3422;
3450   double t3425, t3429, t3432, t3435, t3438, t3439, t3441, t3442;
3451   double t3445, t3447, t3451, t3456, t3464, t3465, t3478, t3479;
3452   double t3482, t3485, t3489, t3490, t3496, t3514, t3528, t3529;
3453   double t3532, t3536, t3539, t3542, t3545, t3546, t3548, t3549;
3454   double t3552, t3555, t3559, t3561, t3563, t3566, t3567, t3570;
3455   double t3571, t3582, t3583, t3586, t3590, t3591, t3594, t3607;
3456   double t3610, t3624, t3625, t3628, t3632, t3639, t3640, t3642;
3457   double t3643, t3646, t3648, t3652, t3657, t3661, t3663, t3665;
3458   double t3668, t3669, t3672, t3673, t3684, t3685, t3688, t3692;
3459   double t3693, t3696, t3709, t3712, t3726, t3727, t3730, t3734;
3460   double t3741, t3742, t3744, t3745, t3748, t3751, t3759, t3760;
3461   double t3773, t3774, t3777, t3780, t3784, t3785, t3788, t3792;
3462   double t3802, t3806, t3807, t3813, t3827, t3828, t3831, t3834;
3463   double t3840, t3843, t3844, t3846, t3847, t3850, t3852, t3856;
3464   double t3861, t3869, t3870, t3883, t3884, t3887, t3890, t3894;
3465   double t3895, t3898, t3902, t3912, t3916, t3917, t3923, t3937;
3466   double t3938, t3941, t3944, t3950, t3953, t3954, t3956, t3957;
3467   double t3960, t3963, t3971, t3972, t3983, t3984, t3987, t3991;
3468   double t3992, t3995, t4005, t4009, t4012, t4026, t4027, t4030;
3469   double t4034, t4041, t4042, t4044, t4045, t4048, t4050, t4054;
3470   double t4059, t4067, t4068, t4079, t4080, t4083, t4087, t4088;
3471   double t4091, t4101, t4105, t4108, t4122, t4123, t4126, t4130;
3472   double t4137, t4138, t4140, t4141, t4144, t4145, t4146, t4149;
3473   double t4151, t4152, t4154, t4155, t4163, t4164, t4167, t4170;
3474   double t4184, t4198, t4206, t4207, t4209, t4210, t4213, t4214;
3475   double t4215, t4218, t4220, t4221, t4223, t4224, t4232, t4233;
3476   double t4236, t4239, t4253, t4267, t4275, t4276, t4278, t4279;
3477   double t4282, t4283, t4284, t4287, t4289, t4290, t4292, t4293;
3478   double t4305, t4308, t4311, t4317, t4327, t4344, t4347, t4354;
3479   double t4358, t4359, t4361, t4362, t4365, t4366, t4367, t4370;
3480   double t4372, t4373, t4375, t4376, t4388, t4391, t4394, t4400;
3481   double t4410, t4427, t4430, t4437, t4441, t4442, t4444, t4445;
3482   double t4451, t4452, t4464, t4467, t4470, t4501, t4504, t4510;
3483   double t4513, t4514, t4516, t4517, t4523, t4524, t4536, t4539;
3484   double t4542, t4573, t4576, t4582, t4585, t4586, t4588, t4589;
3485   double t4592, t4593, t4596, t4598, t4599, t4601, t4602, t4613;
3486   double t4616, t4620, t4651, t4654, t4658, t4665, t4666, t4668;
3487   double t4669, t4672, t4673, t4676, t4678, t4679, t4681, t4682;
3488   double t4693, t4696, t4700, t4731, t4734, t4738, t4745, t4746;
3489   double t4748, t4749, t4755, t4756, t4769, t4772, t4775, t4779;
3490   double t4785, t4794, t4816, t4819, t4822, t4828, t4831, t4832;
3491   double t4834, t4835, t4841, t4842, t4855, t4858, t4861, t4865;
3492   double t4871, t4880, t4902, t4905, t4908, t4914, t4917, t4918;
3493   double t4920, t4921, t4927, t4928, t4939, t4942, t4946, t4961;
3494   double t4977, t4980, t4990, t4991, t4993, t4994, t5000, t5001;
3495   double t5012, t5015, t5019, t5034, t5050, t5053, t5063, t5064;
3496   double t5066, t5067, t5070, t5071, t5074, t5076, t5077, t5079;
3497   double t5080, t5088, t5089, t5092, t5095, t5109, t5123, t5131;
3498   double t5132, t5134, t5135, t5138, t5139, t5142, t5144, t5145;
3499   double t5147, t5148, t5156, t5157, t5160, t5163, t5177, t5191;
3500   double t5199, t5200, t5202, t5203, t5209, t5210, t5222, t5225;
3501   double t5228, t5234, t5244, t5261, t5264, t5271, t5275, t5276;
3502   double t5278, t5279, t5285, t5286, t5298, t5301, t5304, t5310;
3503   double t5320, t5337, t5340, t5347, t5351, t5352, t5354, t5355;
3504   double t5361, t5362, t5373, t5376, t5380, t5411, t5414, t5418;
3505   double t5425, t5426, t5428, t5429, t5435, t5436, t5447, t5450;
3506   double t5454, t5485, t5488, t5492, t5499, t5500, t5502, t5503;
3507   double t5509, t5510, t5518, t5519, t5522, t5525, t5539, t5553;
3508   double t5561, t5562, t5564, t5565, t5571, t5572, t5580, t5581;
3509   double t5584, t5587, t5601, t5615, t5623, t5624, t5626, t5627;
3510 
3511 #ifndef XC_DONT_COMPILE_LXC
3512   double t5632, t5635, t5641, t5656, t5667, t5677, t5682, t5686;
3513   double t5691, t5693, t5698, t5700, t5702, t5704, t5705, t5706;
3514   double t5711, t5713, t5716, t5718, t5720, t5722, t5728, t5730;
3515   double t5735, t5737, t5738, t5739, t5744, t5746, t5748, t5750;
3516   double t5752, t5758, t5761, t5764, t5771, t5774, t5777, t5793;
3517   double t5796, t5801, t5808, t5813, t5814, t5815, t5817, t5820;
3518   double t5826, t5827, t5828, t5835, t5840, t5843, t5855, t5871;
3519   double t5872, t5880, t5894, t5895, t5900, t5902, t5903, t5904;
3520   double t5905, t5908, t5910, t5914, t5915, t5916, t5920, t5939;
3521   double t5940, t5953, t5954, t5979, t5982, t5987, t5989, t5992;
3522   double t5998, t6000, t6001, t6006, t6013, t6016, t6018, t6032;
3523   double t6034, t6041, t6044, t6049, t6050, t6060, t6061, t6067;
3524   double t6073, t6076, t6079, t6082, t6083, t6085, t6088, t6089;
3525   double t6090, t6099, t6106, t6109, t6113, t6119, t6122, t6137;
3526   double t6142, t6144, t6147, t6164, t6170, t6173, t6181, t6185;
3527   double t6192, t6199, t6201, t6205, t6231, t6234, t6237, t6240;
3528   double t6242, t6256, t6258, t6260, t6266, t6273, t6276, t6279;
3529   double t6282, t6288, t6300, t6321, t6350, t6352, t6355, t6362;
3530   double t6372, t6379, t6389, t6394, t6399, t6407, t6419, t6433;
3531   double t6443, t6457, t6462, t6466, t6476, t6492, t6498, t6501;
3532   double t6504, t6507, t6510, t6513, t6516, t6522, t6551, t6559;
3533   double t6594, t6607, t6614, t6633, t6637, t6650, t6658, t6663;
3534   double t6673, t6698, t6703, t6714, t6750, t6757, t6762, t6763;
3535   double t6764, t6766, t6769, t6775, t6782, t6787, t6790, t6802;
3536   double t6818, t6819, t6827, t6837, t6846, t6847, t6865, t6870;
3537   double t6871, t6874, t6876, t6891, t6892, t6903, t6904, t6917;
3538   double t6918, t6922, t6925, t6929, t6932, t6950, t6954, t6956;
3539   double t6959, t6962, t6972, t6975, t6980, t6993, t6997, t7004;
3540   double t7020, t7027, t7036, t7047, t7060, t7072, t7075, t7082;
3541   double t7087, t7088, t7089, t7090, t7094, t7106, t7107, t7124;
3542   double t7131, t7138, t7156, t7191, t7197, t7200, t7203, t7207;
3543   double t7230, t7235, t7239, t7244, t7245, t7247, t7249, t7251;
3544   double t7252, t7266, t7269, t7270, t7272, t7285, t7288, t7301;
3545   double t7313, t7330, t7338, t7347, t7356, t7387, t7391, t7407;
3546   double t7417, t7427, t7431, t7432, t7433, t7437, t7440, t7443;
3547   double t7446, t7461, t7466, t7476, t7486, t7499, t7507, t7523;
3548   double t7524, t7538, t7548, t7577, t7601, t7647, t7651, t7658;
3549   double t7660, t7662, t7666, t7669, t7672, t7675, t7679, t7681;
3550   double t7692, t7708, t7736, t7750, t7766, t7776, t7780, t7784;
3551   double t7794, t7798, t7802, t7825, t7827, t7830, t7833, t7836;
3552   double t7846, t7849, t7852, t7855, t7858, t7862, t7874, t7896;
3553   double t7897, t7900, t7901, t7915, t7918, t7919, t7921, t7934;
3554   double t7937, t7950, t7962, t7979, t7987, t7996, t8005, t8050;
3555   double t8053, t8056, t8060, t8062, t8072, t8076, t8079, t8081;
3556   double t8084, t8096, t8112, t8116, t8120, t8124, t8143, t8162;
3557   double t8171, t8176, t8190, t8199, t8203, t8264, t8268, t8275;
3558   double t8279, t8283, t8316, t8338, t8346, t8359, t8363, t8375;
3559   double t8379, t8399, t8405, t8408, t8427, t8431, t8433, t8436;
3560   double t8439, t8449, t8452, t8455, t8459, t8474, t8486, t8504;
3561   double t8505, t8507, t8512, t8515, t8516, t8518, t8531, t8534;
3562   double t8547, t8559, t8576, t8584, t8593, t8602, t8625, t8632;
3563   double t8636, t8640, t8675, t8679, t8686, t8690, t8710, t8717;
3564   double t8742, t8778, t8784, t8819, t8820, t8822, t8836, t8848;
3565   double t8861, t8876, t8907, t8949, t8964, t8968, t8972, t8989;
3566   double t9006, t9013, t9020, t9024, t9029, t9036, t9046, t9051;
3567   double t9061, t9065, t9071, t9072, t9084, t9099, t9109, t9138;
3568   double t9164, t9197, t9209, t9222, t9237, t9242, t9253, t9257;
3569   double t9261, t9265, t9270, t9277, t9284, t9297, t9301, t9305;
3570   double t9344, t9361, t9367, t9373, t9374, t9376, t9405, t9416;
3571   double t9419, t9423, t9427, t9431, t9435, t9437, t9440, t9463;
3572   double t9470, t9489, t9493, t9497, t9501, t9512, t9519, t9523;
3573   double t9539, t9544, t9548, t9553, t9554, t9563, t9567, t9568;
3574   double t9569, t9574, t9577, t9582, t9594, t9610, t9628, t9638;
3575   double t9649, t9655, t9656, t9668, t9683, t9693, t9736, t9739;
3576   double t9743, t9747, t9751, t9755, t9757, t9760, t9764, t9777;
3577   double t9799, t9806, t9813, t9820, t9836, t9844, t9848, t9852;
3578   double t9874, t9885, t9889, t9890, t9891, t9898, t9902, t9906;
3579   double t9909, t9910, t9913, t9918, t9935, t9939, t9945, t9958;
3580   double t9981, t9987, t9988, t9990, t10033, t10049, t10056, t10078;
3581   double t10085, t10087, t10106, t10110, t10122, t10124, t10132, t10157;
3582   double t10165, t10195, t10207, t10217, t10236, t10242, t10243, t10255;
3583   double t10270, t10280, t10319, t10366, t10376, t10386, t10390, t10400;
3584   double t10413, t10424, t10446, t10452, t10460, t10472, t10479, t10488;
3585   double t10494, t10495, t10541, t10547, t10548, t10550, t10563, t10570;
3586   double t10577, t10587, t10591, t10595, t10605, t10612, t10621, t10624;
3587   double t10628, t10632, t10636, t10640, t10642, t10645, t10653, t10656;
3588   double t10693, t10709, t10717, t10732, t10738, t10744, t10748, t10773;
3589   double t10779, t10780, t10792, t10807, t10817, t10847, t10878, t10901;
3590   double t10905, t10906, t10910, t10929, t10933, t10937, t10944, t10948;
3591   double t10961, t10964, t10968, t10972, t10976, t10980, t10982, t10985;
3592   double t10993, t11019, t11023, t11024, t11037, t11051, t11055, t11061;
3593   double t11062, t11064, t11107, t11124, t11143, t11144, t11157, t11164;
3594   double t11179, t11190, t11197, t11212, t11234, t11247, t11267, t11284;
3595   double t11289, t11298, t11302, t11312, t11318, t11319, t11331, t11346;
3596   double t11356, t11384, t11398, t11405, t11423, t11437, t11459, t11467;
3597   double t11495, t11496, t11500, t11516, t11538, t11546, t11560, t11573;
3598   double t11592, t11605, t11619, t11625, t11626, t11628, t11640, t11649;
3599   double t11653, t11658, t11661, t11681, t11689, t11699, t11703, t11707;
3600   double t11727, t11731, t11732, t11776, t11789, t11802, t11808, t11812;
3601   double t11841, t11847, t11848, t11860, t11875, t11885, t11951, t11958;
3602   double t11969, t11970, t11974, t11981, t11985, t11999, t12006, t12010;
3603   double t12033, t12045, t12048, t12055, t12077, t12094, t12103, t12109;
3604   double t12113, t12118, t12130, t12131, t12134, t12147, t12238, t12242;
3605   double t12249, t12265, t12269, t12273, t12290, t12294, t12299, t12319;
3606   double t12320, t12323, t12336, t12423, t12430, t12432, t12436, t12446;
3607   double t12462, t12479, t12483, t12488, t12504, t12536, t12556, t12575;
3608   double t12588, t12598, t12605, t12615, t12622, t12626, t12637, t12641;
3609   double t12661, t12664, t12669, t12673, t12675, t12679, t12684, t12688;
3610   double t12692, t12698, t12703, t12710, t12713, t12716, t12724, t12742;
3611   double t12747, t12764, t12767, t12772, t12776, t12778, t12814, t12834;
3612   double t12857, t12867, t12874, t12884, t12888, t12898, t12914, t12921;
3613   double t12923, t12930, t12944, t12947, t12950, t12953, t12956, t12959;
3614   double t12961, t12967, t12994, t12999, t13009, t13014, t13058, t13065;
3615   double t13076, t13104, t13111, t13115, t13122, t13132, t13148, t13151;
3616   double t13156, t13180, t13184, t13212, t13216, t13248, t13253, t13274;
3617   double t13316, t13317, t13349, t13355, t13364, t13379, t13398, t13418;
3618   double t13431, t13435, t13439, t13446, t13456, t13472, t13495, t13500;
3619   double t13507, t13510, t13515, t13519, t13521, t13536, t13554, t13564;
3620   double t13586, t13599, t13606, t13607, t13610, t13613, t13615, t13620;
3621   double t13623, t13629, t13636, t13638, t13653, t13669, t13673, t13680;
3622   double t13684, t13697, t13711, t13753, t13758, t13815, t13816, t13837;
3623   double t13865, t13876, t13879, t13881, t13886, t13889, t13895, t13898;
3624   double t13899, t13902, t13904, t13913, t13920, t13939, t13940, t13956;
3625   double t13966, t13971, t13974, t13979, t13983, t13985, t13993, t14001;
3626   double t14019, t14024, t14037, t14056, t14069, t14091, t14101, t14129;
3627   double t14133, t14140, t14151, t14188, t14201, t14214, t14240, t14246;
3628   double t14272, t14287, t14302, t14306, t14309, t14327, t14341, t14347;
3629   double t14368, t14391, t14404, t14440, t14441, t14475, t14479, t14489;
3630   double t14500, t14525, t14540, t14542, t14567, t14579, t14590, t14604;
3631   double t14608, t14616, t14644, t14668, t14672, t14678, t14726, t14735;
3632   double t14754, t14767, t14789, t14803, t14805, t14809, t14822, t14846;
3633   double t14851, t14856, t14865, t14866, t14870, t14877, t14884, t14900;
3634   double t14920, t14925, t14980, t14995, t15000, t15004, t15036, t15037;
3635   double t15060, t15067, t15074, t15085, t15111, t15116, t15125, t15126;
3636   double t15130, t15139, t15144, t15165, t15175, t15180, t15187, t15190;
3637   double t15195, t15199, t15201, t15226, t15235, t15246, t15250, t15257;
3638   double t15267, t15283, t15287, t15294, t15298, t15320, t15341, t15345;
3639   double t15350, t15365, t15368, t15373, t15377, t15379, t15404, t15413;
3640   double t15424, t15451, t15464, t15471, t15478, t15485, t15489, t15502;
3641   double t15506, t15519, t15523, t15528, t15550, t15559, t15566, t15573;
3642   double t15577, t15579, t15586, t15609, t15616, t15629, t15636, t15646;
3643   double t15653, t15677, t15689, t15694, t15722, t15730, t15769, t15774;
3644   double t15793, t15807, t15839, t15842, t15858, t15862, t15870, t15874;
3645   double t15894, t15911, t15912, t15931, t15938, t15948, t15962, t15971;
3646   double t15986, t15988, t16023, t16028, t16041, t16044, t16063, t16072;
3647   double t16081, t16091, t16130, t16149, t16156, t16166, t16189, t16193;
3648   double t16198, t16223, t16234, t16244, t16260, t16265, t16270, t16316;
3649   double t16322, t16342, t16371, t16379, t16394, t16407, t16410, t16414;
3650   double t16430, t16434, t16444, t16448, t16483, t16498, t16502, t16506;
3651   double t16515, t16520, t16533, t16558, t16567, t16578, t16586, t16590;
3652   double t16603, t16610, t16628, t16632, t16642, t16674, t16678, t16683;
3653   double t16704, t16729, t16738, t16749, t16757, t16768, t16778, t16798;
3654   double t16818, t16828, t16838, t16845, t16849, t16856, t16858, t16863;
3655   double t16868, t16883, t16890, t16904, t16913, t16925, t16967, t16970;
3656   double t16976, t16978, t16983, t16988, t17003, t17010, t17024, t17033;
3657   double t17037, t17087, t17090, t17130, t17134, t17136, t17137, t17139;
3658   double t17141, t17142, t17144, t17146, t17154, t17185, t17186, t17196;
3659   double t17209, t17228, t17232, t17247, t17260, t17262, t17263, t17265;
3660   double t17267, t17268, t17270, t17272, t17278, t17302, t17321, t17325;
3661   double t17329, t17336, t17364, t17368, t17405, t17477, t17482, t17526;
3662   double t17548, t17572, t17643, t17687, t17691, t17741, t17753, t17755;
3663   double t17756, t17758, t17760, t17761, t17763, t17765, t17769, t17778;
3664   double t17789, t17793, t17797, t17828, t17839, t17856, t17887, t17892;
3665   double t17897, t17899, t17900, t17902, t17904, t17905, t17907, t17909;
3666   double t17925, t17929, t17933, t17976, t17977, t18002, t18034, t18053;
3667   double t18083, t18092, t18146, t18180, t18216, t18250, t18268, t18304;
3668   double t18352, t18404, t18416, t18445, t18480, t18507, t18525, t18534;
3669   double t18566, t18572, t18587, t18645, t18700, t18710, t18747, t18760;
3670   double t18771, t18783, t18833, t18889, t18895, t18901, t18903, t18904;
3671   double t18906, t18908, t18909, t18911, t18913, t19002, t19003, t19010;
3672   double t19045, t19049, t19055, t19057, t19058, t19060, t19062, t19063;
3673   double t19065, t19067, t19155, t19156, t19163, t19199, t19203, t19212;
3674   double t19248, t19284, t19320, t19355, t19371, t19385, t19427, t19439;
3675   double t19461, t19496, t19523, t19537, t19572, t19613, t19651, t19710;
3676   double t19729, t19758, t19793, t19825, t19833, t19838, t19874, t19904;
3677   double t19924, t19954, t19990, t20022, t20030, t20053, t20097, t20106;
3678   double t20196, t20237, t20241, t20250, t20338, t20381, t20385, t20391;
3679   double t20392, t20394, t20396, t20397, t20399, t20401, t20416, t20423;
3680   double t20430, t20452, t20456, t20500, t20503, t20508, t20509, t20511;
3681   double t20513, t20514, t20516, t20518, t20533, t20540, t20547, t20580;
3682   double t20584, t20617, t20620, t20633, t20695, t20741, t20768, t20779;
3683   double t20867, t20913, t20917, t20926, t20959, t20961, t20965, t21025;
3684   double t21080, t21104, t21139, t21148, t21205, t21251, t21268, t21278;
3685   double t21291, t21300, t21390, t21434, t21438, t21447, t21537, t21581;
3686   double t21585, t21594, t21609, t21616, t21630, t21643, t21650, t21694;
3687   double t21697, t21705, t21720, t21727, t21741, t21750, t21762, t21805;
3688   double t21808;
3689 #endif
3690 
3691 #endif
3692 
3693 #endif
3694 
3695 #endif
3696 
3697 #endif
3698 
3699 
3700 
3701   t2 = M_CBRT3;
3702   t4 = POW_1_3(0.1e1 / M_PI);
3703   t5 = t2 * t4;
3704   t6 = M_CBRT4;
3705   t7 = t6 * t6;
3706   t8 = t5 * t7;
3707   t9 = rho[0] - rho[1];
3708   t10 = rho[0] + rho[1];
3709   t11 = 0.1e1 / t10;
3710   t12 = t9 * t11;
3711   t14 = 0.1e1 / 0.2e1 + t12 / 0.2e1;
3712   t15 = POW_1_3(t14);
3713   t16 = t15 * t14;
3714   t17 = POW_1_3(t10);
3715   t18 = t16 * t17;
3716   t19 = t2 * t2;
3717   t21 = M_PI * M_PI;
3718   t22 = POW_1_3(t21);
3719   t24 = t6 * t19 * t22 / 0.9e1;
3720   t25 = 0.1e1 - t24;
3721   t26 = POW_1_3(rho[0]);
3722   t27 = t26 * t26;
3723   t29 = 0.1e1 / t27 / rho[0];
3724   t31 = rho[0] * rho[0];
3725   t33 = 0.1e1 / t27 / t31;
3726   t39 = M_CBRT6;
3727   t41 = t22 * t22;
3728   t42 = 0.1e1 / t41;
3729   t43 = (tau[0] * t29 - sigma[0] * t33 / 0.8e1 - lapl[0] * t29 / 0.4e1) * t39 * t42;
3730   t44 = 0.39111111111111111111e0 * t43;
3731   t46 = 0.1e1 - 0.5e1 / 0.9e1 * t43;
3732   t47 = t46 * t46;
3733   t49 = 0.1e1 + 0.495616e0 * t47;
3734   t50 = sqrt(t49);
3735   t51 = 0.704e0 - t44 + t50;
3736   t52 = t25 * t51;
3737   t53 = sqrt(0.30e2);
3738   t54 = t25 * t53;
3739   t55 = sqrt(t51);
3740   t56 = t25 * t25;
3741   t59 = 0.1e1 / t56 / t25 * t53;
3742   t61 = 0.60184783083548636238e0 * t56 - 0.206514e-1;
3743   t62 = -0.296e0 - t44 + t50;
3744   t66 = log(0.39102932048925120047e0 * t59 * t61 * t62 + sqrt(POW_2(0.39102932048925120047e0 * t59 * t61 * t62) + 0.1e1));
3745   t70 = 0.1e1 + 0.14163895778062926267e0 * t54 * t55 * t66;
3746   t71 = 0.1e1 / t70;
3747   t73 = t52 * t71 + t24;
3748   t75 = t8 * t18 * t73;
3749   t77 = 0.1e1 / 0.2e1 - t12 / 0.2e1;
3750   t78 = POW_1_3(t77);
3751   t79 = t78 * t77;
3752   t80 = t79 * t17;
3753   t81 = POW_1_3(rho[1]);
3754   t82 = t81 * t81;
3755   t84 = 0.1e1 / t82 / rho[1];
3756   t86 = rho[1] * rho[1];
3757   t88 = 0.1e1 / t82 / t86;
3758   t95 = (tau[1] * t84 - sigma[2] * t88 / 0.8e1 - lapl[1] * t84 / 0.4e1) * t39 * t42;
3759   t96 = 0.39111111111111111111e0 * t95;
3760   t98 = 0.1e1 - 0.5e1 / 0.9e1 * t95;
3761   t99 = t98 * t98;
3762   t101 = 0.1e1 + 0.495616e0 * t99;
3763   t102 = sqrt(t101);
3764   t103 = 0.704e0 - t96 + t102;
3765   t104 = t25 * t103;
3766   t105 = sqrt(t103);
3767   t106 = -0.296e0 - t96 + t102;
3768   t110 = log(0.39102932048925120047e0 * t59 * t61 * t106 + sqrt(POW_2(0.39102932048925120047e0 * t59 * t61 * t106) + 0.1e1));
3769   t114 = 0.1e1 + 0.14163895778062926267e0 * t54 * t105 * t110;
3770   t115 = 0.1e1 / t114;
3771   t117 = t104 * t115 + t24;
3772   t119 = t8 * t80 * t117;
3773   if(zk != NULL && (p->info->flags & XC_FLAGS_HAVE_EXC))
3774     zk[0] = -0.3e1 / 0.8e1 * t75 - 0.3e1 / 0.8e1 * t119;
3775 
3776 #ifndef XC_DONT_COMPILE_VXC
3777 
3778   if(order < 1) return;
3779 
3780 
3781   t121 = 0.3e1 / 0.8e1 * t75;
3782   t122 = 0.3e1 / 0.8e1 * t119;
3783   t123 = t15 * t17;
3784   t124 = t10 * t10;
3785   t125 = 0.1e1 / t124;
3786   t126 = t9 * t125;
3787   t128 = t11 / 0.2e1 - t126 / 0.2e1;
3788   t129 = t73 * t128;
3789   t131 = t8 * t123 * t129;
3790   t132 = t131 / 0.2e1;
3791   t133 = t17 * t17;
3792   t134 = 0.1e1 / t133;
3793   t135 = t16 * t134;
3794   t137 = t8 * t135 * t73;
3795   t138 = t137 / 0.8e1;
3796   t141 = t31 * rho[0];
3797   t143 = 0.1e1 / t27 / t141;
3798   t148 = -0.5e1 / 0.3e1 * tau[0] * t33 + sigma[0] * t143 / 0.3e1 + 0.5e1 / 0.12e2 * lapl[0] * t33;
3799   t150 = t148 * t39 * t42;
3800   t152 = 0.1e1 / t50;
3801   t153 = t152 * t46;
3802   t156 = -0.39111111111111111111e0 * t150 - 0.27534222222222222222e0 * t153 * t150;
3803   t157 = t25 * t156;
3804   t159 = t70 * t70;
3805   t160 = 0.1e1 / t159;
3806   t161 = 0.1e1 / t55;
3807   t162 = t161 * t66;
3808   t166 = 0.1e1 / t56;
3809   t167 = t166 * t55;
3810   t168 = t61 * t156;
3811   t169 = t56 * t56;
3812   t170 = t169 * t56;
3813   t172 = t61 * t61;
3814   t173 = 0.1e1 / t170 * t172;
3815   t174 = t62 * t62;
3816   t177 = 0.45871178844685658610e1 * t173 * t174 + 0.1e1;
3817   t178 = sqrt(t177);
3818   t179 = 0.1e1 / t178;
3819   t183 = 0.70819478890314631335e-1 * t54 * t162 * t156 + 0.16615495624729559964e1 * t167 * t168 * t179;
3820   t184 = t160 * t183;
3821   t186 = t157 * t71 - t52 * t184;
3822   t188 = t8 * t18 * t186;
3823   t189 = 0.3e1 / 0.8e1 * t188;
3824   t190 = t78 * t17;
3825   t191 = -t128;
3826   t192 = t117 * t191;
3827   t194 = t8 * t190 * t192;
3828   t195 = t194 / 0.2e1;
3829   t196 = t79 * t134;
3830   t198 = t8 * t196 * t117;
3831   t199 = t198 / 0.8e1;
3832   if(vrho != NULL && (p->info->flags & XC_FLAGS_HAVE_VXC))
3833     vrho[0] = -t121 - t122 + t10 * (-t132 - t138 - t189 - t195 - t199);
3834 
3835   t203 = -t11 / 0.2e1 - t126 / 0.2e1;
3836   t204 = t73 * t203;
3837   t206 = t8 * t123 * t204;
3838   t207 = t206 / 0.2e1;
3839   t208 = -t203;
3840   t209 = t117 * t208;
3841   t211 = t8 * t190 * t209;
3842   t212 = t211 / 0.2e1;
3843   t215 = t86 * rho[1];
3844   t217 = 0.1e1 / t82 / t215;
3845   t222 = -0.5e1 / 0.3e1 * tau[1] * t88 + sigma[2] * t217 / 0.3e1 + 0.5e1 / 0.12e2 * lapl[1] * t88;
3846   t224 = t222 * t39 * t42;
3847   t226 = 0.1e1 / t102;
3848   t227 = t226 * t98;
3849   t230 = -0.39111111111111111111e0 * t224 - 0.27534222222222222222e0 * t227 * t224;
3850   t231 = t25 * t230;
3851   t233 = t114 * t114;
3852   t234 = 0.1e1 / t233;
3853   t235 = 0.1e1 / t105;
3854   t236 = t235 * t110;
3855   t240 = t166 * t105;
3856   t241 = t61 * t230;
3857   t242 = t106 * t106;
3858   t245 = 0.45871178844685658610e1 * t173 * t242 + 0.1e1;
3859   t246 = sqrt(t245);
3860   t247 = 0.1e1 / t246;
3861   t251 = 0.70819478890314631335e-1 * t54 * t236 * t230 + 0.16615495624729559964e1 * t240 * t241 * t247;
3862   t252 = t234 * t251;
3863   t254 = -t104 * t252 + t231 * t115;
3864   t256 = t8 * t80 * t254;
3865   t257 = 0.3e1 / 0.8e1 * t256;
3866   if(vrho != NULL && (p->info->flags & XC_FLAGS_HAVE_VXC))
3867     vrho[1] = -t121 - t122 + t10 * (-t207 - t138 - t212 - t199 - t257);
3868 
3869   t261 = t17 * t10 * t2;
3870   t262 = t261 * t4;
3871   t263 = t7 * t16;
3872   t265 = t33 * t39 * t42;
3873   t267 = t153 * t265;
3874   t269 = 0.48888888888888888889e-1 * t265 + 0.34417777777777777778e-1 * t267;
3875   t270 = t25 * t269;
3876   t279 = 0.70819478890314631335e-1 * t54 * t162 * t269 + 0.16615495624729559964e1 * t167 * t61 * t269 * t179;
3877   t280 = t160 * t279;
3878   t282 = t270 * t71 - t52 * t280;
3879   if(vrho != NULL && (p->info->flags & XC_FLAGS_HAVE_VXC))
3880     vsigma[0] = -0.3e1 / 0.8e1 * t262 * t263 * t282;
3881 
3882   if(vrho != NULL && (p->info->flags & XC_FLAGS_HAVE_VXC))
3883     vsigma[1] = 0.0e0;
3884 
3885   t286 = t7 * t79;
3886   t288 = t88 * t39 * t42;
3887   t290 = t227 * t288;
3888   t292 = 0.48888888888888888889e-1 * t288 + 0.34417777777777777778e-1 * t290;
3889   t293 = t25 * t292;
3890   t302 = 0.70819478890314631335e-1 * t54 * t236 * t292 + 0.16615495624729559964e1 * t240 * t61 * t292 * t247;
3891   t303 = t234 * t302;
3892   t305 = -t104 * t303 + t293 * t115;
3893   if(vrho != NULL && (p->info->flags & XC_FLAGS_HAVE_VXC))
3894     vsigma[2] = -0.3e1 / 0.8e1 * t262 * t286 * t305;
3895 
3896   t310 = t29 * t39 * t42;
3897   t312 = t153 * t310;
3898   t314 = 0.97777777777777777778e-1 * t310 + 0.68835555555555555555e-1 * t312;
3899   t315 = t25 * t314;
3900   t324 = 0.70819478890314631335e-1 * t54 * t162 * t314 + 0.16615495624729559964e1 * t167 * t61 * t314 * t179;
3901   t325 = t160 * t324;
3902   t327 = t315 * t71 - t52 * t325;
3903   if(vrho != NULL && (p->info->flags & XC_FLAGS_NEEDS_LAPLACIAN) && (p->info->flags & XC_FLAGS_HAVE_VXC))
3904     vlapl[0] = -0.3e1 / 0.8e1 * t262 * t263 * t327;
3905 
3906   t332 = t84 * t39 * t42;
3907   t334 = t227 * t332;
3908   t336 = 0.97777777777777777778e-1 * t332 + 0.68835555555555555555e-1 * t334;
3909   t337 = t25 * t336;
3910   t346 = 0.70819478890314631335e-1 * t54 * t236 * t336 + 0.16615495624729559964e1 * t240 * t61 * t336 * t247;
3911   t347 = t234 * t346;
3912   t349 = -t104 * t347 + t337 * t115;
3913   if(vrho != NULL && (p->info->flags & XC_FLAGS_NEEDS_LAPLACIAN) && (p->info->flags & XC_FLAGS_HAVE_VXC))
3914     vlapl[1] = -0.3e1 / 0.8e1 * t262 * t286 * t349;
3915 
3916   t355 = -0.39111111111111111111e0 * t310 - 0.27534222222222222222e0 * t312;
3917   t356 = t25 * t355;
3918   t365 = 0.70819478890314631335e-1 * t54 * t162 * t355 + 0.16615495624729559964e1 * t167 * t61 * t355 * t179;
3919   t366 = t160 * t365;
3920   t368 = t356 * t71 - t52 * t366;
3921   if(vrho != NULL && (p->info->flags & XC_FLAGS_HAVE_VXC))
3922     vtau[0] = -0.3e1 / 0.8e1 * t262 * t263 * t368;
3923 
3924   t374 = -0.39111111111111111111e0 * t332 - 0.27534222222222222222e0 * t334;
3925   t375 = t25 * t374;
3926   t384 = 0.70819478890314631335e-1 * t54 * t236 * t374 + 0.16615495624729559964e1 * t240 * t61 * t374 * t247;
3927   t385 = t234 * t384;
3928   t387 = -t104 * t385 + t375 * t115;
3929   if(vrho != NULL && (p->info->flags & XC_FLAGS_HAVE_VXC))
3930     vtau[1] = -0.3e1 / 0.8e1 * t262 * t286 * t387;
3931 
3932 #ifndef XC_DONT_COMPILE_FXC
3933 
3934   if(order < 2) return;
3935 
3936 
3937   t391 = t137 / 0.4e1;
3938   t393 = t198 / 0.4e1;
3939   t394 = t15 * t15;
3940   t395 = 0.1e1 / t394;
3941   t396 = t395 * t17;
3942   t397 = t128 * t128;
3943   t398 = t73 * t397;
3944   t400 = t8 * t396 * t398;
3945   t401 = t400 / 0.6e1;
3946   t402 = t15 * t134;
3947   t404 = t8 * t402 * t129;
3948   t405 = t404 / 0.3e1;
3949   t406 = t186 * t128;
3950   t408 = t8 * t123 * t406;
3951   t409 = t124 * t10;
3952   t410 = 0.1e1 / t409;
3953   t411 = t9 * t410;
3954   t412 = -t125 + t411;
3955   t413 = t73 * t412;
3956   t415 = t8 * t123 * t413;
3957   t416 = t415 / 0.2e1;
3958   t418 = 0.1e1 / t133 / t10;
3959   t419 = t16 * t418;
3960   t421 = t8 * t419 * t73;
3961   t422 = t421 / 0.12e2;
3962   t424 = t8 * t135 * t186;
3963   t425 = t424 / 0.4e1;
3964   t428 = t31 * t31;
3965   t430 = 0.1e1 / t27 / t428;
3966   t435 = 0.40e2 / 0.9e1 * tau[0] * t143 - 0.11e2 / 0.9e1 * sigma[0] * t430 - 0.10e2 / 0.9e1 * lapl[0] * t143;
3967   t437 = t435 * t39 * t42;
3968   t440 = 0.1e1 / t50 / t49;
3969   t441 = t440 * t47;
3970   t442 = t148 * t148;
3971   t443 = t39 * t39;
3972   t446 = 0.1e1 / t22 / t21;
3973   t451 = t443 * t446;
3974   t456 = -0.39111111111111111111e0 * t437 - 0.75813339338271604937e-1 * t441 * t442 * t443 * t446 + 0.15296790123456790123e0 * t152 * t442 * t451 - 0.27534222222222222222e0 * t153 * t437;
3975   t457 = t25 * t456;
3976   t462 = 0.1e1 / t159 / t70;
3977   t463 = t183 * t183;
3978   t464 = t462 * t463;
3979   t468 = 0.1e1 / t55 / t51;
3980   t469 = t468 * t66;
3981   t470 = t156 * t156;
3982   t474 = t166 * t161;
3983   t486 = t169 * t169;
3984   t487 = 0.1e1 / t486;
3985   t488 = t487 * t55;
3986   t489 = t172 * t61;
3987   t490 = t488 * t489;
3988   t492 = 0.1e1 / t178 / t177;
3989   t493 = t470 * t492;
3990   t497 = -0.35409739445157315668e-1 * t54 * t469 * t470 + 0.16615495624729559964e1 * t474 * t61 * t470 * t179 + 0.70819478890314631335e-1 * t54 * t162 * t456 + 0.16615495624729559964e1 * t167 * t61 * t456 * t179 - 0.76217237139506171188e1 * t490 * t493 * t62;
3991   t498 = t160 * t497;
3992   t500 = -0.2e1 * t157 * t184 + t457 * t71 + 0.2e1 * t52 * t464 - t52 * t498;
3993   t502 = t8 * t18 * t500;
3994   t503 = 0.3e1 / 0.8e1 * t502;
3995   t504 = t78 * t78;
3996   t505 = 0.1e1 / t504;
3997   t506 = t505 * t17;
3998   t507 = t191 * t191;
3999   t508 = t117 * t507;
4000   t510 = t8 * t506 * t508;
4001   t511 = t510 / 0.6e1;
4002   t512 = t78 * t134;
4003   t514 = t8 * t512 * t192;
4004   t515 = t514 / 0.3e1;
4005   t516 = -t412;
4006   t517 = t117 * t516;
4007   t519 = t8 * t190 * t517;
4008   t520 = t519 / 0.2e1;
4009   t521 = t79 * t418;
4010   t523 = t8 * t521 * t117;
4011   t524 = t523 / 0.12e2;
4012   t525 = -t401 - t405 - t408 - t416 + t422 - t425 - t503 - t511 - t515 - t520 + t524;
4013   if(v2rho2 != NULL && (p->info->flags & XC_FLAGS_HAVE_FXC))
4014     v2rho2[0] = -t131 - t391 - 0.3e1 / 0.4e1 * t188 - t194 - t393 + t10 * t525;
4015 
4016   t527 = t7 * t395;
4017   t528 = t5 * t527;
4018   t529 = t17 * t73;
4019   t530 = t203 * t128;
4020   t532 = t528 * t529 * t530;
4021   t535 = t8 * t402 * t204;
4022   t537 = t186 * t203;
4023   t539 = t8 * t123 * t537;
4024   t542 = 0.1e1 / t133 / t124;
4025   t543 = t15 * t542;
4026   t544 = t73 * t9;
4027   t546 = t8 * t543 * t544;
4028   t550 = t7 * t505;
4029   t551 = t5 * t550;
4030   t552 = t17 * t117;
4031   t553 = t208 * t191;
4032   t555 = t551 * t552 * t553;
4033   t558 = t8 * t512 * t209;
4034   t560 = t78 * t542;
4035   t561 = t117 * t9;
4036   t563 = t8 * t560 * t561;
4037   t566 = t254 * t191;
4038   t568 = t8 * t190 * t566;
4039   t571 = t8 * t196 * t254;
4040   t573 = -t532 / 0.6e1 - t535 / 0.6e1 - t539 / 0.2e1 - t546 / 0.2e1 - t404 / 0.6e1 + t422 - t424 / 0.8e1 - t555 / 0.6e1 - t558 / 0.6e1 + t563 / 0.2e1 - t514 / 0.6e1 + t524 - t568 / 0.2e1 - t571 / 0.8e1;
4041   if(v2rho2 != NULL && (p->info->flags & XC_FLAGS_HAVE_FXC))
4042     v2rho2[1] = t10 * t573 - t132 - t189 - t195 - t207 - t212 - t257 - t391 - t393;
4043 
4044   t576 = t203 * t203;
4045   t577 = t73 * t576;
4046   t579 = t8 * t396 * t577;
4047   t580 = t579 / 0.6e1;
4048   t581 = t535 / 0.3e1;
4049   t582 = t125 + t411;
4050   t583 = t73 * t582;
4051   t585 = t8 * t123 * t583;
4052   t586 = t585 / 0.2e1;
4053   t587 = t208 * t208;
4054   t588 = t117 * t587;
4055   t590 = t8 * t506 * t588;
4056   t591 = t590 / 0.6e1;
4057   t592 = t558 / 0.3e1;
4058   t593 = t254 * t208;
4059   t595 = t8 * t190 * t593;
4060   t596 = -t582;
4061   t597 = t117 * t596;
4062   t599 = t8 * t190 * t597;
4063   t600 = t599 / 0.2e1;
4064   t601 = t571 / 0.4e1;
4065   t604 = t86 * t86;
4066   t606 = 0.1e1 / t82 / t604;
4067   t611 = 0.40e2 / 0.9e1 * tau[1] * t217 - 0.11e2 / 0.9e1 * sigma[2] * t606 - 0.10e2 / 0.9e1 * lapl[1] * t217;
4068   t613 = t611 * t39 * t42;
4069   t616 = 0.1e1 / t102 / t101;
4070   t617 = t616 * t99;
4071   t618 = t222 * t222;
4072   t628 = -0.39111111111111111111e0 * t613 - 0.75813339338271604937e-1 * t617 * t618 * t443 * t446 + 0.15296790123456790123e0 * t226 * t618 * t451 - 0.27534222222222222222e0 * t227 * t613;
4073   t629 = t25 * t628;
4074   t634 = 0.1e1 / t233 / t114;
4075   t635 = t251 * t251;
4076   t636 = t634 * t635;
4077   t640 = 0.1e1 / t105 / t103;
4078   t641 = t640 * t110;
4079   t642 = t230 * t230;
4080   t646 = t166 * t235;
4081   t658 = t487 * t105;
4082   t659 = t658 * t489;
4083   t661 = 0.1e1 / t246 / t245;
4084   t662 = t642 * t661;
4085   t666 = -0.35409739445157315668e-1 * t54 * t641 * t642 + 0.16615495624729559964e1 * t646 * t61 * t642 * t247 + 0.70819478890314631335e-1 * t54 * t236 * t628 + 0.16615495624729559964e1 * t240 * t61 * t628 * t247 - 0.76217237139506171188e1 * t659 * t662 * t106;
4086   t667 = t234 * t666;
4087   t669 = 0.2e1 * t104 * t636 - t104 * t667 + t629 * t115 - 0.2e1 * t231 * t252;
4088   t671 = t8 * t80 * t669;
4089   t672 = 0.3e1 / 0.8e1 * t671;
4090   t673 = -t580 - t581 - t586 + t422 - t591 - t592 - t595 - t600 + t524 - t601 - t672;
4091   if(v2rho2 != NULL && (p->info->flags & XC_FLAGS_HAVE_FXC))
4092     v2rho2[2] = -t206 - t391 - t211 - t393 - 0.3e1 / 0.4e1 * t256 + t10 * t673;
4093 
4094   t676 = t8 * t18 * t282;
4095   t678 = t7 * t15;
4096   t679 = t282 * t128;
4097   t684 = t143 * t39 * t42;
4098   t686 = t441 * t33;
4099   t687 = t451 * t148;
4100   t688 = t686 * t687;
4101   t690 = t152 * t148;
4102   t691 = t451 * t33;
4103   t692 = t690 * t691;
4104   t694 = t153 * t684;
4105   t696 = -0.13037037037037037037e0 * t684 + 0.94766674172839506173e-2 * t688 - 0.19120987654320987654e-1 * t692 - 0.91780740740740740741e-1 * t694;
4106   t697 = t25 * t696;
4107   t701 = t462 * t279;
4108   t702 = t701 * t183;
4109   t705 = t54 * t468;
4110   t706 = t66 * t269;
4111   t710 = t474 * t61;
4112   t711 = t156 * t179;
4113   t722 = t269 * t492;
4114   t723 = t62 * t156;
4115   t724 = t722 * t723;
4116   t727 = -0.35409739445157315668e-1 * t705 * t706 * t156 + 0.16615495624729559964e1 * t710 * t711 * t269 + 0.70819478890314631335e-1 * t54 * t162 * t696 + 0.16615495624729559964e1 * t167 * t61 * t696 * t179 - 0.76217237139506171188e1 * t490 * t724;
4117   t728 = t160 * t727;
4118   t730 = -t157 * t280 - t270 * t184 + 0.2e1 * t52 * t702 - t52 * t728 + t697 * t71;
4119   if(v2rho2 != NULL && (p->info->flags & XC_FLAGS_HAVE_FXC))
4120     v2rhosigma[0] = -t676 / 0.2e1 - t262 * t678 * t679 / 0.2e1 - 0.3e1 / 0.8e1 * t262 * t263 * t730;
4121 
4122   if(v2rho2 != NULL && (p->info->flags & XC_FLAGS_HAVE_FXC))
4123     v2rhosigma[1] = 0.0e0;
4124 
4125   t735 = t8 * t80 * t305;
4126   t736 = t7 * t78;
4127   t737 = t305 * t191;
4128   if(v2rho2 != NULL && (p->info->flags & XC_FLAGS_HAVE_FXC))
4129     v2rhosigma[2] = -t262 * t736 * t737 / 0.2e1 - t735 / 0.2e1;
4130 
4131   t742 = t678 * t282 * t203;
4132   if(v2rho2 != NULL && (p->info->flags & XC_FLAGS_HAVE_FXC))
4133     v2rhosigma[3] = -t262 * t742 / 0.2e1 - t676 / 0.2e1;
4134 
4135   if(v2rho2 != NULL && (p->info->flags & XC_FLAGS_HAVE_FXC))
4136     v2rhosigma[4] = 0.0e0;
4137 
4138   t747 = t736 * t305 * t208;
4139   t751 = t217 * t39 * t42;
4140   t753 = t617 * t88;
4141   t754 = t451 * t222;
4142   t755 = t753 * t754;
4143   t757 = t226 * t222;
4144   t758 = t451 * t88;
4145   t759 = t757 * t758;
4146   t761 = t227 * t751;
4147   t763 = -0.13037037037037037037e0 * t751 + 0.94766674172839506173e-2 * t755 - 0.19120987654320987654e-1 * t759 - 0.91780740740740740741e-1 * t761;
4148   t764 = t25 * t763;
4149   t768 = t634 * t302;
4150   t769 = t768 * t251;
4151   t772 = t54 * t640;
4152   t773 = t110 * t292;
4153   t777 = t646 * t61;
4154   t778 = t230 * t247;
4155   t789 = t292 * t661;
4156   t790 = t106 * t230;
4157   t791 = t789 * t790;
4158   t794 = -0.35409739445157315668e-1 * t772 * t773 * t230 + 0.16615495624729559964e1 * t777 * t778 * t292 + 0.70819478890314631335e-1 * t54 * t236 * t763 + 0.16615495624729559964e1 * t240 * t61 * t763 * t247 - 0.76217237139506171188e1 * t659 * t791;
4159   t795 = t234 * t794;
4160   t797 = 0.2e1 * t104 * t769 - t104 * t795 + t764 * t115 - t231 * t303 - t293 * t252;
4161   t798 = t286 * t797;
4162   if(v2rho2 != NULL && (p->info->flags & XC_FLAGS_HAVE_FXC))
4163     v2rhosigma[5] = -t735 / 0.2e1 - t262 * t747 / 0.2e1 - 0.3e1 / 0.8e1 * t262 * t798;
4164 
4165   t802 = t8 * t18 * t327;
4166   t804 = t327 * t128;
4167   t809 = t441 * t29;
4168   t810 = t809 * t687;
4169   t812 = t451 * t29;
4170   t813 = t690 * t812;
4171   t816 = -0.16296296296296296296e0 * t265 + 0.18953334834567901234e-1 * t810 - 0.38241975308641975308e-1 * t813 - 0.11472592592592592593e0 * t267;
4172   t817 = t25 * t816;
4173   t821 = t462 * t324;
4174   t822 = t821 * t183;
4175   t825 = t66 * t314;
4176   t839 = t314 * t492;
4177   t840 = t839 * t723;
4178   t843 = -0.35409739445157315668e-1 * t705 * t825 * t156 + 0.16615495624729559964e1 * t710 * t711 * t314 + 0.70819478890314631335e-1 * t54 * t162 * t816 + 0.16615495624729559964e1 * t167 * t61 * t816 * t179 - 0.76217237139506171188e1 * t490 * t840;
4179   t844 = t160 * t843;
4180   t846 = -t157 * t325 - t315 * t184 + 0.2e1 * t52 * t822 - t52 * t844 + t817 * t71;
4181   if(v2rho2 != NULL && (p->info->flags & XC_FLAGS_NEEDS_LAPLACIAN) && (p->info->flags & XC_FLAGS_HAVE_FXC))
4182     v2rholapl[0] = -t802 / 0.2e1 - t262 * t678 * t804 / 0.2e1 - 0.3e1 / 0.8e1 * t262 * t263 * t846;
4183 
4184   t851 = t8 * t80 * t349;
4185   t852 = t349 * t191;
4186   if(v2rho2 != NULL && (p->info->flags & XC_FLAGS_NEEDS_LAPLACIAN) && (p->info->flags & XC_FLAGS_HAVE_FXC))
4187     v2rholapl[1] = -t262 * t736 * t852 / 0.2e1 - t851 / 0.2e1;
4188 
4189   t857 = t678 * t327 * t203;
4190   if(v2rho2 != NULL && (p->info->flags & XC_FLAGS_NEEDS_LAPLACIAN) && (p->info->flags & XC_FLAGS_HAVE_FXC))
4191     v2rholapl[2] = -t262 * t857 / 0.2e1 - t802 / 0.2e1;
4192 
4193   t862 = t736 * t349 * t208;
4194   t866 = t617 * t84;
4195   t867 = t866 * t754;
4196   t869 = t451 * t84;
4197   t870 = t757 * t869;
4198   t873 = -0.16296296296296296296e0 * t288 + 0.18953334834567901234e-1 * t867 - 0.38241975308641975308e-1 * t870 - 0.11472592592592592593e0 * t290;
4199   t874 = t25 * t873;
4200   t878 = t634 * t346;
4201   t879 = t878 * t251;
4202   t882 = t110 * t336;
4203   t896 = t336 * t661;
4204   t897 = t896 * t790;
4205   t900 = -0.35409739445157315668e-1 * t772 * t882 * t230 + 0.16615495624729559964e1 * t777 * t778 * t336 + 0.70819478890314631335e-1 * t54 * t236 * t873 + 0.16615495624729559964e1 * t240 * t61 * t873 * t247 - 0.76217237139506171188e1 * t659 * t897;
4206   t901 = t234 * t900;
4207   t903 = 0.2e1 * t104 * t879 - t104 * t901 + t874 * t115 - t231 * t347 - t337 * t252;
4208   t904 = t286 * t903;
4209   if(v2rho2 != NULL && (p->info->flags & XC_FLAGS_NEEDS_LAPLACIAN) && (p->info->flags & XC_FLAGS_HAVE_FXC))
4210     v2rholapl[3] = -t851 / 0.2e1 - t262 * t862 / 0.2e1 - 0.3e1 / 0.8e1 * t262 * t904;
4211 
4212   t908 = t8 * t18 * t368;
4213   t910 = t368 * t128;
4214   t918 = 0.65185185185185185185e0 * t265 - 0.75813339338271604937e-1 * t810 + 0.15296790123456790123e0 * t813 + 0.45890370370370370370e0 * t267;
4215   t919 = t25 * t918;
4216   t923 = t462 * t365;
4217   t924 = t923 * t183;
4218   t927 = t66 * t355;
4219   t941 = t355 * t492;
4220   t942 = t941 * t723;
4221   t945 = -0.35409739445157315668e-1 * t705 * t927 * t156 + 0.16615495624729559964e1 * t710 * t711 * t355 + 0.70819478890314631335e-1 * t54 * t162 * t918 + 0.16615495624729559964e1 * t167 * t61 * t918 * t179 - 0.76217237139506171188e1 * t490 * t942;
4222   t946 = t160 * t945;
4223   t948 = -t157 * t366 - t356 * t184 + 0.2e1 * t52 * t924 - t52 * t946 + t919 * t71;
4224   if(v2rho2 != NULL && (p->info->flags & XC_FLAGS_HAVE_FXC))
4225     v2rhotau[0] = -t908 / 0.2e1 - t262 * t678 * t910 / 0.2e1 - 0.3e1 / 0.8e1 * t262 * t263 * t948;
4226 
4227   t953 = t8 * t80 * t387;
4228   t954 = t387 * t191;
4229   if(v2rho2 != NULL && (p->info->flags & XC_FLAGS_HAVE_FXC))
4230     v2rhotau[1] = -t262 * t736 * t954 / 0.2e1 - t953 / 0.2e1;
4231 
4232   t959 = t678 * t368 * t203;
4233   if(v2rho2 != NULL && (p->info->flags & XC_FLAGS_HAVE_FXC))
4234     v2rhotau[2] = -t262 * t959 / 0.2e1 - t908 / 0.2e1;
4235 
4236   t964 = t736 * t387 * t208;
4237   t971 = 0.65185185185185185185e0 * t288 - 0.75813339338271604937e-1 * t867 + 0.15296790123456790123e0 * t870 + 0.45890370370370370370e0 * t290;
4238   t972 = t25 * t971;
4239   t976 = t634 * t384;
4240   t977 = t976 * t251;
4241   t980 = t110 * t374;
4242   t994 = t374 * t661;
4243   t995 = t994 * t790;
4244   t998 = -0.35409739445157315668e-1 * t772 * t980 * t230 + 0.16615495624729559964e1 * t777 * t778 * t374 + 0.70819478890314631335e-1 * t54 * t236 * t971 + 0.16615495624729559964e1 * t240 * t61 * t971 * t247 - 0.76217237139506171188e1 * t659 * t995;
4245   t999 = t234 * t998;
4246   t1001 = 0.2e1 * t104 * t977 - t104 * t999 + t972 * t115 - t231 * t385 - t375 * t252;
4247   t1002 = t286 * t1001;
4248   if(v2rho2 != NULL && (p->info->flags & XC_FLAGS_HAVE_FXC))
4249     v2rhotau[3] = -t953 / 0.2e1 - t262 * t964 / 0.2e1 - 0.3e1 / 0.8e1 * t262 * t1002;
4250 
4251   t1005 = t428 * rho[0];
4252   t1007 = 0.1e1 / t26 / t1005;
4253   t1010 = t441 * t1007 * t443 * t446;
4254   t1013 = t152 * t1007 * t451;
4255   t1015 = -0.11845834271604938272e-2 * t1010 + 0.23901234567901234568e-2 * t1013;
4256   t1016 = t25 * t1015;
4257   t1020 = t279 * t279;
4258   t1021 = t462 * t1020;
4259   t1024 = t269 * t269;
4260   t1039 = t1024 * t492;
4261   t1043 = -0.35409739445157315668e-1 * t54 * t469 * t1024 + 0.16615495624729559964e1 * t474 * t61 * t1024 * t179 + 0.70819478890314631335e-1 * t54 * t162 * t1015 + 0.16615495624729559964e1 * t167 * t61 * t1015 * t179 - 0.76217237139506171188e1 * t490 * t1039 * t62;
4262   t1044 = t160 * t1043;
4263   t1046 = t1016 * t71 + 0.2e1 * t52 * t1021 - t52 * t1044 - 0.2e1 * t270 * t280;
4264   t1047 = t263 * t1046;
4265   if(v2rho2 != NULL && (p->info->flags & XC_FLAGS_HAVE_FXC))
4266     v2sigma2[0] = -0.3e1 / 0.8e1 * t262 * t1047;
4267 
4268   if(v2rho2 != NULL && (p->info->flags & XC_FLAGS_HAVE_FXC))
4269     v2sigma2[1] = 0.0e0;
4270 
4271   if(v2rho2 != NULL && (p->info->flags & XC_FLAGS_HAVE_FXC))
4272     v2sigma2[2] = 0.0e0;
4273 
4274   if(v2rho2 != NULL && (p->info->flags & XC_FLAGS_HAVE_FXC))
4275     v2sigma2[3] = 0.0e0;
4276 
4277   if(v2rho2 != NULL && (p->info->flags & XC_FLAGS_HAVE_FXC))
4278     v2sigma2[4] = 0.0e0;
4279 
4280   t1050 = t604 * rho[1];
4281   t1052 = 0.1e1 / t81 / t1050;
4282   t1055 = t617 * t1052 * t443 * t446;
4283   t1058 = t226 * t1052 * t451;
4284   t1060 = -0.11845834271604938272e-2 * t1055 + 0.23901234567901234568e-2 * t1058;
4285   t1061 = t25 * t1060;
4286   t1065 = t302 * t302;
4287   t1066 = t634 * t1065;
4288   t1069 = t292 * t292;
4289   t1084 = t1069 * t661;
4290   t1088 = -0.35409739445157315668e-1 * t54 * t641 * t1069 + 0.16615495624729559964e1 * t646 * t61 * t1069 * t247 + 0.70819478890314631335e-1 * t54 * t236 * t1060 + 0.16615495624729559964e1 * t240 * t61 * t1060 * t247 - 0.76217237139506171188e1 * t659 * t1084 * t106;
4291   t1089 = t234 * t1088;
4292   t1091 = 0.2e1 * t104 * t1066 - t104 * t1089 + t1061 * t115 - 0.2e1 * t293 * t303;
4293   t1092 = t286 * t1091;
4294   if(v2rho2 != NULL && (p->info->flags & XC_FLAGS_HAVE_FXC))
4295     v2sigma2[5] = -0.3e1 / 0.8e1 * t262 * t1092;
4296 
4297   t1096 = 0.1e1 / t26 / t428;
4298   t1099 = t441 * t1096 * t443 * t446;
4299   t1102 = t152 * t1096 * t451;
4300   t1104 = -0.23691668543209876543e-2 * t1099 + 0.47802469135802469135e-2 * t1102;
4301   t1105 = t25 * t1104;
4302   t1109 = t821 * t279;
4303   t1115 = t269 * t179;
4304   t1126 = t62 * t269;
4305   t1127 = t839 * t1126;
4306   t1130 = -0.35409739445157315668e-1 * t705 * t825 * t269 + 0.16615495624729559964e1 * t710 * t1115 * t314 + 0.70819478890314631335e-1 * t54 * t162 * t1104 + 0.16615495624729559964e1 * t167 * t61 * t1104 * t179 - 0.76217237139506171188e1 * t490 * t1127;
4307   t1131 = t160 * t1130;
4308   t1133 = t1105 * t71 + 0.2e1 * t52 * t1109 - t52 * t1131 - t270 * t325 - t315 * t280;
4309   t1134 = t263 * t1133;
4310   if(v2rho2 != NULL && (p->info->flags & XC_FLAGS_NEEDS_LAPLACIAN) && (p->info->flags & XC_FLAGS_HAVE_FXC))
4311     v2sigmalapl[0] = -0.3e1 / 0.8e1 * t262 * t1134;
4312 
4313   if(v2rho2 != NULL && (p->info->flags & XC_FLAGS_NEEDS_LAPLACIAN) && (p->info->flags & XC_FLAGS_HAVE_FXC))
4314     v2sigmalapl[1] = 0.0e0;
4315 
4316   if(v2rho2 != NULL && (p->info->flags & XC_FLAGS_NEEDS_LAPLACIAN) && (p->info->flags & XC_FLAGS_HAVE_FXC))
4317     v2sigmalapl[2] = 0.0e0;
4318 
4319   if(v2rho2 != NULL && (p->info->flags & XC_FLAGS_NEEDS_LAPLACIAN) && (p->info->flags & XC_FLAGS_HAVE_FXC))
4320     v2sigmalapl[3] = 0.0e0;
4321 
4322   if(v2rho2 != NULL && (p->info->flags & XC_FLAGS_NEEDS_LAPLACIAN) && (p->info->flags & XC_FLAGS_HAVE_FXC))
4323     v2sigmalapl[4] = 0.0e0;
4324 
4325   t1138 = 0.1e1 / t81 / t604;
4326   t1141 = t617 * t1138 * t443 * t446;
4327   t1144 = t226 * t1138 * t451;
4328   t1146 = -0.23691668543209876543e-2 * t1141 + 0.47802469135802469135e-2 * t1144;
4329   t1147 = t25 * t1146;
4330   t1151 = t878 * t302;
4331   t1157 = t292 * t247;
4332   t1168 = t106 * t292;
4333   t1169 = t896 * t1168;
4334   t1172 = -0.35409739445157315668e-1 * t772 * t882 * t292 + 0.16615495624729559964e1 * t777 * t1157 * t336 + 0.70819478890314631335e-1 * t54 * t236 * t1146 + 0.16615495624729559964e1 * t240 * t61 * t1146 * t247 - 0.76217237139506171188e1 * t659 * t1169;
4335   t1173 = t234 * t1172;
4336   t1175 = 0.2e1 * t104 * t1151 - t104 * t1173 + t1147 * t115 - t293 * t347 - t337 * t303;
4337   t1176 = t286 * t1175;
4338   if(v2rho2 != NULL && (p->info->flags & XC_FLAGS_NEEDS_LAPLACIAN) && (p->info->flags & XC_FLAGS_HAVE_FXC))
4339     v2sigmalapl[5] = -0.3e1 / 0.8e1 * t262 * t1176;
4340 
4341   t1181 = 0.94766674172839506173e-2 * t1099 - 0.19120987654320987654e-1 * t1102;
4342   t1182 = t25 * t1181;
4343   t1186 = t923 * t279;
4344   t1202 = t941 * t1126;
4345   t1205 = -0.35409739445157315668e-1 * t705 * t927 * t269 + 0.16615495624729559964e1 * t710 * t1115 * t355 + 0.70819478890314631335e-1 * t54 * t162 * t1181 + 0.16615495624729559964e1 * t167 * t61 * t1181 * t179 - 0.76217237139506171188e1 * t490 * t1202;
4346   t1206 = t160 * t1205;
4347   t1208 = t1182 * t71 + 0.2e1 * t52 * t1186 - t52 * t1206 - t270 * t366 - t356 * t280;
4348   t1209 = t263 * t1208;
4349   if(v2rho2 != NULL && (p->info->flags & XC_FLAGS_HAVE_FXC))
4350     v2sigmatau[0] = -0.3e1 / 0.8e1 * t262 * t1209;
4351 
4352   if(v2rho2 != NULL && (p->info->flags & XC_FLAGS_HAVE_FXC))
4353     v2sigmatau[1] = 0.0e0;
4354 
4355   if(v2rho2 != NULL && (p->info->flags & XC_FLAGS_HAVE_FXC))
4356     v2sigmatau[2] = 0.0e0;
4357 
4358   if(v2rho2 != NULL && (p->info->flags & XC_FLAGS_HAVE_FXC))
4359     v2sigmatau[3] = 0.0e0;
4360 
4361   if(v2rho2 != NULL && (p->info->flags & XC_FLAGS_HAVE_FXC))
4362     v2sigmatau[4] = 0.0e0;
4363 
4364   t1214 = 0.94766674172839506173e-2 * t1141 - 0.19120987654320987654e-1 * t1144;
4365   t1215 = t25 * t1214;
4366   t1219 = t976 * t302;
4367   t1235 = t994 * t1168;
4368   t1238 = -0.35409739445157315668e-1 * t772 * t980 * t292 + 0.16615495624729559964e1 * t777 * t1157 * t374 + 0.70819478890314631335e-1 * t54 * t236 * t1214 + 0.16615495624729559964e1 * t240 * t61 * t1214 * t247 - 0.76217237139506171188e1 * t659 * t1235;
4369   t1239 = t234 * t1238;
4370   t1241 = 0.2e1 * t104 * t1219 - t104 * t1239 + t1215 * t115 - t293 * t385 - t375 * t303;
4371   t1242 = t286 * t1241;
4372   if(v2rho2 != NULL && (p->info->flags & XC_FLAGS_HAVE_FXC))
4373     v2sigmatau[5] = -0.3e1 / 0.8e1 * t262 * t1242;
4374 
4375   t1246 = 0.1e1 / t26 / t141;
4376   t1249 = t441 * t1246 * t443 * t446;
4377   t1252 = t152 * t1246 * t451;
4378   t1254 = -0.47383337086419753086e-2 * t1249 + 0.95604938271604938271e-2 * t1252;
4379   t1255 = t25 * t1254;
4380   t1259 = t324 * t324;
4381   t1260 = t462 * t1259;
4382   t1263 = t314 * t314;
4383   t1278 = t1263 * t492;
4384   t1282 = -0.35409739445157315668e-1 * t54 * t469 * t1263 + 0.16615495624729559964e1 * t474 * t61 * t1263 * t179 + 0.70819478890314631335e-1 * t54 * t162 * t1254 + 0.16615495624729559964e1 * t167 * t61 * t1254 * t179 - 0.76217237139506171188e1 * t490 * t1278 * t62;
4385   t1283 = t160 * t1282;
4386   t1285 = t1255 * t71 + 0.2e1 * t52 * t1260 - t52 * t1283 - 0.2e1 * t315 * t325;
4387   t1286 = t263 * t1285;
4388   if(v2rho2 != NULL && (p->info->flags & XC_FLAGS_NEEDS_LAPLACIAN) && (p->info->flags & XC_FLAGS_HAVE_FXC))
4389     v2lapl2[0] = -0.3e1 / 0.8e1 * t262 * t1286;
4390 
4391   if(v2rho2 != NULL && (p->info->flags & XC_FLAGS_NEEDS_LAPLACIAN) && (p->info->flags & XC_FLAGS_HAVE_FXC))
4392     v2lapl2[1] = 0.0e0;
4393 
4394   t1290 = 0.1e1 / t81 / t215;
4395   t1293 = t617 * t1290 * t443 * t446;
4396   t1296 = t226 * t1290 * t451;
4397   t1298 = -0.47383337086419753086e-2 * t1293 + 0.95604938271604938271e-2 * t1296;
4398   t1299 = t25 * t1298;
4399   t1303 = t346 * t346;
4400   t1304 = t634 * t1303;
4401   t1307 = t336 * t336;
4402   t1322 = t1307 * t661;
4403   t1326 = -0.35409739445157315668e-1 * t54 * t641 * t1307 + 0.16615495624729559964e1 * t646 * t61 * t1307 * t247 + 0.70819478890314631335e-1 * t54 * t236 * t1298 + 0.16615495624729559964e1 * t240 * t61 * t1298 * t247 - 0.76217237139506171188e1 * t659 * t1322 * t106;
4404   t1327 = t234 * t1326;
4405   t1329 = 0.2e1 * t104 * t1304 - t104 * t1327 + t1299 * t115 - 0.2e1 * t337 * t347;
4406   t1330 = t286 * t1329;
4407   if(v2rho2 != NULL && (p->info->flags & XC_FLAGS_NEEDS_LAPLACIAN) && (p->info->flags & XC_FLAGS_HAVE_FXC))
4408     v2lapl2[2] = -0.3e1 / 0.8e1 * t262 * t1330;
4409 
4410   t1335 = 0.18953334834567901234e-1 * t1249 - 0.38241975308641975308e-1 * t1252;
4411   t1336 = t25 * t1335;
4412   t1340 = t923 * t324;
4413   t1346 = t314 * t179;
4414   t1357 = t62 * t314;
4415   t1358 = t941 * t1357;
4416   t1361 = -0.35409739445157315668e-1 * t705 * t927 * t314 + 0.16615495624729559964e1 * t710 * t1346 * t355 + 0.70819478890314631335e-1 * t54 * t162 * t1335 + 0.16615495624729559964e1 * t167 * t61 * t1335 * t179 - 0.76217237139506171188e1 * t490 * t1358;
4417   t1362 = t160 * t1361;
4418   t1364 = t1336 * t71 + 0.2e1 * t52 * t1340 - t52 * t1362 - t315 * t366 - t356 * t325;
4419   t1365 = t263 * t1364;
4420   if(v2rho2 != NULL && (p->info->flags & XC_FLAGS_NEEDS_LAPLACIAN) && (p->info->flags & XC_FLAGS_HAVE_FXC))
4421     v2lapltau[0] = -0.3e1 / 0.8e1 * t262 * t1365;
4422 
4423   if(v2rho2 != NULL && (p->info->flags & XC_FLAGS_NEEDS_LAPLACIAN) && (p->info->flags & XC_FLAGS_HAVE_FXC))
4424     v2lapltau[1] = 0.0e0;
4425 
4426   if(v2rho2 != NULL && (p->info->flags & XC_FLAGS_NEEDS_LAPLACIAN) && (p->info->flags & XC_FLAGS_HAVE_FXC))
4427     v2lapltau[2] = 0.0e0;
4428 
4429   t1370 = 0.18953334834567901234e-1 * t1293 - 0.38241975308641975308e-1 * t1296;
4430   t1371 = t25 * t1370;
4431   t1375 = t976 * t346;
4432   t1381 = t336 * t247;
4433   t1392 = t106 * t336;
4434   t1393 = t994 * t1392;
4435   t1396 = -0.35409739445157315668e-1 * t772 * t980 * t336 + 0.16615495624729559964e1 * t777 * t1381 * t374 + 0.70819478890314631335e-1 * t54 * t236 * t1370 + 0.16615495624729559964e1 * t240 * t61 * t1370 * t247 - 0.76217237139506171188e1 * t659 * t1393;
4436   t1397 = t234 * t1396;
4437   t1399 = 0.2e1 * t104 * t1375 - t104 * t1397 + t1371 * t115 - t337 * t385 - t375 * t347;
4438   t1400 = t286 * t1399;
4439   if(v2rho2 != NULL && (p->info->flags & XC_FLAGS_NEEDS_LAPLACIAN) && (p->info->flags & XC_FLAGS_HAVE_FXC))
4440     v2lapltau[3] = -0.3e1 / 0.8e1 * t262 * t1400;
4441 
4442   t1405 = -0.75813339338271604937e-1 * t1249 + 0.15296790123456790123e0 * t1252;
4443   t1406 = t25 * t1405;
4444   t1410 = t365 * t365;
4445   t1411 = t462 * t1410;
4446   t1414 = t355 * t355;
4447   t1429 = t1414 * t492;
4448   t1433 = -0.35409739445157315668e-1 * t54 * t469 * t1414 + 0.16615495624729559964e1 * t474 * t61 * t1414 * t179 + 0.70819478890314631335e-1 * t54 * t162 * t1405 + 0.16615495624729559964e1 * t167 * t61 * t1405 * t179 - 0.76217237139506171188e1 * t490 * t1429 * t62;
4449   t1434 = t160 * t1433;
4450   t1436 = t1406 * t71 + 0.2e1 * t52 * t1411 - t52 * t1434 - 0.2e1 * t356 * t366;
4451   t1437 = t263 * t1436;
4452   if(v2rho2 != NULL && (p->info->flags & XC_FLAGS_HAVE_FXC))
4453     v2tau2[0] = -0.3e1 / 0.8e1 * t262 * t1437;
4454 
4455   if(v2rho2 != NULL && (p->info->flags & XC_FLAGS_HAVE_FXC))
4456     v2tau2[1] = 0.0e0;
4457 
4458   t1442 = -0.75813339338271604937e-1 * t1293 + 0.15296790123456790123e0 * t1296;
4459   t1443 = t25 * t1442;
4460   t1447 = t384 * t384;
4461   t1448 = t634 * t1447;
4462   t1451 = t374 * t374;
4463   t1466 = t1451 * t661;
4464   t1470 = -0.35409739445157315668e-1 * t54 * t641 * t1451 + 0.16615495624729559964e1 * t646 * t61 * t1451 * t247 + 0.70819478890314631335e-1 * t54 * t236 * t1442 + 0.16615495624729559964e1 * t240 * t61 * t1442 * t247 - 0.76217237139506171188e1 * t659 * t1466 * t106;
4465   t1471 = t234 * t1470;
4466   t1473 = 0.2e1 * t104 * t1448 - t104 * t1471 + t1443 * t115 - 0.2e1 * t375 * t385;
4467   t1474 = t286 * t1473;
4468   if(v2rho2 != NULL && (p->info->flags & XC_FLAGS_HAVE_FXC))
4469     v2tau2[2] = -0.3e1 / 0.8e1 * t262 * t1474;
4470 
4471 #ifndef XC_DONT_COMPILE_KXC
4472 
4473   if(order < 3) return;
4474 
4475 
4476   t1478 = t8 * t512 * t517;
4477   t1480 = t124 * t124;
4478   t1481 = 0.1e1 / t1480;
4479   t1482 = t9 * t1481;
4480   t1484 = -0.3e1 * t410 + 0.3e1 * t1482;
4481   t1485 = t117 * t1484;
4482   t1487 = t8 * t190 * t1485;
4483   t1488 = t1487 / 0.2e1;
4484   t1489 = t79 * t542;
4485   t1491 = t8 * t1489 * t117;
4486   t1492 = 0.5e1 / 0.36e2 * t1491;
4487   t1493 = t186 * t412;
4488   t1495 = t8 * t123 * t1493;
4489   t1496 = 0.3e1 / 0.2e1 * t1495;
4490   t1497 = -t1484;
4491   t1498 = t73 * t1497;
4492   t1500 = t8 * t123 * t1498;
4493   t1501 = t1500 / 0.2e1;
4494   t1502 = t16 * t542;
4495   t1504 = t8 * t1502 * t73;
4496   t1505 = 0.5e1 / 0.36e2 * t1504;
4497   t1506 = t186 * t397;
4498   t1508 = t8 * t396 * t1506;
4499   t1509 = t1508 / 0.2e1;
4500   t1511 = t8 * t402 * t406;
4501   t1513 = t8 * t402 * t413;
4502   t1515 = t500 * t128;
4503   t1517 = t8 * t123 * t1515;
4504   t1518 = 0.3e1 / 0.2e1 * t1517;
4505   t1523 = 0.1e1 / t27 / t1005;
4506   t1528 = -0.440e3 / 0.27e2 * tau[0] * t430 + 0.154e3 / 0.27e2 * sigma[0] * t1523 + 0.110e3 / 0.27e2 * lapl[0] * t430;
4507   t1530 = t1528 * t39 * t42;
4508   t1532 = t49 * t49;
4509   t1534 = 0.1e1 / t50 / t1532;
4510   t1536 = t1534 * t47 * t46;
4511   t1537 = t442 * t148;
4512   t1540 = t440 * t46;
4513   t1541 = t21 * t21;
4514   t1542 = 0.1e1 / t1541;
4515   t1546 = t441 * t148;
4516   t1547 = t451 * t435;
4517   t1550 = t440 * t1537;
4518   t1557 = -0.39111111111111111111e0 * t1530 - 0.38573713798808385273e-2 * t1536 * t1537 + 0.50542226225514403291e0 * t1540 * t1537 * t1542 - 0.22744001801481481481e0 * t1546 * t1547 + 0.25943279877168604506e-2 * t1550 * t46 + 0.45890370370370370369e0 * t690 * t1547 - 0.27534222222222222222e0 * t153 * t1530;
4519   t1558 = t25 * t1557;
4520   t1566 = t159 * t159;
4521   t1567 = 0.1e1 / t1566;
4522   t1568 = t463 * t183;
4523   t1569 = t1567 * t1568;
4524   t1572 = t462 * t183;
4525   t1573 = t1572 * t497;
4526   t1576 = t51 * t51;
4527   t1578 = 0.1e1 / t55 / t1576;
4528   t1579 = t1578 * t66;
4529   t1580 = t470 * t156;
4530   t1584 = t166 * t468;
4531   t1589 = t66 * t156;
4532   t1596 = t487 * t161;
4533   t1597 = t1596 * t489;
4534   t1598 = t1580 * t492;
4535   t1609 = t456 * t492;
4536   t1614 = 0.1e1 / t486 / t170;
4537   t1615 = t1614 * t55;
4538   t1616 = t172 * t172;
4539   t1617 = t1616 * t61;
4540   t1618 = t1615 * t1617;
4541   t1619 = t177 * t177;
4542   t1621 = 0.1e1 / t178 / t1619;
4543   t1622 = t1580 * t1621;
4544   t1630 = 0.53114609167735973502e-1 * t54 * t1579 * t1580 - 0.12461621718547169973e1 * t1584 * t61 * t1580 * t179 - 0.10622921833547194700e0 * t705 * t1589 * t456 + 0.49846486874188679892e1 * t710 * t711 * t456 - 0.11432585570925925678e2 * t1597 * t1598 * t62 + 0.70819478890314631335e-1 * t54 * t162 * t1557 + 0.16615495624729559964e1 * t167 * t61 * t1557 * t179 - 0.22865171141851851357e2 * t490 * t1609 * t723 + 0.10488523547622316684e3 * t1618 * t1622 * t174 - 0.76217237139506171188e1 * t488 * t489 * t1580 * t492;
4545   t1631 = t160 * t1630;
4546   t1633 = t1558 * t71 - 0.6e1 * t52 * t1569 + 0.6e1 * t157 * t464 - 0.3e1 * t157 * t498 + 0.6e1 * t52 * t1573 - t52 * t1631 - 0.3e1 * t457 * t184;
4547   t1635 = t8 * t18 * t1633;
4548   t1636 = 0.3e1 / 0.8e1 * t1635;
4549   t1638 = t8 * t419 * t186;
4550   t1639 = t1638 / 0.4e1;
4551   t1641 = t8 * t135 * t500;
4552   t1644 = 0.1e1 / t504 / t77;
4553   t1645 = t1644 * t17;
4554   t1646 = t507 * t191;
4555   t1647 = t117 * t1646;
4556   t1649 = t8 * t1645 * t1647;
4557   t1650 = t1649 / 0.9e1;
4558   t1651 = t505 * t134;
4559   t1653 = t8 * t1651 * t508;
4560   t1655 = t191 * t516;
4561   t1657 = t551 * t552 * t1655;
4562   t1658 = t1657 / 0.2e1;
4563   t1659 = t78 * t418;
4564   t1661 = t8 * t1659 * t192;
4565   t1662 = t1661 / 0.3e1;
4566   t1663 = t128 * t412;
4567   t1665 = t528 * t529 * t1663;
4568   t1666 = t1665 / 0.2e1;
4569   t1667 = t15 * t418;
4570   t1669 = t8 * t1667 * t129;
4571   t1670 = t1669 / 0.3e1;
4572   t1672 = 0.1e1 / t394 / t14;
4573   t1673 = t1672 * t17;
4574   t1674 = t397 * t128;
4575   t1675 = t73 * t1674;
4576   t1677 = t8 * t1673 * t1675;
4577   t1678 = t1677 / 0.9e1;
4578   t1679 = t395 * t134;
4579   t1681 = t8 * t1679 * t398;
4580   t1683 = -t1636 + t1639 - 0.3e1 / 0.8e1 * t1641 + t1650 - t1653 / 0.6e1 - t1658 + t1662 - t1666 + t1670 + t1678 - t1681 / 0.6e1;
4581   t1689 = t421 / 0.4e1;
4582   t1691 = t523 / 0.4e1;
4583   if(v3rho3 != NULL && (p->info->flags & XC_FLAGS_HAVE_KXC))
4584     v3rho3[0] = t10 * (-t1478 / 0.2e1 - t1488 - t1492 - t1496 - t1501 - t1505 - t1509 - t1511 - t1513 / 0.2e1 - t1518 + t1683) - 0.3e1 / 0.4e1 * t424 - 0.9e1 / 0.8e1 * t502 - 0.3e1 / 0.2e1 * t415 + t1689 - 0.3e1 / 0.2e1 * t519 + t1691 - 0.3e1 * t408 - t400 / 0.2e1 - t404 - t510 / 0.2e1 - t514;
4585 
4586   t1696 = t8 * t543 * t73;
4587   t1699 = t8 * t521 * t254;
4588   t1702 = t8 * t560 * t117;
4589   t1706 = t7 * t1644;
4590   t1707 = t5 * t1706;
4591   t1708 = t208 * t507;
4592   t1710 = t1707 * t552 * t1708;
4593   t1712 = t134 * t117;
4594   t1714 = t551 * t1712 * t553;
4595   t1715 = t1714 / 0.9e1;
4596   t1716 = t7 * t1672;
4597   t1717 = t5 * t1716;
4598   t1718 = t203 * t397;
4599   t1720 = t1717 * t529 * t1718;
4600   t1722 = t134 * t73;
4601   t1724 = t528 * t1722 * t530;
4602   t1725 = t1724 / 0.9e1;
4603   t1726 = t542 * t73;
4604   t1727 = t9 * t128;
4605   t1729 = t528 * t1726 * t1727;
4606   t1731 = t208 * t516;
4607   t1733 = t551 * t552 * t1731;
4608   t1735 = t542 * t117;
4609   t1736 = t9 * t191;
4610   t1738 = t551 * t1735 * t1736;
4611   t1740 = t17 * t186;
4612   t1742 = t528 * t1740 * t530;
4613   t1744 = t203 * t412;
4614   t1746 = t528 * t529 * t1744;
4615   t1748 = -t1696 / 0.2e1 + t1699 / 0.12e2 + t1702 / 0.2e1 + t1638 / 0.6e1 - t1641 / 0.8e1 - t1492 - t1505 + t1710 / 0.9e1 - t1715 + t1720 / 0.9e1 - t1725 - t1729 / 0.3e1 - t1733 / 0.6e1 + t1738 / 0.3e1 - t1742 / 0.3e1 - t1746 / 0.6e1;
4616   t1750 = 0.1e1 / t133 / t409;
4617   t1751 = t78 * t1750;
4618   t1753 = t8 * t1751 * t561;
4619   t1755 = t254 * t516;
4620   t1757 = t8 * t190 * t1755;
4621   t1760 = t8 * t402 * t537;
4622   t1761 = t1760 / 0.3e1;
4623   t1762 = t500 * t203;
4624   t1764 = t8 * t123 * t1762;
4625   t1766 = t254 * t507;
4626   t1768 = t8 * t506 * t1766;
4627   t1771 = t8 * t512 * t566;
4628   t1772 = t1771 / 0.3e1;
4629   t1774 = t8 * t1659 * t209;
4630   t1777 = t8 * t1667 * t204;
4631   t1779 = t15 * t1750;
4632   t1781 = t8 * t1779 * t544;
4633   t1783 = t186 * t9;
4634   t1785 = t8 * t543 * t1783;
4635   t1793 = -0.7e1 / 0.6e1 * t1753 - t1757 / 0.2e1 - t1761 - t1764 / 0.2e1 - t1768 / 0.6e1 - t1772 + t1774 / 0.9e1 + t1777 / 0.9e1 + 0.7e1 / 0.6e1 * t1781 - t1785 - t1653 / 0.18e2 + 0.2e1 / 0.9e1 * t1661 + 0.2e1 / 0.9e1 * t1669 - t1681 / 0.18e2 - t1478 / 0.6e1 - t1511 / 0.3e1 - t1513 / 0.6e1;
4636   t1800 = t532 / 0.3e1;
4637   t1801 = t555 / 0.3e1;
4638   t1802 = t1691 - t408 - t401 - 0.2e1 / 0.3e1 * t404 - t511 - 0.2e1 / 0.3e1 * t514 - t1800 - t581 - t546 - t1801 - t592;
4639   if(v3rho3 != NULL && (p->info->flags & XC_FLAGS_HAVE_KXC))
4640     v3rho3[1] = t10 * (t1748 + t1793) - t424 / 0.2e1 - t503 - t568 - t601 - t539 + t563 - t416 + t1689 - t520 + t1802;
4641 
4642   t1804 = t8 * t196 * t669;
4643   t1808 = t587 * t191;
4644   t1810 = t1707 * t552 * t1808;
4645   t1812 = t208 * t9;
4646   t1814 = t551 * t1735 * t1812;
4647   t1816 = t17 * t254;
4648   t1818 = t551 * t1816 * t553;
4649   t1820 = t576 * t128;
4650   t1822 = t1717 * t529 * t1820;
4651   t1824 = t203 * t9;
4652   t1826 = t528 * t1726 * t1824;
4653   t1828 = t596 * t191;
4654   t1830 = t551 * t552 * t1828;
4655   t1832 = t582 * t128;
4656   t1834 = t528 * t529 * t1832;
4657   t1837 = t8 * t512 * t593;
4658   t1840 = t410 + 0.3e1 * t1482;
4659   t1841 = t117 * t1840;
4660   t1843 = t8 * t190 * t1841;
4661   t1845 = -t1804 / 0.8e1 + t1699 / 0.6e1 + t1638 / 0.12e2 - t1492 - t1505 + t1810 / 0.9e1 + t1814 / 0.3e1 - t1818 / 0.3e1 + t1822 / 0.9e1 - t1826 / 0.3e1 - t1715 - t1725 - t1830 / 0.6e1 - t1834 / 0.6e1 - t1837 / 0.3e1 - t1843 / 0.2e1;
4662   t1846 = t669 * t191;
4663   t1848 = t8 * t190 * t1846;
4664   t1850 = t186 * t576;
4665   t1852 = t8 * t396 * t1850;
4666   t1854 = t186 * t582;
4667   t1856 = t8 * t123 * t1854;
4668   t1858 = -t1840;
4669   t1859 = t73 * t1858;
4670   t1861 = t8 * t123 * t1859;
4671   t1863 = t254 * t9;
4672   t1865 = t8 * t560 * t1863;
4673   t1867 = t8 * t1679 * t577;
4674   t1870 = t8 * t512 * t597;
4675   t1873 = t8 * t402 * t583;
4676   t1876 = t8 * t1651 * t588;
4677   t1884 = -t1848 / 0.2e1 - t1852 / 0.6e1 - t1856 / 0.2e1 - t1861 / 0.2e1 + t1865 - t1867 / 0.18e2 - t1870 / 0.6e1 - t1873 / 0.6e1 - t1876 / 0.18e2 + t1753 / 0.3e1 - t1761 - t1772 + 0.2e1 / 0.9e1 * t1774 + 0.2e1 / 0.9e1 * t1777 - t1781 / 0.3e1 + t1661 / 0.9e1 + t1669 / 0.9e1;
4678   t1891 = t1689 + t1691 - t405 - t515 - t1800 - 0.2e1 / 0.3e1 * t535 - t546 - t1801 - 0.2e1 / 0.3e1 * t558 - t580 - t591;
4679   if(v3rho3 != NULL && (p->info->flags & XC_FLAGS_HAVE_KXC))
4680     v3rho3[2] = t10 * (t1845 + t1884) - t672 - t425 - t595 - t600 - t568 - t571 / 0.2e1 - t586 - t539 + t563 + t1891;
4681 
4682   t1895 = 0.1e1 / t82 / t1050;
4683   t1900 = -0.440e3 / 0.27e2 * tau[1] * t606 + 0.154e3 / 0.27e2 * sigma[2] * t1895 + 0.110e3 / 0.27e2 * lapl[1] * t606;
4684   t1902 = t1900 * t39 * t42;
4685   t1904 = t101 * t101;
4686   t1906 = 0.1e1 / t102 / t1904;
4687   t1908 = t1906 * t99 * t98;
4688   t1909 = t618 * t222;
4689   t1912 = t616 * t98;
4690   t1916 = t617 * t222;
4691   t1917 = t451 * t611;
4692   t1920 = t616 * t1909;
4693   t1927 = -0.39111111111111111111e0 * t1902 - 0.38573713798808385273e-2 * t1908 * t1909 + 0.50542226225514403291e0 * t1912 * t1909 * t1542 - 0.22744001801481481481e0 * t1916 * t1917 + 0.25943279877168604506e-2 * t1920 * t98 + 0.45890370370370370369e0 * t757 * t1917 - 0.27534222222222222222e0 * t227 * t1902;
4694   t1928 = t25 * t1927;
4695   t1936 = t233 * t233;
4696   t1937 = 0.1e1 / t1936;
4697   t1938 = t635 * t251;
4698   t1939 = t1937 * t1938;
4699   t1942 = t634 * t251;
4700   t1943 = t1942 * t666;
4701   t1946 = t103 * t103;
4702   t1948 = 0.1e1 / t105 / t1946;
4703   t1949 = t1948 * t110;
4704   t1950 = t642 * t230;
4705   t1954 = t166 * t640;
4706   t1959 = t110 * t230;
4707   t1966 = t487 * t235;
4708   t1967 = t1966 * t489;
4709   t1968 = t1950 * t661;
4710   t1979 = t628 * t661;
4711   t1983 = t1614 * t105;
4712   t1984 = t1983 * t1617;
4713   t1985 = t245 * t245;
4714   t1987 = 0.1e1 / t246 / t1985;
4715   t1988 = t1950 * t1987;
4716   t1996 = 0.53114609167735973502e-1 * t54 * t1949 * t1950 - 0.12461621718547169973e1 * t1954 * t61 * t1950 * t247 - 0.10622921833547194700e0 * t772 * t1959 * t628 + 0.49846486874188679892e1 * t777 * t778 * t628 - 0.11432585570925925678e2 * t1967 * t1968 * t106 + 0.70819478890314631335e-1 * t54 * t236 * t1927 + 0.16615495624729559964e1 * t240 * t61 * t1927 * t247 - 0.22865171141851851357e2 * t659 * t1979 * t790 + 0.10488523547622316684e3 * t1984 * t1988 * t242 - 0.76217237139506171188e1 * t658 * t489 * t1950 * t661;
4717   t1997 = t234 * t1996;
4718   t1999 = -0.6e1 * t104 * t1939 + 0.6e1 * t104 * t1943 - t104 * t1997 + t1928 * t115 + 0.6e1 * t231 * t636 - 0.3e1 * t231 * t667 - 0.3e1 * t629 * t252;
4719   t2001 = t8 * t80 * t1999;
4720   t2002 = 0.3e1 / 0.8e1 * t2001;
4721   t2004 = -0.3e1 * t410 - 0.3e1 * t1482;
4722   t2005 = t73 * t2004;
4723   t2007 = t8 * t123 * t2005;
4724   t2008 = t2007 / 0.2e1;
4725   t2009 = t254 * t587;
4726   t2011 = t8 * t506 * t2009;
4727   t2012 = t2011 / 0.2e1;
4728   t2013 = t669 * t208;
4729   t2015 = t8 * t190 * t2013;
4730   t2016 = 0.3e1 / 0.2e1 * t2015;
4731   t2017 = t254 * t596;
4732   t2019 = t8 * t190 * t2017;
4733   t2020 = 0.3e1 / 0.2e1 * t2019;
4734   t2021 = -t2004;
4735   t2022 = t117 * t2021;
4736   t2024 = t8 * t190 * t2022;
4737   t2025 = t2024 / 0.2e1;
4738   t2026 = t576 * t203;
4739   t2027 = t73 * t2026;
4740   t2029 = t8 * t1673 * t2027;
4741   t2030 = t2029 / 0.9e1;
4742   t2031 = t203 * t582;
4743   t2033 = t528 * t529 * t2031;
4744   t2034 = t2033 / 0.2e1;
4745   t2035 = t587 * t208;
4746   t2036 = t117 * t2035;
4747   t2038 = t8 * t1645 * t2036;
4748   t2039 = t2038 / 0.9e1;
4749   t2040 = t208 * t596;
4750   t2042 = t551 * t552 * t2040;
4751   t2043 = t2042 / 0.2e1;
4752   t2049 = t1699 / 0.4e1;
4753   t2051 = t1774 / 0.3e1;
4754   t2052 = t1777 / 0.3e1;
4755   t2053 = -t1870 / 0.2e1 - t1873 / 0.2e1 - t1876 / 0.6e1 - t1837 - 0.3e1 / 0.8e1 * t1804 + t2049 - t1492 - t1505 - t1867 / 0.6e1 + t2051 + t2052;
4756   if(v3rho3 != NULL && (p->info->flags & XC_FLAGS_HAVE_KXC))
4757     v3rho3[3] = t10 * (-t2002 - t2008 - t2012 - t2016 - t2020 - t2025 + t2030 - t2034 + t2039 - t2043 + t2053) - 0.9e1 / 0.8e1 * t671 - 0.3e1 * t595 - 0.3e1 / 0.2e1 * t599 - 0.3e1 / 0.4e1 * t571 - 0.3e1 / 0.2e1 * t585 + t1689 + t1691 - t535 - t558 - t579 / 0.2e1 - t590 / 0.2e1;
4758 
4759   t2064 = t8 * t123 * t679;
4760   t2068 = t8 * t135 * t282 / 0.6e1;
4761   t2070 = t8 * t18 * t730;
4762   t2071 = t282 * t397;
4763   t2075 = t730 * t128;
4764   t2078 = t282 * t412;
4765   t2083 = t430 * t39 * t42;
4766   t2086 = t1536 * t33 * t442;
4767   t2090 = t1540 * t33 * t1542 * t442;
4768   t2092 = t441 * t143;
4769   t2093 = t2092 * t687;
4770   t2095 = t686 * t1547;
4771   t2097 = t440 * t442;
4772   t2098 = t33 * t46;
4773   t2099 = t2097 * t2098;
4774   t2101 = t152 * t435;
4775   t2102 = t2101 * t691;
4776   t2104 = t451 * t143;
4777   t2105 = t690 * t2104;
4778   t2107 = t153 * t2083;
4779   t2109 = 0.47802469135802469136e0 * t2083 + 0.48217142248510481592e-3 * t2086 - 0.63177782781893004115e-1 * t2090 - 0.50542226225514403292e-1 * t2093 + 0.94766674172839506173e-2 * t2095 - 0.32429099846460755633e-3 * t2099 - 0.19120987654320987654e-1 * t2102 + 0.10197860082304526749e0 * t2105 + 0.33652938271604938272e0 * t2107;
4780   t2110 = t25 * t2109;
4781   t2123 = t1567 * t279 * t463;
4782   t2126 = t462 * t727;
4783   t2127 = t2126 * t183;
4784   t2130 = t701 * t497;
4785   t2133 = t54 * t1578;
4786   t2137 = t1584 * t61;
4787   t2138 = t470 * t179;
4788   t2142 = t66 * t696;
4789   t2149 = t456 * t179;
4790   t2166 = t696 * t492;
4791   t2167 = t2166 * t723;
4792   t2170 = t269 * t1621;
4793   t2171 = t174 * t470;
4794   t2178 = t62 * t456;
4795   t2182 = 0.53114609167735973502e-1 * t2133 * t706 * t470 - 0.12461621718547169973e1 * t2137 * t2138 * t269 - 0.70819478890314631336e-1 * t705 * t2142 * t156 - 0.35409739445157315668e-1 * t705 * t706 * t456 + 0.16615495624729559964e1 * t710 * t2149 * t269 - 0.11432585570925925678e2 * t1597 * t493 * t1126 + 0.33230991249459119928e1 * t710 * t711 * t696 + 0.70819478890314631335e-1 * t54 * t162 * t2109 + 0.16615495624729559964e1 * t167 * t61 * t2109 * t179 - 0.15243447427901234238e2 * t490 * t2167 + 0.10488523547622316684e3 * t1618 * t2170 * t2171 - 0.76217237139506171188e1 * t490 * t722 * t470 - 0.76217237139506171188e1 * t490 * t722 * t2178;
4796   t2183 = t160 * t2182;
4797   t2185 = 0.4e1 * t157 * t702 - 0.2e1 * t157 * t728 - 0.2e1 * t697 * t184 + t2110 * t71 - 0.6e1 * t52 * t2123 + 0.4e1 * t52 * t2127 + 0.2e1 * t52 * t2130 - t52 * t2183 + 0.2e1 * t270 * t464 - t270 * t498 - t457 * t280;
4798   if(v3rho3 != NULL && (p->info->flags & XC_FLAGS_HAVE_KXC))
4799     v3rho2sigma[0] = -0.4e1 / 0.3e1 * t2064 - t2068 - t2070 - t262 * t527 * t2071 / 0.6e1 - t262 * t678 * t2075 - t262 * t678 * t2078 / 0.2e1 - 0.3e1 / 0.8e1 * t262 * t263 * t2185;
4800 
4801   if(v3rho3 != NULL && (p->info->flags & XC_FLAGS_HAVE_KXC))
4802     v3rho2sigma[1] = 0.0e0;
4803 
4804   t2190 = t8 * t190 * t737;
4805   t2194 = t8 * t196 * t305 / 0.6e1;
4806   t2195 = t305 * t507;
4807   t2199 = t305 * t516;
4808   if(v3rho3 != NULL && (p->info->flags & XC_FLAGS_HAVE_KXC))
4809     v3rho2sigma[2] = -0.4e1 / 0.3e1 * t2190 - t2194 - t262 * t550 * t2195 / 0.6e1 - t262 * t736 * t2199 / 0.2e1;
4810 
4811   t2205 = t17 * t2;
4812   t2206 = t2205 * t4;
4813   t2207 = t2206 * t742;
4814   t2209 = t4 * t7;
4815   t2210 = t261 * t2209;
4816   t2211 = t395 * t282;
4817   t2212 = t2211 * t530;
4818   t2216 = t678 * t730 * t203;
4819   t2219 = t418 * t2;
4820   t2220 = t2219 * t4;
4821   t2222 = t678 * t282 * t9;
4822   if(v3rho3 != NULL && (p->info->flags & XC_FLAGS_HAVE_KXC))
4823     v3rho2sigma[3] = -0.2e1 / 0.3e1 * t2064 - t2068 - t2070 / 0.2e1 - 0.2e1 / 0.3e1 * t2207 - t2210 * t2212 / 0.6e1 - t262 * t2216 / 0.2e1 - t2220 * t2222 / 0.2e1;
4824 
4825   if(v3rho3 != NULL && (p->info->flags & XC_FLAGS_HAVE_KXC))
4826     v3rho2sigma[4] = 0.0e0;
4827 
4828   t2226 = t2206 * t747;
4829   t2228 = t505 * t305;
4830   t2229 = t2228 * t553;
4831   t2233 = t736 * t305 * t9;
4832   t2236 = t2206 * t798;
4833   t2239 = t736 * t797 * t191;
4834   if(v3rho3 != NULL && (p->info->flags & XC_FLAGS_HAVE_KXC))
4835     v3rho2sigma[5] = -0.2e1 / 0.3e1 * t2190 - t2194 - 0.2e1 / 0.3e1 * t2226 - t2210 * t2229 / 0.6e1 + t2220 * t2233 / 0.2e1 - t2236 / 0.2e1 - t262 * t2239 / 0.2e1;
4836 
4837   t2244 = t527 * t282 * t576;
4838   t2248 = t678 * t282 * t582;
4839   if(v3rho3 != NULL && (p->info->flags & XC_FLAGS_HAVE_KXC))
4840     v3rho2sigma[6] = -0.4e1 / 0.3e1 * t2207 - t2068 - t262 * t2244 / 0.6e1 - t262 * t2248 / 0.2e1;
4841 
4842   if(v3rho3 != NULL && (p->info->flags & XC_FLAGS_HAVE_KXC))
4843     v3rho2sigma[7] = 0.0e0;
4844 
4845   t2253 = t550 * t305 * t587;
4846   t2257 = t736 * t797 * t208;
4847   t2260 = t736 * t305 * t596;
4848   t2264 = t606 * t39 * t42;
4849   t2267 = t1908 * t88 * t618;
4850   t2271 = t1912 * t88 * t1542 * t618;
4851   t2273 = t617 * t217;
4852   t2274 = t2273 * t754;
4853   t2276 = t753 * t1917;
4854   t2278 = t616 * t618;
4855   t2279 = t88 * t98;
4856   t2280 = t2278 * t2279;
4857   t2282 = t226 * t611;
4858   t2283 = t2282 * t758;
4859   t2285 = t451 * t217;
4860   t2286 = t757 * t2285;
4861   t2288 = t227 * t2264;
4862   t2290 = 0.47802469135802469136e0 * t2264 + 0.48217142248510481592e-3 * t2267 - 0.63177782781893004115e-1 * t2271 - 0.50542226225514403292e-1 * t2274 + 0.94766674172839506173e-2 * t2276 - 0.32429099846460755633e-3 * t2280 - 0.19120987654320987654e-1 * t2283 + 0.10197860082304526749e0 * t2286 + 0.33652938271604938272e0 * t2288;
4863   t2291 = t25 * t2290;
4864   t2304 = t1937 * t302 * t635;
4865   t2307 = t634 * t794;
4866   t2308 = t2307 * t251;
4867   t2311 = t768 * t666;
4868   t2314 = t54 * t1948;
4869   t2318 = t1954 * t61;
4870   t2319 = t642 * t247;
4871   t2323 = t110 * t763;
4872   t2330 = t628 * t247;
4873   t2347 = t763 * t661;
4874   t2348 = t2347 * t790;
4875   t2351 = t292 * t1987;
4876   t2352 = t242 * t642;
4877   t2359 = t106 * t628;
4878   t2363 = 0.53114609167735973502e-1 * t2314 * t773 * t642 - 0.12461621718547169973e1 * t2318 * t2319 * t292 - 0.70819478890314631336e-1 * t772 * t2323 * t230 - 0.35409739445157315668e-1 * t772 * t773 * t628 + 0.16615495624729559964e1 * t777 * t2330 * t292 - 0.11432585570925925678e2 * t1967 * t662 * t1168 + 0.33230991249459119928e1 * t777 * t778 * t763 + 0.70819478890314631335e-1 * t54 * t236 * t2290 + 0.16615495624729559964e1 * t240 * t61 * t2290 * t247 - 0.15243447427901234238e2 * t659 * t2348 + 0.10488523547622316684e3 * t1984 * t2351 * t2352 - 0.76217237139506171188e1 * t659 * t789 * t642 - 0.76217237139506171188e1 * t659 * t789 * t2359;
4879   t2364 = t234 * t2363;
4880   t2366 = -0.6e1 * t104 * t2304 + 0.4e1 * t104 * t2308 + 0.2e1 * t104 * t2311 - t104 * t2364 + t2291 * t115 + 0.4e1 * t231 * t769 - 0.2e1 * t231 * t795 - 0.2e1 * t764 * t252 + 0.2e1 * t293 * t636 - t293 * t667 - t629 * t303;
4881   t2367 = t286 * t2366;
4882   if(v3rho3 != NULL && (p->info->flags & XC_FLAGS_HAVE_KXC))
4883     v3rho2sigma[8] = -0.4e1 / 0.3e1 * t2226 - t2194 - t2236 - t262 * t2253 / 0.6e1 - t262 * t2257 - t262 * t2260 / 0.2e1 - 0.3e1 / 0.8e1 * t262 * t2367;
4884 
4885   t2371 = t8 * t123 * t804;
4886   t2375 = t8 * t135 * t327 / 0.6e1;
4887   t2377 = t8 * t18 * t846;
4888   t2378 = t327 * t397;
4889   t2382 = t846 * t128;
4890   t2385 = t327 * t412;
4891   t2391 = t1536 * t29 * t442;
4892   t2395 = t1540 * t29 * t1542 * t442;
4893   t2398 = t809 * t1547;
4894   t2400 = t29 * t46;
4895   t2401 = t2097 * t2400;
4896   t2403 = t2101 * t812;
4897   t2407 = 0.43456790123456790123e0 * t684 + 0.96434284497020963181e-3 * t2391 - 0.12635556556378600823e0 * t2395 - 0.63177782781893004115e-1 * t688 + 0.18953334834567901234e-1 * t2398 - 0.64858199692921511265e-3 * t2401 - 0.38241975308641975308e-1 * t2403 + 0.12747325102880658436e0 * t692 + 0.30593580246913580248e0 * t694;
4898   t2408 = t25 * t2407;
4899   t2420 = t1567 * t324;
4900   t2421 = t2420 * t463;
4901   t2424 = t462 * t843;
4902   t2425 = t2424 * t183;
4903   t2428 = t821 * t497;
4904   t2437 = t66 * t816;
4905   t2460 = t816 * t492;
4906   t2461 = t2460 * t723;
4907   t2464 = t314 * t1621;
4908   t2465 = t2464 * t2171;
4909   t2471 = t839 * t2178;
4910   t2474 = 0.53114609167735973502e-1 * t2133 * t825 * t470 - 0.12461621718547169973e1 * t2137 * t2138 * t314 - 0.70819478890314631336e-1 * t705 * t2437 * t156 - 0.35409739445157315668e-1 * t705 * t825 * t456 + 0.16615495624729559964e1 * t710 * t2149 * t314 - 0.11432585570925925678e2 * t1597 * t493 * t1357 + 0.33230991249459119928e1 * t710 * t711 * t816 + 0.70819478890314631335e-1 * t54 * t162 * t2407 + 0.16615495624729559964e1 * t167 * t61 * t2407 * t179 - 0.15243447427901234238e2 * t490 * t2461 + 0.10488523547622316684e3 * t1618 * t2465 - 0.76217237139506171188e1 * t490 * t839 * t470 - 0.76217237139506171188e1 * t490 * t2471;
4911   t2475 = t160 * t2474;
4912   t2477 = 0.4e1 * t157 * t822 - 0.2e1 * t157 * t844 - 0.2e1 * t817 * t184 + t2408 * t71 - 0.6e1 * t52 * t2421 + 0.4e1 * t52 * t2425 + 0.2e1 * t52 * t2428 - t52 * t2475 + 0.2e1 * t315 * t464 - t315 * t498 - t457 * t325;
4913   if(v3rho3 != NULL && (p->info->flags & XC_FLAGS_NEEDS_LAPLACIAN) && (p->info->flags & XC_FLAGS_HAVE_KXC))
4914     v3rho2lapl[0] = -0.4e1 / 0.3e1 * t2371 - t2375 - t2377 - t262 * t527 * t2378 / 0.6e1 - t262 * t678 * t2382 - t262 * t678 * t2385 / 0.2e1 - 0.3e1 / 0.8e1 * t262 * t263 * t2477;
4915 
4916   t2482 = t8 * t190 * t852;
4917   t2486 = t8 * t196 * t349 / 0.6e1;
4918   t2487 = t349 * t507;
4919   t2491 = t349 * t516;
4920   if(v3rho3 != NULL && (p->info->flags & XC_FLAGS_NEEDS_LAPLACIAN) && (p->info->flags & XC_FLAGS_HAVE_KXC))
4921     v3rho2lapl[1] = -0.4e1 / 0.3e1 * t2482 - t2486 - t262 * t550 * t2487 / 0.6e1 - t262 * t736 * t2491 / 0.2e1;
4922 
4923   t2497 = t2206 * t857;
4924   t2499 = t395 * t327;
4925   t2500 = t2499 * t530;
4926   t2504 = t678 * t846 * t203;
4927   t2508 = t678 * t327 * t9;
4928   if(v3rho3 != NULL && (p->info->flags & XC_FLAGS_NEEDS_LAPLACIAN) && (p->info->flags & XC_FLAGS_HAVE_KXC))
4929     v3rho2lapl[2] = -0.2e1 / 0.3e1 * t2371 - t2375 - t2377 / 0.2e1 - 0.2e1 / 0.3e1 * t2497 - t2210 * t2500 / 0.6e1 - t262 * t2504 / 0.2e1 - t2220 * t2508 / 0.2e1;
4930 
4931   t2512 = t2206 * t862;
4932   t2514 = t505 * t349;
4933   t2515 = t2514 * t553;
4934   t2519 = t736 * t349 * t9;
4935   t2522 = t2206 * t904;
4936   t2525 = t736 * t903 * t191;
4937   if(v3rho3 != NULL && (p->info->flags & XC_FLAGS_NEEDS_LAPLACIAN) && (p->info->flags & XC_FLAGS_HAVE_KXC))
4938     v3rho2lapl[3] = -0.2e1 / 0.3e1 * t2482 - t2486 - 0.2e1 / 0.3e1 * t2512 - t2210 * t2515 / 0.6e1 + t2220 * t2519 / 0.2e1 - t2522 / 0.2e1 - t262 * t2525 / 0.2e1;
4939 
4940   t2530 = t527 * t327 * t576;
4941   t2534 = t678 * t327 * t582;
4942   if(v3rho3 != NULL && (p->info->flags & XC_FLAGS_NEEDS_LAPLACIAN) && (p->info->flags & XC_FLAGS_HAVE_KXC))
4943     v3rho2lapl[4] = -0.4e1 / 0.3e1 * t2497 - t2375 - t262 * t2530 / 0.6e1 - t262 * t2534 / 0.2e1;
4944 
4945   t2539 = t550 * t349 * t587;
4946   t2543 = t736 * t903 * t208;
4947   t2546 = t736 * t349 * t596;
4948   t2551 = t1908 * t84 * t618;
4949   t2555 = t1912 * t84 * t1542 * t618;
4950   t2558 = t866 * t1917;
4951   t2560 = t84 * t98;
4952   t2561 = t2278 * t2560;
4953   t2563 = t2282 * t869;
4954   t2567 = 0.43456790123456790123e0 * t751 + 0.96434284497020963181e-3 * t2551 - 0.12635556556378600823e0 * t2555 - 0.63177782781893004115e-1 * t755 + 0.18953334834567901234e-1 * t2558 - 0.64858199692921511265e-3 * t2561 - 0.38241975308641975308e-1 * t2563 + 0.12747325102880658436e0 * t759 + 0.30593580246913580248e0 * t761;
4955   t2568 = t25 * t2567;
4956   t2580 = t1937 * t346;
4957   t2581 = t2580 * t635;
4958   t2584 = t634 * t900;
4959   t2585 = t2584 * t251;
4960   t2588 = t878 * t666;
4961   t2597 = t110 * t873;
4962   t2620 = t873 * t661;
4963   t2621 = t2620 * t790;
4964   t2624 = t336 * t1987;
4965   t2625 = t2624 * t2352;
4966   t2631 = t896 * t2359;
4967   t2634 = 0.53114609167735973502e-1 * t2314 * t882 * t642 - 0.12461621718547169973e1 * t2318 * t2319 * t336 - 0.70819478890314631336e-1 * t772 * t2597 * t230 - 0.35409739445157315668e-1 * t772 * t882 * t628 + 0.16615495624729559964e1 * t777 * t2330 * t336 - 0.11432585570925925678e2 * t1967 * t662 * t1392 + 0.33230991249459119928e1 * t777 * t778 * t873 + 0.70819478890314631335e-1 * t54 * t236 * t2567 + 0.16615495624729559964e1 * t240 * t61 * t2567 * t247 - 0.15243447427901234238e2 * t659 * t2621 + 0.10488523547622316684e3 * t1984 * t2625 - 0.76217237139506171188e1 * t659 * t896 * t642 - 0.76217237139506171188e1 * t659 * t2631;
4968   t2635 = t234 * t2634;
4969   t2637 = -0.6e1 * t104 * t2581 + 0.4e1 * t104 * t2585 + 0.2e1 * t104 * t2588 - t104 * t2635 + t2568 * t115 + 0.4e1 * t231 * t879 - 0.2e1 * t231 * t901 - 0.2e1 * t874 * t252 + 0.2e1 * t337 * t636 - t337 * t667 - t629 * t347;
4970   t2638 = t286 * t2637;
4971   if(v3rho3 != NULL && (p->info->flags & XC_FLAGS_NEEDS_LAPLACIAN) && (p->info->flags & XC_FLAGS_HAVE_KXC))
4972     v3rho2lapl[5] = -0.4e1 / 0.3e1 * t2512 - t2486 - t2522 - t262 * t2539 / 0.6e1 - t262 * t2543 - t262 * t2546 / 0.2e1 - 0.3e1 / 0.8e1 * t262 * t2638;
4973 
4974   t2642 = t8 * t123 * t910;
4975   t2646 = t8 * t135 * t368 / 0.6e1;
4976   t2648 = t8 * t18 * t948;
4977   t2649 = t368 * t397;
4978   t2653 = t948 * t128;
4979   t2656 = t368 * t412;
4980   t2669 = -0.17382716049382716049e1 * t684 - 0.38573713798808385273e-2 * t2391 + 0.50542226225514403291e0 * t2395 + 0.25271113112757201646e0 * t688 - 0.75813339338271604937e-1 * t2398 + 0.25943279877168604506e-2 * t2401 + 0.15296790123456790123e0 * t2403 - 0.50989300411522633744e0 * t692 - 0.12237432098765432099e1 * t694;
4981   t2670 = t25 * t2669;
4982   t2682 = t1567 * t365;
4983   t2683 = t2682 * t463;
4984   t2686 = t462 * t945;
4985   t2687 = t2686 * t183;
4986   t2690 = t923 * t497;
4987   t2699 = t66 * t918;
4988   t2709 = t355 * t62;
4989   t2723 = t918 * t492;
4990   t2724 = t2723 * t723;
4991   t2727 = t355 * t1621;
4992   t2728 = t2727 * t2171;
4993   t2734 = t941 * t2178;
4994   t2737 = 0.53114609167735973502e-1 * t2133 * t927 * t470 - 0.12461621718547169973e1 * t2137 * t2138 * t355 - 0.70819478890314631336e-1 * t705 * t2699 * t156 - 0.35409739445157315668e-1 * t705 * t927 * t456 + 0.16615495624729559964e1 * t710 * t2149 * t355 - 0.11432585570925925678e2 * t1597 * t493 * t2709 + 0.33230991249459119928e1 * t710 * t711 * t918 + 0.70819478890314631335e-1 * t54 * t162 * t2669 + 0.16615495624729559964e1 * t167 * t61 * t2669 * t179 - 0.15243447427901234238e2 * t490 * t2724 + 0.10488523547622316684e3 * t1618 * t2728 - 0.76217237139506171188e1 * t490 * t941 * t470 - 0.76217237139506171188e1 * t490 * t2734;
4995   t2738 = t160 * t2737;
4996   t2740 = 0.4e1 * t157 * t924 - 0.2e1 * t157 * t946 - 0.2e1 * t919 * t184 + t2670 * t71 - 0.6e1 * t52 * t2683 + 0.4e1 * t52 * t2687 + 0.2e1 * t52 * t2690 - t52 * t2738 + 0.2e1 * t356 * t464 - t356 * t498 - t457 * t366;
4997   if(v3rho3 != NULL && (p->info->flags & XC_FLAGS_HAVE_KXC))
4998     v3rho2tau[0] = -0.4e1 / 0.3e1 * t2642 - t2646 - t2648 - t262 * t527 * t2649 / 0.6e1 - t262 * t678 * t2653 - t262 * t678 * t2656 / 0.2e1 - 0.3e1 / 0.8e1 * t262 * t263 * t2740;
4999 
5000   t2745 = t8 * t190 * t954;
5001   t2749 = t8 * t196 * t387 / 0.6e1;
5002   t2750 = t387 * t507;
5003   t2754 = t387 * t516;
5004   if(v3rho3 != NULL && (p->info->flags & XC_FLAGS_HAVE_KXC))
5005     v3rho2tau[1] = -0.4e1 / 0.3e1 * t2745 - t2749 - t262 * t550 * t2750 / 0.6e1 - t262 * t736 * t2754 / 0.2e1;
5006 
5007   t2760 = t2206 * t959;
5008   t2762 = t395 * t368;
5009   t2763 = t2762 * t530;
5010   t2767 = t678 * t948 * t203;
5011   t2771 = t678 * t368 * t9;
5012   if(v3rho3 != NULL && (p->info->flags & XC_FLAGS_HAVE_KXC))
5013     v3rho2tau[2] = -0.2e1 / 0.3e1 * t2642 - t2646 - t2648 / 0.2e1 - 0.2e1 / 0.3e1 * t2760 - t2210 * t2763 / 0.6e1 - t262 * t2767 / 0.2e1 - t2220 * t2771 / 0.2e1;
5014 
5015   t2775 = t2206 * t964;
5016   t2777 = t505 * t387;
5017   t2778 = t2777 * t553;
5018   t2782 = t736 * t387 * t9;
5019   t2785 = t2206 * t1002;
5020   t2788 = t736 * t1001 * t191;
5021   if(v3rho3 != NULL && (p->info->flags & XC_FLAGS_HAVE_KXC))
5022     v3rho2tau[3] = -0.2e1 / 0.3e1 * t2745 - t2749 - 0.2e1 / 0.3e1 * t2775 - t2210 * t2778 / 0.6e1 + t2220 * t2782 / 0.2e1 - t2785 / 0.2e1 - t262 * t2788 / 0.2e1;
5023 
5024   t2793 = t527 * t368 * t576;
5025   t2797 = t678 * t368 * t582;
5026   if(v3rho3 != NULL && (p->info->flags & XC_FLAGS_HAVE_KXC))
5027     v3rho2tau[4] = -0.4e1 / 0.3e1 * t2760 - t2646 - t262 * t2793 / 0.6e1 - t262 * t2797 / 0.2e1;
5028 
5029   t2802 = t550 * t387 * t587;
5030   t2806 = t736 * t1001 * t208;
5031   t2809 = t736 * t387 * t596;
5032   t2821 = -0.17382716049382716049e1 * t751 - 0.38573713798808385273e-2 * t2551 + 0.50542226225514403291e0 * t2555 + 0.25271113112757201646e0 * t755 - 0.75813339338271604937e-1 * t2558 + 0.25943279877168604506e-2 * t2561 + 0.15296790123456790123e0 * t2563 - 0.50989300411522633744e0 * t759 - 0.12237432098765432099e1 * t761;
5033   t2822 = t25 * t2821;
5034   t2834 = t1937 * t384;
5035   t2835 = t2834 * t635;
5036   t2838 = t634 * t998;
5037   t2839 = t2838 * t251;
5038   t2842 = t976 * t666;
5039   t2851 = t110 * t971;
5040   t2861 = t374 * t106;
5041   t2875 = t971 * t661;
5042   t2876 = t2875 * t790;
5043   t2879 = t374 * t1987;
5044   t2880 = t2879 * t2352;
5045   t2886 = t994 * t2359;
5046   t2889 = 0.53114609167735973502e-1 * t2314 * t980 * t642 - 0.12461621718547169973e1 * t2318 * t2319 * t374 - 0.70819478890314631336e-1 * t772 * t2851 * t230 - 0.35409739445157315668e-1 * t772 * t980 * t628 + 0.16615495624729559964e1 * t777 * t2330 * t374 - 0.11432585570925925678e2 * t1967 * t662 * t2861 + 0.33230991249459119928e1 * t777 * t778 * t971 + 0.70819478890314631335e-1 * t54 * t236 * t2821 + 0.16615495624729559964e1 * t240 * t61 * t2821 * t247 - 0.15243447427901234238e2 * t659 * t2876 + 0.10488523547622316684e3 * t1984 * t2880 - 0.76217237139506171188e1 * t659 * t994 * t642 - 0.76217237139506171188e1 * t659 * t2886;
5047   t2890 = t234 * t2889;
5048   t2892 = -0.6e1 * t104 * t2835 + 0.4e1 * t104 * t2839 + 0.2e1 * t104 * t2842 - t104 * t2890 + t2822 * t115 + 0.4e1 * t231 * t977 - 0.2e1 * t231 * t999 - 0.2e1 * t972 * t252 + 0.2e1 * t375 * t636 - t375 * t667 - t629 * t385;
5049   t2893 = t286 * t2892;
5050   if(v3rho3 != NULL && (p->info->flags & XC_FLAGS_HAVE_KXC))
5051     v3rho2tau[5] = -0.4e1 / 0.3e1 * t2775 - t2749 - t2785 - t262 * t2802 / 0.6e1 - t262 * t2806 - t262 * t2809 / 0.2e1 - 0.3e1 / 0.8e1 * t262 * t2893;
5052 
5053   t2896 = t2206 * t1047;
5054   t2899 = t678 * t1046 * t128;
5055   t2903 = t1536 * t1007 * t148;
5056   t2905 = t1007 * t1542;
5057   t2907 = t1540 * t2905 * t148;
5058   t2909 = t428 * t31;
5059   t2911 = 0.1e1 / t26 / t2909;
5060   t2914 = t441 * t2911 * t443 * t446;
5061   t2916 = t440 * t1007;
5062   t2917 = t46 * t148;
5063   t2918 = t2916 * t2917;
5064   t2921 = t152 * t2911 * t451;
5065   t2923 = -0.60271427810638101992e-4 * t2903 + 0.78972228477366255147e-2 * t2907 + 0.63177782781893004117e-2 * t2914 + 0.40536374808075944542e-4 * t2918 - 0.12747325102880658436e-1 * t2921;
5066   t2924 = t25 * t2923;
5067   t2935 = t1567 * t1020;
5068   t2936 = t2935 * t183;
5069   t2939 = t701 * t727;
5070   t2943 = t462 * t1043;
5071   t2944 = t2943 * t183;
5072   t2947 = t66 * t1024;
5073   t2963 = t66 * t1015;
5074   t2977 = t1015 * t492;
5075   t2978 = t2977 * t723;
5076   t2981 = t62 * t696;
5077   t2985 = t1024 * t1621;
5078   t2986 = t174 * t156;
5079   t2993 = 0.53114609167735973502e-1 * t2133 * t2947 * t156 - 0.12461621718547169973e1 * t2137 * t711 * t1024 - 0.70819478890314631336e-1 * t705 * t706 * t696 + 0.33230991249459119928e1 * t710 * t1115 * t696 - 0.11432585570925925678e2 * t1597 * t1039 * t723 - 0.35409739445157315668e-1 * t705 * t2963 * t156 + 0.16615495624729559964e1 * t710 * t711 * t1015 + 0.70819478890314631335e-1 * t54 * t162 * t2923 + 0.16615495624729559964e1 * t167 * t61 * t2923 * t179 - 0.76217237139506171188e1 * t490 * t2978 - 0.15243447427901234238e2 * t490 * t722 * t2981 + 0.10488523547622316684e3 * t1618 * t2985 * t2986 - 0.76217237139506171188e1 * t490 * t1039 * t156;
5080   t2994 = t160 * t2993;
5081   t2996 = -t1016 * t184 + 0.2e1 * t157 * t1021 - t157 * t1044 + 0.4e1 * t270 * t702 - 0.2e1 * t270 * t728 - 0.2e1 * t697 * t280 + t2924 * t71 - 0.6e1 * t52 * t2936 + 0.4e1 * t52 * t2939 + 0.2e1 * t52 * t2944 - t52 * t2994;
5082   t2997 = t263 * t2996;
5083   if(v3rho3 != NULL && (p->info->flags & XC_FLAGS_HAVE_KXC))
5084     v3rhosigma2[0] = -t2896 / 0.2e1 - t262 * t2899 / 0.2e1 - 0.3e1 / 0.8e1 * t262 * t2997;
5085 
5086   if(v3rho3 != NULL && (p->info->flags & XC_FLAGS_HAVE_KXC))
5087     v3rhosigma2[1] = 0.0e0;
5088 
5089   if(v3rho3 != NULL && (p->info->flags & XC_FLAGS_HAVE_KXC))
5090     v3rhosigma2[2] = 0.0e0;
5091 
5092   if(v3rho3 != NULL && (p->info->flags & XC_FLAGS_HAVE_KXC))
5093     v3rhosigma2[3] = 0.0e0;
5094 
5095   if(v3rho3 != NULL && (p->info->flags & XC_FLAGS_HAVE_KXC))
5096     v3rhosigma2[4] = 0.0e0;
5097 
5098   t3000 = t2206 * t1092;
5099   t3002 = t736 * t1091 * t191;
5100   if(v3rho3 != NULL && (p->info->flags & XC_FLAGS_HAVE_KXC))
5101     v3rhosigma2[5] = -t262 * t3002 / 0.2e1 - t3000 / 0.2e1;
5102 
5103   t3006 = t678 * t1046 * t203;
5104   if(v3rho3 != NULL && (p->info->flags & XC_FLAGS_HAVE_KXC))
5105     v3rhosigma2[6] = -t262 * t3006 / 0.2e1 - t2896 / 0.2e1;
5106 
5107   if(v3rho3 != NULL && (p->info->flags & XC_FLAGS_HAVE_KXC))
5108     v3rhosigma2[7] = 0.0e0;
5109 
5110   if(v3rho3 != NULL && (p->info->flags & XC_FLAGS_HAVE_KXC))
5111     v3rhosigma2[8] = 0.0e0;
5112 
5113   if(v3rho3 != NULL && (p->info->flags & XC_FLAGS_HAVE_KXC))
5114     v3rhosigma2[9] = 0.0e0;
5115 
5116   if(v3rho3 != NULL && (p->info->flags & XC_FLAGS_HAVE_KXC))
5117     v3rhosigma2[10] = 0.0e0;
5118 
5119   t3011 = t736 * t1091 * t208;
5120   t3015 = t1908 * t1052 * t222;
5121   t3017 = t1052 * t1542;
5122   t3019 = t1912 * t3017 * t222;
5123   t3021 = t604 * t86;
5124   t3023 = 0.1e1 / t81 / t3021;
5125   t3026 = t617 * t3023 * t443 * t446;
5126   t3028 = t616 * t1052;
5127   t3029 = t98 * t222;
5128   t3030 = t3028 * t3029;
5129   t3033 = t226 * t3023 * t451;
5130   t3035 = -0.60271427810638101992e-4 * t3015 + 0.78972228477366255147e-2 * t3019 + 0.63177782781893004117e-2 * t3026 + 0.40536374808075944542e-4 * t3030 - 0.12747325102880658436e-1 * t3033;
5131   t3036 = t25 * t3035;
5132   t3047 = t1937 * t1065;
5133   t3048 = t3047 * t251;
5134   t3051 = t768 * t794;
5135   t3055 = t634 * t1088;
5136   t3056 = t3055 * t251;
5137   t3059 = t110 * t1069;
5138   t3075 = t110 * t1060;
5139   t3089 = t1060 * t661;
5140   t3090 = t3089 * t790;
5141   t3093 = t106 * t763;
5142   t3097 = t1069 * t1987;
5143   t3098 = t242 * t230;
5144   t3105 = 0.53114609167735973502e-1 * t2314 * t3059 * t230 - 0.12461621718547169973e1 * t2318 * t778 * t1069 - 0.70819478890314631336e-1 * t772 * t773 * t763 + 0.33230991249459119928e1 * t777 * t1157 * t763 - 0.11432585570925925678e2 * t1967 * t1084 * t790 - 0.35409739445157315668e-1 * t772 * t3075 * t230 + 0.16615495624729559964e1 * t777 * t778 * t1060 + 0.70819478890314631335e-1 * t54 * t236 * t3035 + 0.16615495624729559964e1 * t240 * t61 * t3035 * t247 - 0.76217237139506171188e1 * t659 * t3090 - 0.15243447427901234238e2 * t659 * t789 * t3093 + 0.10488523547622316684e3 * t1984 * t3097 * t3098 - 0.76217237139506171188e1 * t659 * t1084 * t230;
5145   t3106 = t234 * t3105;
5146   t3108 = -0.6e1 * t104 * t3048 + 0.4e1 * t104 * t3051 + 0.2e1 * t104 * t3056 - t104 * t3106 - t1061 * t252 + 0.2e1 * t231 * t1066 - t231 * t1089 + t3036 * t115 + 0.4e1 * t293 * t769 - 0.2e1 * t293 * t795 - 0.2e1 * t764 * t303;
5147   t3109 = t286 * t3108;
5148   if(v3rho3 != NULL && (p->info->flags & XC_FLAGS_HAVE_KXC))
5149     v3rhosigma2[11] = -t3000 / 0.2e1 - t262 * t3011 / 0.2e1 - 0.3e1 / 0.8e1 * t262 * t3109;
5150 
5151   t3112 = t2206 * t1134;
5152   t3115 = t678 * t1133 * t128;
5153   t3119 = t1536 * t1096 * t148;
5154   t3121 = t1096 * t1542;
5155   t3123 = t1540 * t3121 * t148;
5156   t3126 = t440 * t1096;
5157   t3127 = t3126 * t2917;
5158   t3130 = -0.12054285562127620398e-3 * t3119 + 0.15794445695473251029e-1 * t3123 + 0.10266389702057613169e-1 * t1010 + 0.81072749616151889082e-4 * t3127 - 0.20714403292181069958e-1 * t1013;
5159   t3131 = t25 * t3130;
5160   t3144 = t52 * t1567;
5161   t3145 = t324 * t279;
5162   t3146 = t3145 * t183;
5163   t3149 = t2424 * t279;
5164   t3152 = t821 * t727;
5165   t3156 = t462 * t1130;
5166   t3157 = t3156 * t183;
5167   t3160 = t269 * t156;
5168   t3164 = t314 * t269;
5169   t3174 = t696 * t179;
5170   t3178 = t489 * t269;
5171   t3179 = t1596 * t3178;
5172   t3185 = t66 * t1104;
5173   t3199 = t1104 * t492;
5174   t3200 = t3199 * t723;
5175   t3203 = t2460 * t1126;
5176   t3206 = t1617 * t314;
5177   t3207 = t1615 * t3206;
5178   t3208 = t1621 * t174;
5179   t3209 = t3208 * t3160;
5180   t3215 = t839 * t2981;
5181   t3218 = 0.53114609167735973502e-1 * t2133 * t825 * t3160 - 0.12461621718547169973e1 * t2137 * t711 * t3164 - 0.35409739445157315668e-1 * t705 * t2437 * t269 - 0.35409739445157315668e-1 * t705 * t825 * t696 + 0.16615495624729559964e1 * t710 * t3174 * t314 - 0.11432585570925925678e2 * t3179 * t840 + 0.16615495624729559964e1 * t710 * t1115 * t816 - 0.35409739445157315668e-1 * t705 * t3185 * t156 + 0.16615495624729559964e1 * t710 * t711 * t1104 + 0.70819478890314631335e-1 * t54 * t162 * t3130 + 0.16615495624729559964e1 * t167 * t61 * t3130 * t179 - 0.76217237139506171188e1 * t490 * t3200 - 0.76217237139506171188e1 * t490 * t3203 + 0.10488523547622316684e3 * t3207 * t3209 - 0.76217237139506171188e1 * t490 * t839 * t3160 - 0.76217237139506171188e1 * t490 * t3215;
5182   t3219 = t160 * t3218;
5183   t3221 = -t1105 * t184 + 0.2e1 * t157 * t1109 - t157 * t1131 + 0.2e1 * t270 * t822 - t270 * t844 - t817 * t280 + t3131 * t71 - 0.6e1 * t3144 * t3146 + 0.2e1 * t52 * t3149 + 0.2e1 * t315 * t702 - t315 * t728 + 0.2e1 * t52 * t3152 + 0.2e1 * t52 * t3157 - t52 * t3219 - t697 * t325;
5184   t3222 = t263 * t3221;
5185   if(v3rho3 != NULL && (p->info->flags & XC_FLAGS_NEEDS_LAPLACIAN) && (p->info->flags & XC_FLAGS_HAVE_KXC))
5186     v3rhosigmalapl[0] = -t3112 / 0.2e1 - t262 * t3115 / 0.2e1 - 0.3e1 / 0.8e1 * t262 * t3222;
5187 
5188   if(v3rho3 != NULL && (p->info->flags & XC_FLAGS_NEEDS_LAPLACIAN) && (p->info->flags & XC_FLAGS_HAVE_KXC))
5189     v3rhosigmalapl[1] = 0.0e0;
5190 
5191   if(v3rho3 != NULL && (p->info->flags & XC_FLAGS_NEEDS_LAPLACIAN) && (p->info->flags & XC_FLAGS_HAVE_KXC))
5192     v3rhosigmalapl[2] = 0.0e0;
5193 
5194   if(v3rho3 != NULL && (p->info->flags & XC_FLAGS_NEEDS_LAPLACIAN) && (p->info->flags & XC_FLAGS_HAVE_KXC))
5195     v3rhosigmalapl[3] = 0.0e0;
5196 
5197   if(v3rho3 != NULL && (p->info->flags & XC_FLAGS_NEEDS_LAPLACIAN) && (p->info->flags & XC_FLAGS_HAVE_KXC))
5198     v3rhosigmalapl[4] = 0.0e0;
5199 
5200   t3225 = t2206 * t1176;
5201   t3227 = t736 * t1175 * t191;
5202   if(v3rho3 != NULL && (p->info->flags & XC_FLAGS_NEEDS_LAPLACIAN) && (p->info->flags & XC_FLAGS_HAVE_KXC))
5203     v3rhosigmalapl[5] = -t262 * t3227 / 0.2e1 - t3225 / 0.2e1;
5204 
5205   t3231 = t678 * t1133 * t203;
5206   if(v3rho3 != NULL && (p->info->flags & XC_FLAGS_NEEDS_LAPLACIAN) && (p->info->flags & XC_FLAGS_HAVE_KXC))
5207     v3rhosigmalapl[6] = -t262 * t3231 / 0.2e1 - t3112 / 0.2e1;
5208 
5209   if(v3rho3 != NULL && (p->info->flags & XC_FLAGS_NEEDS_LAPLACIAN) && (p->info->flags & XC_FLAGS_HAVE_KXC))
5210     v3rhosigmalapl[7] = 0.0e0;
5211 
5212   if(v3rho3 != NULL && (p->info->flags & XC_FLAGS_NEEDS_LAPLACIAN) && (p->info->flags & XC_FLAGS_HAVE_KXC))
5213     v3rhosigmalapl[8] = 0.0e0;
5214 
5215   if(v3rho3 != NULL && (p->info->flags & XC_FLAGS_NEEDS_LAPLACIAN) && (p->info->flags & XC_FLAGS_HAVE_KXC))
5216     v3rhosigmalapl[9] = 0.0e0;
5217 
5218   if(v3rho3 != NULL && (p->info->flags & XC_FLAGS_NEEDS_LAPLACIAN) && (p->info->flags & XC_FLAGS_HAVE_KXC))
5219     v3rhosigmalapl[10] = 0.0e0;
5220 
5221   t3236 = t736 * t1175 * t208;
5222   t3240 = t1908 * t1138 * t222;
5223   t3242 = t1138 * t1542;
5224   t3244 = t1912 * t3242 * t222;
5225   t3247 = t616 * t1138;
5226   t3248 = t3247 * t3029;
5227   t3251 = -0.12054285562127620398e-3 * t3240 + 0.15794445695473251029e-1 * t3244 + 0.10266389702057613169e-1 * t1055 + 0.81072749616151889082e-4 * t3248 - 0.20714403292181069958e-1 * t1058;
5228   t3252 = t25 * t3251;
5229   t3265 = t104 * t1937;
5230   t3266 = t346 * t302;
5231   t3267 = t3266 * t251;
5232   t3270 = t2584 * t302;
5233   t3273 = t878 * t794;
5234   t3277 = t634 * t1172;
5235   t3278 = t3277 * t251;
5236   t3281 = t292 * t230;
5237   t3285 = t336 * t292;
5238   t3295 = t763 * t247;
5239   t3299 = t489 * t292;
5240   t3300 = t1966 * t3299;
5241   t3306 = t110 * t1146;
5242   t3320 = t1146 * t661;
5243   t3321 = t3320 * t790;
5244   t3324 = t2620 * t1168;
5245   t3327 = t1617 * t336;
5246   t3328 = t1983 * t3327;
5247   t3329 = t1987 * t242;
5248   t3330 = t3329 * t3281;
5249   t3336 = t896 * t3093;
5250   t3339 = 0.53114609167735973502e-1 * t2314 * t882 * t3281 - 0.12461621718547169973e1 * t2318 * t778 * t3285 - 0.35409739445157315668e-1 * t772 * t2597 * t292 - 0.35409739445157315668e-1 * t772 * t882 * t763 + 0.16615495624729559964e1 * t777 * t3295 * t336 - 0.11432585570925925678e2 * t3300 * t897 + 0.16615495624729559964e1 * t777 * t1157 * t873 - 0.35409739445157315668e-1 * t772 * t3306 * t230 + 0.16615495624729559964e1 * t777 * t778 * t1146 + 0.70819478890314631335e-1 * t54 * t236 * t3251 + 0.16615495624729559964e1 * t240 * t61 * t3251 * t247 - 0.76217237139506171188e1 * t659 * t3321 - 0.76217237139506171188e1 * t659 * t3324 + 0.10488523547622316684e3 * t3328 * t3330 - 0.76217237139506171188e1 * t659 * t896 * t3281 - 0.76217237139506171188e1 * t659 * t3336;
5251   t3340 = t234 * t3339;
5252   t3342 = 0.2e1 * t104 * t3270 + 0.2e1 * t104 * t3273 + 0.2e1 * t104 * t3278 - t104 * t3340 - t1147 * t252 + t3252 * t115 + 0.2e1 * t231 * t1151 - t231 * t1173 + 0.2e1 * t293 * t879 - t293 * t901 - t874 * t303 - 0.6e1 * t3265 * t3267 + 0.2e1 * t337 * t769 - t337 * t795 - t764 * t347;
5253   t3343 = t286 * t3342;
5254   if(v3rho3 != NULL && (p->info->flags & XC_FLAGS_NEEDS_LAPLACIAN) && (p->info->flags & XC_FLAGS_HAVE_KXC))
5255     v3rhosigmalapl[11] = -t3225 / 0.2e1 - t262 * t3236 / 0.2e1 - 0.3e1 / 0.8e1 * t262 * t3343;
5256 
5257   t3346 = t2206 * t1209;
5258   t3349 = t678 * t1208 * t128;
5259   t3357 = 0.48217142248510481592e-3 * t3119 - 0.63177782781893004115e-1 * t3123 - 0.41065558808230452675e-1 * t1010 - 0.32429099846460755633e-3 * t3127 + 0.82857613168724279834e-1 * t1013;
5260   t3358 = t25 * t3357;
5261   t3371 = t365 * t279;
5262   t3372 = t3371 * t183;
5263   t3375 = t2686 * t279;
5264   t3378 = t923 * t727;
5265   t3382 = t462 * t1205;
5266   t3383 = t3382 * t183;
5267   t3389 = t355 * t269;
5268   t3407 = t66 * t1181;
5269   t3421 = t1181 * t492;
5270   t3422 = t3421 * t723;
5271   t3425 = t2723 * t1126;
5272   t3429 = t1615 * t1617 * t355;
5273   t3432 = t941 * t3160;
5274   t3435 = t941 * t2981;
5275   t3438 = 0.53114609167735973502e-1 * t2133 * t927 * t3160 - 0.12461621718547169973e1 * t2137 * t711 * t3389 - 0.35409739445157315668e-1 * t705 * t2699 * t269 - 0.35409739445157315668e-1 * t705 * t927 * t696 + 0.16615495624729559964e1 * t710 * t3174 * t355 - 0.11432585570925925678e2 * t3179 * t942 + 0.16615495624729559964e1 * t710 * t1115 * t918 - 0.35409739445157315668e-1 * t705 * t3407 * t156 + 0.16615495624729559964e1 * t710 * t711 * t1181 + 0.70819478890314631335e-1 * t54 * t162 * t3357 + 0.16615495624729559964e1 * t167 * t61 * t3357 * t179 - 0.76217237139506171188e1 * t490 * t3422 - 0.76217237139506171188e1 * t490 * t3425 + 0.10488523547622316684e3 * t3429 * t3209 - 0.76217237139506171188e1 * t490 * t3432 - 0.76217237139506171188e1 * t490 * t3435;
5276   t3439 = t160 * t3438;
5277   t3441 = -t1182 * t184 + 0.2e1 * t157 * t1186 - t157 * t1206 + 0.2e1 * t270 * t924 - t270 * t946 - t919 * t280 - 0.6e1 * t3144 * t3372 + t3358 * t71 + 0.2e1 * t52 * t3375 + 0.2e1 * t52 * t3378 + 0.2e1 * t52 * t3383 - t52 * t3439 + 0.2e1 * t356 * t702 - t356 * t728 - t697 * t366;
5278   t3442 = t263 * t3441;
5279   if(v3rho3 != NULL && (p->info->flags & XC_FLAGS_HAVE_KXC))
5280     v3rhosigmatau[0] = -t3346 / 0.2e1 - t262 * t3349 / 0.2e1 - 0.3e1 / 0.8e1 * t262 * t3442;
5281 
5282   if(v3rho3 != NULL && (p->info->flags & XC_FLAGS_HAVE_KXC))
5283     v3rhosigmatau[1] = 0.0e0;
5284 
5285   if(v3rho3 != NULL && (p->info->flags & XC_FLAGS_HAVE_KXC))
5286     v3rhosigmatau[2] = 0.0e0;
5287 
5288   if(v3rho3 != NULL && (p->info->flags & XC_FLAGS_HAVE_KXC))
5289     v3rhosigmatau[3] = 0.0e0;
5290 
5291   if(v3rho3 != NULL && (p->info->flags & XC_FLAGS_HAVE_KXC))
5292     v3rhosigmatau[4] = 0.0e0;
5293 
5294   t3445 = t2206 * t1242;
5295   t3447 = t736 * t1241 * t191;
5296   if(v3rho3 != NULL && (p->info->flags & XC_FLAGS_HAVE_KXC))
5297     v3rhosigmatau[5] = -t262 * t3447 / 0.2e1 - t3445 / 0.2e1;
5298 
5299   t3451 = t678 * t1208 * t203;
5300   if(v3rho3 != NULL && (p->info->flags & XC_FLAGS_HAVE_KXC))
5301     v3rhosigmatau[6] = -t262 * t3451 / 0.2e1 - t3346 / 0.2e1;
5302 
5303   if(v3rho3 != NULL && (p->info->flags & XC_FLAGS_HAVE_KXC))
5304     v3rhosigmatau[7] = 0.0e0;
5305 
5306   if(v3rho3 != NULL && (p->info->flags & XC_FLAGS_HAVE_KXC))
5307     v3rhosigmatau[8] = 0.0e0;
5308 
5309   if(v3rho3 != NULL && (p->info->flags & XC_FLAGS_HAVE_KXC))
5310     v3rhosigmatau[9] = 0.0e0;
5311 
5312   if(v3rho3 != NULL && (p->info->flags & XC_FLAGS_HAVE_KXC))
5313     v3rhosigmatau[10] = 0.0e0;
5314 
5315   t3456 = t736 * t1241 * t208;
5316   t3464 = 0.48217142248510481592e-3 * t3240 - 0.63177782781893004115e-1 * t3244 - 0.41065558808230452675e-1 * t1055 - 0.32429099846460755633e-3 * t3248 + 0.82857613168724279834e-1 * t1058;
5317   t3465 = t25 * t3464;
5318   t3478 = t384 * t302;
5319   t3479 = t3478 * t251;
5320   t3482 = t2838 * t302;
5321   t3485 = t976 * t794;
5322   t3489 = t634 * t1238;
5323   t3490 = t3489 * t251;
5324   t3496 = t374 * t292;
5325   t3514 = t110 * t1214;
5326   t3528 = t1214 * t661;
5327   t3529 = t3528 * t790;
5328   t3532 = t2875 * t1168;
5329   t3536 = t1983 * t1617 * t374;
5330   t3539 = t994 * t3281;
5331   t3542 = t994 * t3093;
5332   t3545 = 0.53114609167735973502e-1 * t2314 * t980 * t3281 - 0.12461621718547169973e1 * t2318 * t778 * t3496 - 0.35409739445157315668e-1 * t772 * t2851 * t292 - 0.35409739445157315668e-1 * t772 * t980 * t763 + 0.16615495624729559964e1 * t777 * t3295 * t374 - 0.11432585570925925678e2 * t3300 * t995 + 0.16615495624729559964e1 * t777 * t1157 * t971 - 0.35409739445157315668e-1 * t772 * t3514 * t230 + 0.16615495624729559964e1 * t777 * t778 * t1214 + 0.70819478890314631335e-1 * t54 * t236 * t3464 + 0.16615495624729559964e1 * t240 * t61 * t3464 * t247 - 0.76217237139506171188e1 * t659 * t3529 - 0.76217237139506171188e1 * t659 * t3532 + 0.10488523547622316684e3 * t3536 * t3330 - 0.76217237139506171188e1 * t659 * t3539 - 0.76217237139506171188e1 * t659 * t3542;
5333   t3546 = t234 * t3545;
5334   t3548 = 0.2e1 * t104 * t3482 + 0.2e1 * t104 * t3485 + 0.2e1 * t104 * t3490 - t104 * t3546 + t3465 * t115 - t1215 * t252 + 0.2e1 * t231 * t1219 - t231 * t1239 + 0.2e1 * t293 * t977 - t293 * t999 - t972 * t303 - 0.6e1 * t3265 * t3479 + 0.2e1 * t375 * t769 - t375 * t795 - t764 * t385;
5335   t3549 = t286 * t3548;
5336   if(v3rho3 != NULL && (p->info->flags & XC_FLAGS_HAVE_KXC))
5337     v3rhosigmatau[11] = -t3445 / 0.2e1 - t262 * t3456 / 0.2e1 - 0.3e1 / 0.8e1 * t262 * t3549;
5338 
5339   t3552 = t2206 * t1286;
5340   t3555 = t678 * t1285 * t128;
5341   t3559 = t1536 * t1246 * t148;
5342   t3561 = t1246 * t1542;
5343   t3563 = t1540 * t3561 * t148;
5344   t3566 = t440 * t1246;
5345   t3567 = t3566 * t2917;
5346   t3570 = -0.24108571124255240796e-3 * t3559 + 0.31588891390946502057e-1 * t3563 + 0.15794445695473251029e-1 * t1099 + 0.16214549923230377817e-3 * t3567 - 0.31868312757201646090e-1 * t1102;
5347   t3571 = t25 * t3570;
5348   t3582 = t1567 * t1259;
5349   t3583 = t3582 * t183;
5350   t3586 = t821 * t843;
5351   t3590 = t462 * t1282;
5352   t3591 = t3590 * t183;
5353   t3594 = t66 * t1263;
5354   t3607 = t1278 * t723;
5355   t3610 = t66 * t1254;
5356   t3624 = t1254 * t492;
5357   t3625 = t3624 * t723;
5358   t3628 = t62 * t816;
5359   t3632 = t1263 * t1621;
5360   t3639 = 0.53114609167735973502e-1 * t2133 * t3594 * t156 - 0.12461621718547169973e1 * t2137 * t711 * t1263 - 0.70819478890314631336e-1 * t705 * t825 * t816 + 0.33230991249459119928e1 * t710 * t1346 * t816 - 0.11432585570925925678e2 * t1597 * t3607 - 0.35409739445157315668e-1 * t705 * t3610 * t156 + 0.16615495624729559964e1 * t710 * t711 * t1254 + 0.70819478890314631335e-1 * t54 * t162 * t3570 + 0.16615495624729559964e1 * t167 * t61 * t3570 * t179 - 0.76217237139506171188e1 * t490 * t3625 - 0.15243447427901234238e2 * t490 * t839 * t3628 + 0.10488523547622316684e3 * t1618 * t3632 * t2986 - 0.76217237139506171188e1 * t490 * t1278 * t156;
5361   t3640 = t160 * t3639;
5362   t3642 = -t1255 * t184 + 0.2e1 * t157 * t1260 - t157 * t1283 + 0.4e1 * t315 * t822 - 0.2e1 * t315 * t844 - 0.2e1 * t817 * t325 + t3571 * t71 - 0.6e1 * t52 * t3583 + 0.4e1 * t52 * t3586 + 0.2e1 * t52 * t3591 - t52 * t3640;
5363   t3643 = t263 * t3642;
5364   if(v3rho3 != NULL && (p->info->flags & XC_FLAGS_NEEDS_LAPLACIAN) && (p->info->flags & XC_FLAGS_HAVE_KXC))
5365     v3rholapl2[0] = -t3552 / 0.2e1 - t262 * t3555 / 0.2e1 - 0.3e1 / 0.8e1 * t262 * t3643;
5366 
5367   if(v3rho3 != NULL && (p->info->flags & XC_FLAGS_NEEDS_LAPLACIAN) && (p->info->flags & XC_FLAGS_HAVE_KXC))
5368     v3rholapl2[1] = 0.0e0;
5369 
5370   t3646 = t2206 * t1330;
5371   t3648 = t736 * t1329 * t191;
5372   if(v3rho3 != NULL && (p->info->flags & XC_FLAGS_NEEDS_LAPLACIAN) && (p->info->flags & XC_FLAGS_HAVE_KXC))
5373     v3rholapl2[2] = -t262 * t3648 / 0.2e1 - t3646 / 0.2e1;
5374 
5375   t3652 = t678 * t1285 * t203;
5376   if(v3rho3 != NULL && (p->info->flags & XC_FLAGS_NEEDS_LAPLACIAN) && (p->info->flags & XC_FLAGS_HAVE_KXC))
5377     v3rholapl2[3] = -t262 * t3652 / 0.2e1 - t3552 / 0.2e1;
5378 
5379   if(v3rho3 != NULL && (p->info->flags & XC_FLAGS_NEEDS_LAPLACIAN) && (p->info->flags & XC_FLAGS_HAVE_KXC))
5380     v3rholapl2[4] = 0.0e0;
5381 
5382   t3657 = t736 * t1329 * t208;
5383   t3661 = t1908 * t1290 * t222;
5384   t3663 = t1290 * t1542;
5385   t3665 = t1912 * t3663 * t222;
5386   t3668 = t616 * t1290;
5387   t3669 = t3668 * t3029;
5388   t3672 = -0.24108571124255240796e-3 * t3661 + 0.31588891390946502057e-1 * t3665 + 0.15794445695473251029e-1 * t1141 + 0.16214549923230377817e-3 * t3669 - 0.31868312757201646090e-1 * t1144;
5389   t3673 = t25 * t3672;
5390   t3684 = t1937 * t1303;
5391   t3685 = t3684 * t251;
5392   t3688 = t878 * t900;
5393   t3692 = t634 * t1326;
5394   t3693 = t3692 * t251;
5395   t3696 = t110 * t1307;
5396   t3709 = t1322 * t790;
5397   t3712 = t110 * t1298;
5398   t3726 = t1298 * t661;
5399   t3727 = t3726 * t790;
5400   t3730 = t106 * t873;
5401   t3734 = t1307 * t1987;
5402   t3741 = 0.53114609167735973502e-1 * t2314 * t3696 * t230 - 0.12461621718547169973e1 * t2318 * t778 * t1307 - 0.70819478890314631336e-1 * t772 * t882 * t873 + 0.33230991249459119928e1 * t777 * t1381 * t873 - 0.11432585570925925678e2 * t1967 * t3709 - 0.35409739445157315668e-1 * t772 * t3712 * t230 + 0.16615495624729559964e1 * t777 * t778 * t1298 + 0.70819478890314631335e-1 * t54 * t236 * t3672 + 0.16615495624729559964e1 * t240 * t61 * t3672 * t247 - 0.76217237139506171188e1 * t659 * t3727 - 0.15243447427901234238e2 * t659 * t896 * t3730 + 0.10488523547622316684e3 * t1984 * t3734 * t3098 - 0.76217237139506171188e1 * t659 * t1322 * t230;
5403   t3742 = t234 * t3741;
5404   t3744 = -0.6e1 * t104 * t3685 + 0.4e1 * t104 * t3688 + 0.2e1 * t104 * t3693 - t104 * t3742 + t3673 * t115 - t1299 * t252 + 0.2e1 * t231 * t1304 - t231 * t1327 + 0.4e1 * t337 * t879 - 0.2e1 * t337 * t901 - 0.2e1 * t874 * t347;
5405   t3745 = t286 * t3744;
5406   if(v3rho3 != NULL && (p->info->flags & XC_FLAGS_NEEDS_LAPLACIAN) && (p->info->flags & XC_FLAGS_HAVE_KXC))
5407     v3rholapl2[5] = -t3646 / 0.2e1 - t262 * t3657 / 0.2e1 - 0.3e1 / 0.8e1 * t262 * t3745;
5408 
5409   t3748 = t2206 * t1365;
5410   t3751 = t678 * t1364 * t128;
5411   t3759 = 0.96434284497020963181e-3 * t3559 - 0.12635556556378600823e0 * t3563 - 0.63177782781893004113e-1 * t1099 - 0.64858199692921511265e-3 * t3567 + 0.12747325102880658436e0 * t1102;
5412   t3760 = t25 * t3759;
5413   t3773 = t365 * t324;
5414   t3774 = t3773 * t183;
5415   t3777 = t2686 * t324;
5416   t3780 = t923 * t843;
5417   t3784 = t462 * t1361;
5418   t3785 = t3784 * t183;
5419   t3788 = t314 * t156;
5420   t3792 = t355 * t314;
5421   t3802 = t816 * t179;
5422   t3806 = t489 * t314;
5423   t3807 = t1596 * t3806;
5424   t3813 = t66 * t1335;
5425   t3827 = t1335 * t492;
5426   t3828 = t3827 * t723;
5427   t3831 = t2723 * t1357;
5428   t3834 = t3208 * t3788;
5429   t3840 = t941 * t3628;
5430   t3843 = 0.53114609167735973502e-1 * t2133 * t927 * t3788 - 0.12461621718547169973e1 * t2137 * t711 * t3792 - 0.35409739445157315668e-1 * t705 * t2699 * t314 - 0.35409739445157315668e-1 * t705 * t927 * t816 + 0.16615495624729559964e1 * t710 * t3802 * t355 - 0.11432585570925925678e2 * t3807 * t942 + 0.16615495624729559964e1 * t710 * t1346 * t918 - 0.35409739445157315668e-1 * t705 * t3813 * t156 + 0.16615495624729559964e1 * t710 * t711 * t1335 + 0.70819478890314631335e-1 * t54 * t162 * t3759 + 0.16615495624729559964e1 * t167 * t61 * t3759 * t179 - 0.76217237139506171188e1 * t490 * t3828 - 0.76217237139506171188e1 * t490 * t3831 + 0.10488523547622316684e3 * t3429 * t3834 - 0.76217237139506171188e1 * t490 * t941 * t3788 - 0.76217237139506171188e1 * t490 * t3840;
5431   t3844 = t160 * t3843;
5432   t3846 = -t1336 * t184 + 0.2e1 * t157 * t1340 - t157 * t1362 - 0.6e1 * t3144 * t3774 + 0.2e1 * t315 * t924 - t315 * t946 - t919 * t325 + 0.2e1 * t356 * t822 - t356 * t844 - t817 * t366 + t3760 * t71 + 0.2e1 * t52 * t3777 + 0.2e1 * t52 * t3780 + 0.2e1 * t52 * t3785 - t52 * t3844;
5433   t3847 = t263 * t3846;
5434   if(v3rho3 != NULL && (p->info->flags & XC_FLAGS_NEEDS_LAPLACIAN) && (p->info->flags & XC_FLAGS_HAVE_KXC))
5435     v3rholapltau[0] = -t3748 / 0.2e1 - t262 * t3751 / 0.2e1 - 0.3e1 / 0.8e1 * t262 * t3847;
5436 
5437   if(v3rho3 != NULL && (p->info->flags & XC_FLAGS_NEEDS_LAPLACIAN) && (p->info->flags & XC_FLAGS_HAVE_KXC))
5438     v3rholapltau[1] = 0.0e0;
5439 
5440   if(v3rho3 != NULL && (p->info->flags & XC_FLAGS_NEEDS_LAPLACIAN) && (p->info->flags & XC_FLAGS_HAVE_KXC))
5441     v3rholapltau[2] = 0.0e0;
5442 
5443   t3850 = t2206 * t1400;
5444   t3852 = t736 * t1399 * t191;
5445   if(v3rho3 != NULL && (p->info->flags & XC_FLAGS_NEEDS_LAPLACIAN) && (p->info->flags & XC_FLAGS_HAVE_KXC))
5446     v3rholapltau[3] = -t262 * t3852 / 0.2e1 - t3850 / 0.2e1;
5447 
5448   t3856 = t678 * t1364 * t203;
5449   if(v3rho3 != NULL && (p->info->flags & XC_FLAGS_NEEDS_LAPLACIAN) && (p->info->flags & XC_FLAGS_HAVE_KXC))
5450     v3rholapltau[4] = -t262 * t3856 / 0.2e1 - t3748 / 0.2e1;
5451 
5452   if(v3rho3 != NULL && (p->info->flags & XC_FLAGS_NEEDS_LAPLACIAN) && (p->info->flags & XC_FLAGS_HAVE_KXC))
5453     v3rholapltau[5] = 0.0e0;
5454 
5455   if(v3rho3 != NULL && (p->info->flags & XC_FLAGS_NEEDS_LAPLACIAN) && (p->info->flags & XC_FLAGS_HAVE_KXC))
5456     v3rholapltau[6] = 0.0e0;
5457 
5458   t3861 = t736 * t1399 * t208;
5459   t3869 = 0.96434284497020963181e-3 * t3661 - 0.12635556556378600823e0 * t3665 - 0.63177782781893004113e-1 * t1141 - 0.64858199692921511265e-3 * t3669 + 0.12747325102880658436e0 * t1144;
5460   t3870 = t25 * t3869;
5461   t3883 = t384 * t346;
5462   t3884 = t3883 * t251;
5463   t3887 = t2838 * t346;
5464   t3890 = t976 * t900;
5465   t3894 = t634 * t1396;
5466   t3895 = t3894 * t251;
5467   t3898 = t336 * t230;
5468   t3902 = t374 * t336;
5469   t3912 = t873 * t247;
5470   t3916 = t489 * t336;
5471   t3917 = t1966 * t3916;
5472   t3923 = t110 * t1370;
5473   t3937 = t1370 * t661;
5474   t3938 = t3937 * t790;
5475   t3941 = t2875 * t1392;
5476   t3944 = t3329 * t3898;
5477   t3950 = t994 * t3730;
5478   t3953 = 0.53114609167735973502e-1 * t2314 * t980 * t3898 - 0.12461621718547169973e1 * t2318 * t778 * t3902 - 0.35409739445157315668e-1 * t772 * t2851 * t336 - 0.35409739445157315668e-1 * t772 * t980 * t873 + 0.16615495624729559964e1 * t777 * t3912 * t374 - 0.11432585570925925678e2 * t3917 * t995 + 0.16615495624729559964e1 * t777 * t1381 * t971 - 0.35409739445157315668e-1 * t772 * t3923 * t230 + 0.16615495624729559964e1 * t777 * t778 * t1370 + 0.70819478890314631335e-1 * t54 * t236 * t3869 + 0.16615495624729559964e1 * t240 * t61 * t3869 * t247 - 0.76217237139506171188e1 * t659 * t3938 - 0.76217237139506171188e1 * t659 * t3941 + 0.10488523547622316684e3 * t3536 * t3944 - 0.76217237139506171188e1 * t659 * t994 * t3898 - 0.76217237139506171188e1 * t659 * t3950;
5479   t3954 = t234 * t3953;
5480   t3956 = 0.2e1 * t104 * t3887 + 0.2e1 * t104 * t3890 + 0.2e1 * t104 * t3895 - t104 * t3954 + t3870 * t115 - t1371 * t252 + 0.2e1 * t231 * t1375 - t231 * t1397 - 0.6e1 * t3265 * t3884 + 0.2e1 * t337 * t977 - t337 * t999 - t972 * t347 + 0.2e1 * t375 * t879 - t375 * t901 - t874 * t385;
5481   t3957 = t286 * t3956;
5482   if(v3rho3 != NULL && (p->info->flags & XC_FLAGS_NEEDS_LAPLACIAN) && (p->info->flags & XC_FLAGS_HAVE_KXC))
5483     v3rholapltau[7] = -t3850 / 0.2e1 - t262 * t3861 / 0.2e1 - 0.3e1 / 0.8e1 * t262 * t3957;
5484 
5485   t3960 = t2206 * t1437;
5486   t3963 = t678 * t1436 * t128;
5487   t3971 = -0.38573713798808385273e-2 * t3559 + 0.50542226225514403291e0 * t3563 + 0.25271113112757201646e0 * t1099 + 0.25943279877168604506e-2 * t3567 - 0.50989300411522633743e0 * t1102;
5488   t3972 = t25 * t3971;
5489   t3983 = t1567 * t1410;
5490   t3984 = t3983 * t183;
5491   t3987 = t923 * t945;
5492   t3991 = t462 * t1433;
5493   t3992 = t3991 * t183;
5494   t3995 = t66 * t1414;
5495   t4005 = t355 * t179;
5496   t4009 = t1429 * t723;
5497   t4012 = t66 * t1405;
5498   t4026 = t1405 * t492;
5499   t4027 = t4026 * t723;
5500   t4030 = t62 * t918;
5501   t4034 = t1414 * t1621;
5502   t4041 = 0.53114609167735973502e-1 * t2133 * t3995 * t156 - 0.12461621718547169973e1 * t2137 * t711 * t1414 - 0.70819478890314631336e-1 * t705 * t927 * t918 + 0.33230991249459119928e1 * t710 * t4005 * t918 - 0.11432585570925925678e2 * t1597 * t4009 - 0.35409739445157315668e-1 * t705 * t4012 * t156 + 0.16615495624729559964e1 * t710 * t711 * t1405 + 0.70819478890314631335e-1 * t54 * t162 * t3971 + 0.16615495624729559964e1 * t167 * t61 * t3971 * t179 - 0.76217237139506171188e1 * t490 * t4027 - 0.15243447427901234238e2 * t490 * t941 * t4030 + 0.10488523547622316684e3 * t1618 * t4034 * t2986 - 0.76217237139506171188e1 * t490 * t1429 * t156;
5503   t4042 = t160 * t4041;
5504   t4044 = -t1406 * t184 + 0.2e1 * t157 * t1411 - t157 * t1434 + 0.4e1 * t356 * t924 - 0.2e1 * t356 * t946 - 0.2e1 * t919 * t366 + t3972 * t71 - 0.6e1 * t52 * t3984 + 0.4e1 * t52 * t3987 + 0.2e1 * t52 * t3992 - t52 * t4042;
5505   t4045 = t263 * t4044;
5506   if(v3rho3 != NULL && (p->info->flags & XC_FLAGS_HAVE_KXC))
5507     v3rhotau2[0] = -t3960 / 0.2e1 - t262 * t3963 / 0.2e1 - 0.3e1 / 0.8e1 * t262 * t4045;
5508 
5509   if(v3rho3 != NULL && (p->info->flags & XC_FLAGS_HAVE_KXC))
5510     v3rhotau2[1] = 0.0e0;
5511 
5512   t4048 = t2206 * t1474;
5513   t4050 = t736 * t1473 * t191;
5514   if(v3rho3 != NULL && (p->info->flags & XC_FLAGS_HAVE_KXC))
5515     v3rhotau2[2] = -t262 * t4050 / 0.2e1 - t4048 / 0.2e1;
5516 
5517   t4054 = t678 * t1436 * t203;
5518   if(v3rho3 != NULL && (p->info->flags & XC_FLAGS_HAVE_KXC))
5519     v3rhotau2[3] = -t262 * t4054 / 0.2e1 - t3960 / 0.2e1;
5520 
5521   if(v3rho3 != NULL && (p->info->flags & XC_FLAGS_HAVE_KXC))
5522     v3rhotau2[4] = 0.0e0;
5523 
5524   t4059 = t736 * t1473 * t208;
5525   t4067 = -0.38573713798808385273e-2 * t3661 + 0.50542226225514403291e0 * t3665 + 0.25271113112757201646e0 * t1141 + 0.25943279877168604506e-2 * t3669 - 0.50989300411522633743e0 * t1144;
5526   t4068 = t25 * t4067;
5527   t4079 = t1937 * t1447;
5528   t4080 = t4079 * t251;
5529   t4083 = t976 * t998;
5530   t4087 = t634 * t1470;
5531   t4088 = t4087 * t251;
5532   t4091 = t110 * t1451;
5533   t4101 = t374 * t247;
5534   t4105 = t1466 * t790;
5535   t4108 = t110 * t1442;
5536   t4122 = t1442 * t661;
5537   t4123 = t4122 * t790;
5538   t4126 = t106 * t971;
5539   t4130 = t1451 * t1987;
5540   t4137 = 0.53114609167735973502e-1 * t2314 * t4091 * t230 - 0.12461621718547169973e1 * t2318 * t778 * t1451 - 0.70819478890314631336e-1 * t772 * t980 * t971 + 0.33230991249459119928e1 * t777 * t4101 * t971 - 0.11432585570925925678e2 * t1967 * t4105 - 0.35409739445157315668e-1 * t772 * t4108 * t230 + 0.16615495624729559964e1 * t777 * t778 * t1442 + 0.70819478890314631335e-1 * t54 * t236 * t4067 + 0.16615495624729559964e1 * t240 * t61 * t4067 * t247 - 0.76217237139506171188e1 * t659 * t4123 - 0.15243447427901234238e2 * t659 * t994 * t4126 + 0.10488523547622316684e3 * t1984 * t4130 * t3098 - 0.76217237139506171188e1 * t659 * t1466 * t230;
5541   t4138 = t234 * t4137;
5542   t4140 = -0.6e1 * t104 * t4080 + 0.4e1 * t104 * t4083 + 0.2e1 * t104 * t4088 - t104 * t4138 + t4068 * t115 - t1443 * t252 + 0.2e1 * t231 * t1448 - t231 * t1471 + 0.4e1 * t375 * t977 - 0.2e1 * t375 * t999 - 0.2e1 * t972 * t385;
5543   t4141 = t286 * t4140;
5544   if(v3rho3 != NULL && (p->info->flags & XC_FLAGS_HAVE_KXC))
5545     v3rhotau2[5] = -t4048 / 0.2e1 - t262 * t4059 / 0.2e1 - 0.3e1 / 0.8e1 * t262 * t4141;
5546 
5547   t4144 = t428 * t428;
5548   t4145 = 0.1e1 / t4144;
5549   t4146 = t1536 * t4145;
5550   t4149 = t1540 * t4145 * t1542;
5551   t4151 = t440 * t4145;
5552   t4152 = t4151 * t46;
5553   t4154 = 0.75339284763297627492e-5 * t4146 - 0.98715285596707818933e-3 * t4149 - 0.50670468510094930677e-5 * t4152;
5554   t4155 = t25 * t4154;
5555   t4163 = t1020 * t279;
5556   t4164 = t1567 * t4163;
5557   t4167 = t701 * t1043;
5558   t4170 = t1024 * t269;
5559   t4184 = t4170 * t492;
5560   t4198 = t4170 * t1621;
5561   t4206 = 0.53114609167735973502e-1 * t54 * t1579 * t4170 - 0.12461621718547169973e1 * t1584 * t61 * t4170 * t179 - 0.10622921833547194700e0 * t705 * t706 * t1015 + 0.49846486874188679892e1 * t710 * t1115 * t1015 - 0.11432585570925925678e2 * t1597 * t4184 * t62 + 0.70819478890314631335e-1 * t54 * t162 * t4154 + 0.16615495624729559964e1 * t167 * t61 * t4154 * t179 - 0.22865171141851851357e2 * t490 * t2977 * t1126 + 0.10488523547622316684e3 * t1618 * t4198 * t174 - 0.76217237139506171188e1 * t488 * t489 * t4170 * t492;
5562   t4207 = t160 * t4206;
5563   t4209 = -0.3e1 * t1016 * t280 + 0.6e1 * t270 * t1021 - 0.3e1 * t270 * t1044 + t4155 * t71 - 0.6e1 * t52 * t4164 + 0.6e1 * t52 * t4167 - t52 * t4207;
5564   t4210 = t263 * t4209;
5565   if(v3rho3 != NULL && (p->info->flags & XC_FLAGS_HAVE_KXC))
5566     v3sigma3[0] = -0.3e1 / 0.8e1 * t262 * t4210;
5567 
5568   if(v3rho3 != NULL && (p->info->flags & XC_FLAGS_HAVE_KXC))
5569     v3sigma3[1] = 0.0e0;
5570 
5571   if(v3rho3 != NULL && (p->info->flags & XC_FLAGS_HAVE_KXC))
5572     v3sigma3[2] = 0.0e0;
5573 
5574   if(v3rho3 != NULL && (p->info->flags & XC_FLAGS_HAVE_KXC))
5575     v3sigma3[3] = 0.0e0;
5576 
5577   if(v3rho3 != NULL && (p->info->flags & XC_FLAGS_HAVE_KXC))
5578     v3sigma3[4] = 0.0e0;
5579 
5580   if(v3rho3 != NULL && (p->info->flags & XC_FLAGS_HAVE_KXC))
5581     v3sigma3[5] = 0.0e0;
5582 
5583   if(v3rho3 != NULL && (p->info->flags & XC_FLAGS_HAVE_KXC))
5584     v3sigma3[6] = 0.0e0;
5585 
5586   if(v3rho3 != NULL && (p->info->flags & XC_FLAGS_HAVE_KXC))
5587     v3sigma3[7] = 0.0e0;
5588 
5589   if(v3rho3 != NULL && (p->info->flags & XC_FLAGS_HAVE_KXC))
5590     v3sigma3[8] = 0.0e0;
5591 
5592   t4213 = t604 * t604;
5593   t4214 = 0.1e1 / t4213;
5594   t4215 = t1908 * t4214;
5595   t4218 = t1912 * t4214 * t1542;
5596   t4220 = t616 * t4214;
5597   t4221 = t4220 * t98;
5598   t4223 = 0.75339284763297627492e-5 * t4215 - 0.98715285596707818933e-3 * t4218 - 0.50670468510094930677e-5 * t4221;
5599   t4224 = t25 * t4223;
5600   t4232 = t1065 * t302;
5601   t4233 = t1937 * t4232;
5602   t4236 = t768 * t1088;
5603   t4239 = t1069 * t292;
5604   t4253 = t4239 * t661;
5605   t4267 = t4239 * t1987;
5606   t4275 = 0.53114609167735973502e-1 * t54 * t1949 * t4239 - 0.12461621718547169973e1 * t1954 * t61 * t4239 * t247 - 0.10622921833547194700e0 * t772 * t773 * t1060 + 0.49846486874188679892e1 * t777 * t1157 * t1060 - 0.11432585570925925678e2 * t1967 * t4253 * t106 + 0.70819478890314631335e-1 * t54 * t236 * t4223 + 0.16615495624729559964e1 * t240 * t61 * t4223 * t247 - 0.22865171141851851357e2 * t659 * t3089 * t1168 + 0.10488523547622316684e3 * t1984 * t4267 * t242 - 0.76217237139506171188e1 * t658 * t489 * t4239 * t661;
5607   t4276 = t234 * t4275;
5608   t4278 = -0.6e1 * t104 * t4233 + 0.6e1 * t104 * t4236 - t104 * t4276 - 0.3e1 * t1061 * t303 + 0.6e1 * t293 * t1066 - 0.3e1 * t293 * t1089 + t4224 * t115;
5609   t4279 = t286 * t4278;
5610   if(v3rho3 != NULL && (p->info->flags & XC_FLAGS_HAVE_KXC))
5611     v3sigma3[9] = -0.3e1 / 0.8e1 * t262 * t4279;
5612 
5613   t4282 = t428 * t141;
5614   t4283 = 0.1e1 / t4282;
5615   t4284 = t1536 * t4283;
5616   t4287 = t1540 * t4283 * t1542;
5617   t4289 = t440 * t4283;
5618   t4290 = t4289 * t46;
5619   t4292 = 0.15067856952659525498e-4 * t4284 - 0.19743057119341563786e-2 * t4287 - 0.10134093702018986135e-4 * t4290;
5620   t4293 = t25 * t4292;
5621   t4305 = t2420 * t1020;
5622   t4308 = t3156 * t279;
5623   t4311 = t821 * t1043;
5624   t4317 = t1024 * t179;
5625   t4327 = t1015 * t179;
5626   t4344 = t3199 * t1126;
5627   t4347 = t174 * t1024;
5628   t4354 = t62 * t1015;
5629   t4358 = 0.53114609167735973502e-1 * t2133 * t825 * t1024 - 0.12461621718547169973e1 * t2137 * t4317 * t314 - 0.70819478890314631336e-1 * t705 * t3185 * t269 - 0.35409739445157315668e-1 * t705 * t825 * t1015 + 0.16615495624729559964e1 * t710 * t4327 * t314 - 0.11432585570925925678e2 * t1597 * t1039 * t1357 + 0.33230991249459119928e1 * t710 * t1115 * t1104 + 0.70819478890314631335e-1 * t54 * t162 * t4292 + 0.16615495624729559964e1 * t167 * t61 * t4292 * t179 - 0.15243447427901234238e2 * t490 * t4344 + 0.10488523547622316684e3 * t1618 * t2464 * t4347 - 0.76217237139506171188e1 * t490 * t839 * t1024 - 0.76217237139506171188e1 * t490 * t839 * t4354;
5630   t4359 = t160 * t4358;
5631   t4361 = -t1016 * t325 + 0.2e1 * t315 * t1021 - t315 * t1044 - 0.2e1 * t1105 * t280 + 0.4e1 * t270 * t1109 - 0.2e1 * t270 * t1131 + t4293 * t71 - 0.6e1 * t52 * t4305 + 0.4e1 * t52 * t4308 + 0.2e1 * t52 * t4311 - t52 * t4359;
5632   t4362 = t263 * t4361;
5633   if(v3rho3 != NULL && (p->info->flags & XC_FLAGS_NEEDS_LAPLACIAN) && (p->info->flags & XC_FLAGS_HAVE_KXC))
5634     v3sigma2lapl[0] = -0.3e1 / 0.8e1 * t262 * t4362;
5635 
5636   if(v3rho3 != NULL && (p->info->flags & XC_FLAGS_NEEDS_LAPLACIAN) && (p->info->flags & XC_FLAGS_HAVE_KXC))
5637     v3sigma2lapl[1] = 0.0e0;
5638 
5639   if(v3rho3 != NULL && (p->info->flags & XC_FLAGS_NEEDS_LAPLACIAN) && (p->info->flags & XC_FLAGS_HAVE_KXC))
5640     v3sigma2lapl[2] = 0.0e0;
5641 
5642   if(v3rho3 != NULL && (p->info->flags & XC_FLAGS_NEEDS_LAPLACIAN) && (p->info->flags & XC_FLAGS_HAVE_KXC))
5643     v3sigma2lapl[3] = 0.0e0;
5644 
5645   if(v3rho3 != NULL && (p->info->flags & XC_FLAGS_NEEDS_LAPLACIAN) && (p->info->flags & XC_FLAGS_HAVE_KXC))
5646     v3sigma2lapl[4] = 0.0e0;
5647 
5648   if(v3rho3 != NULL && (p->info->flags & XC_FLAGS_NEEDS_LAPLACIAN) && (p->info->flags & XC_FLAGS_HAVE_KXC))
5649     v3sigma2lapl[5] = 0.0e0;
5650 
5651   if(v3rho3 != NULL && (p->info->flags & XC_FLAGS_NEEDS_LAPLACIAN) && (p->info->flags & XC_FLAGS_HAVE_KXC))
5652     v3sigma2lapl[6] = 0.0e0;
5653 
5654   if(v3rho3 != NULL && (p->info->flags & XC_FLAGS_NEEDS_LAPLACIAN) && (p->info->flags & XC_FLAGS_HAVE_KXC))
5655     v3sigma2lapl[7] = 0.0e0;
5656 
5657   if(v3rho3 != NULL && (p->info->flags & XC_FLAGS_NEEDS_LAPLACIAN) && (p->info->flags & XC_FLAGS_HAVE_KXC))
5658     v3sigma2lapl[8] = 0.0e0;
5659 
5660   if(v3rho3 != NULL && (p->info->flags & XC_FLAGS_NEEDS_LAPLACIAN) && (p->info->flags & XC_FLAGS_HAVE_KXC))
5661     v3sigma2lapl[9] = 0.0e0;
5662 
5663   if(v3rho3 != NULL && (p->info->flags & XC_FLAGS_NEEDS_LAPLACIAN) && (p->info->flags & XC_FLAGS_HAVE_KXC))
5664     v3sigma2lapl[10] = 0.0e0;
5665 
5666   t4365 = t604 * t215;
5667   t4366 = 0.1e1 / t4365;
5668   t4367 = t1908 * t4366;
5669   t4370 = t1912 * t4366 * t1542;
5670   t4372 = t616 * t4366;
5671   t4373 = t4372 * t98;
5672   t4375 = 0.15067856952659525498e-4 * t4367 - 0.19743057119341563786e-2 * t4370 - 0.10134093702018986135e-4 * t4373;
5673   t4376 = t25 * t4375;
5674   t4388 = t2580 * t1065;
5675   t4391 = t3277 * t302;
5676   t4394 = t878 * t1088;
5677   t4400 = t1069 * t247;
5678   t4410 = t1060 * t247;
5679   t4427 = t3320 * t1168;
5680   t4430 = t242 * t1069;
5681   t4437 = t106 * t1060;
5682   t4441 = 0.53114609167735973502e-1 * t2314 * t882 * t1069 - 0.12461621718547169973e1 * t2318 * t4400 * t336 - 0.70819478890314631336e-1 * t772 * t3306 * t292 - 0.35409739445157315668e-1 * t772 * t882 * t1060 + 0.16615495624729559964e1 * t777 * t4410 * t336 - 0.11432585570925925678e2 * t1967 * t1084 * t1392 + 0.33230991249459119928e1 * t777 * t1157 * t1146 + 0.70819478890314631335e-1 * t54 * t236 * t4375 + 0.16615495624729559964e1 * t240 * t61 * t4375 * t247 - 0.15243447427901234238e2 * t659 * t4427 + 0.10488523547622316684e3 * t1984 * t2624 * t4430 - 0.76217237139506171188e1 * t659 * t896 * t1069 - 0.76217237139506171188e1 * t659 * t896 * t4437;
5683   t4442 = t234 * t4441;
5684   t4444 = -0.6e1 * t104 * t4388 + 0.4e1 * t104 * t4391 + 0.2e1 * t104 * t4394 - t104 * t4442 - t1061 * t347 + 0.2e1 * t337 * t1066 - t337 * t1089 - 0.2e1 * t1147 * t303 + t4376 * t115 + 0.4e1 * t293 * t1151 - 0.2e1 * t293 * t1173;
5685   t4445 = t286 * t4444;
5686   if(v3rho3 != NULL && (p->info->flags & XC_FLAGS_NEEDS_LAPLACIAN) && (p->info->flags & XC_FLAGS_HAVE_KXC))
5687     v3sigma2lapl[11] = -0.3e1 / 0.8e1 * t262 * t4445;
5688 
5689   t4451 = -0.60271427810638101992e-4 * t4284 + 0.78972228477366255144e-2 * t4287 + 0.40536374808075944541e-4 * t4290;
5690   t4452 = t25 * t4451;
5691   t4464 = t2682 * t1020;
5692   t4467 = t3382 * t279;
5693   t4470 = t923 * t1043;
5694   t4501 = t3421 * t1126;
5695   t4504 = t2727 * t4347;
5696   t4510 = t941 * t4354;
5697   t4513 = 0.53114609167735973502e-1 * t2133 * t927 * t1024 - 0.12461621718547169973e1 * t2137 * t4317 * t355 - 0.70819478890314631336e-1 * t705 * t3407 * t269 - 0.35409739445157315668e-1 * t705 * t927 * t1015 + 0.16615495624729559964e1 * t710 * t4327 * t355 - 0.11432585570925925678e2 * t1597 * t1039 * t2709 + 0.33230991249459119928e1 * t710 * t1115 * t1181 + 0.70819478890314631335e-1 * t54 * t162 * t4451 + 0.16615495624729559964e1 * t167 * t61 * t4451 * t179 - 0.15243447427901234238e2 * t490 * t4501 + 0.10488523547622316684e3 * t1618 * t4504 - 0.76217237139506171188e1 * t490 * t941 * t1024 - 0.76217237139506171188e1 * t490 * t4510;
5698   t4514 = t160 * t4513;
5699   t4516 = -t1016 * t366 + 0.2e1 * t356 * t1021 - t356 * t1044 - 0.2e1 * t1182 * t280 + 0.4e1 * t270 * t1186 - 0.2e1 * t270 * t1206 + t4452 * t71 - 0.6e1 * t52 * t4464 + 0.4e1 * t52 * t4467 + 0.2e1 * t52 * t4470 - t52 * t4514;
5700   t4517 = t263 * t4516;
5701   if(v3rho3 != NULL && (p->info->flags & XC_FLAGS_HAVE_KXC))
5702     v3sigma2tau[0] = -0.3e1 / 0.8e1 * t262 * t4517;
5703 
5704   if(v3rho3 != NULL && (p->info->flags & XC_FLAGS_HAVE_KXC))
5705     v3sigma2tau[1] = 0.0e0;
5706 
5707   if(v3rho3 != NULL && (p->info->flags & XC_FLAGS_HAVE_KXC))
5708     v3sigma2tau[2] = 0.0e0;
5709 
5710   if(v3rho3 != NULL && (p->info->flags & XC_FLAGS_HAVE_KXC))
5711     v3sigma2tau[3] = 0.0e0;
5712 
5713   if(v3rho3 != NULL && (p->info->flags & XC_FLAGS_HAVE_KXC))
5714     v3sigma2tau[4] = 0.0e0;
5715 
5716   if(v3rho3 != NULL && (p->info->flags & XC_FLAGS_HAVE_KXC))
5717     v3sigma2tau[5] = 0.0e0;
5718 
5719   if(v3rho3 != NULL && (p->info->flags & XC_FLAGS_HAVE_KXC))
5720     v3sigma2tau[6] = 0.0e0;
5721 
5722   if(v3rho3 != NULL && (p->info->flags & XC_FLAGS_HAVE_KXC))
5723     v3sigma2tau[7] = 0.0e0;
5724 
5725   if(v3rho3 != NULL && (p->info->flags & XC_FLAGS_HAVE_KXC))
5726     v3sigma2tau[8] = 0.0e0;
5727 
5728   if(v3rho3 != NULL && (p->info->flags & XC_FLAGS_HAVE_KXC))
5729     v3sigma2tau[9] = 0.0e0;
5730 
5731   if(v3rho3 != NULL && (p->info->flags & XC_FLAGS_HAVE_KXC))
5732     v3sigma2tau[10] = 0.0e0;
5733 
5734   t4523 = -0.60271427810638101992e-4 * t4367 + 0.78972228477366255144e-2 * t4370 + 0.40536374808075944541e-4 * t4373;
5735   t4524 = t25 * t4523;
5736   t4536 = t2834 * t1065;
5737   t4539 = t3489 * t302;
5738   t4542 = t976 * t1088;
5739   t4573 = t3528 * t1168;
5740   t4576 = t2879 * t4430;
5741   t4582 = t994 * t4437;
5742   t4585 = 0.53114609167735973502e-1 * t2314 * t980 * t1069 - 0.12461621718547169973e1 * t2318 * t4400 * t374 - 0.70819478890314631336e-1 * t772 * t3514 * t292 - 0.35409739445157315668e-1 * t772 * t980 * t1060 + 0.16615495624729559964e1 * t777 * t4410 * t374 - 0.11432585570925925678e2 * t1967 * t1084 * t2861 + 0.33230991249459119928e1 * t777 * t1157 * t1214 + 0.70819478890314631335e-1 * t54 * t236 * t4523 + 0.16615495624729559964e1 * t240 * t61 * t4523 * t247 - 0.15243447427901234238e2 * t659 * t4573 + 0.10488523547622316684e3 * t1984 * t4576 - 0.76217237139506171188e1 * t659 * t994 * t1069 - 0.76217237139506171188e1 * t659 * t4582;
5743   t4586 = t234 * t4585;
5744   t4588 = -0.6e1 * t104 * t4536 + 0.4e1 * t104 * t4539 + 0.2e1 * t104 * t4542 - t104 * t4586 - t1061 * t385 + 0.2e1 * t375 * t1066 - t375 * t1089 + t4524 * t115 - 0.2e1 * t1215 * t303 + 0.4e1 * t293 * t1219 - 0.2e1 * t293 * t1239;
5745   t4589 = t286 * t4588;
5746   if(v3rho3 != NULL && (p->info->flags & XC_FLAGS_HAVE_KXC))
5747     v3sigma2tau[11] = -0.3e1 / 0.8e1 * t262 * t4589;
5748 
5749   t4592 = 0.1e1 / t2909;
5750   t4593 = t1536 * t4592;
5751   t4596 = t1540 * t4592 * t1542;
5752   t4598 = t440 * t4592;
5753   t4599 = t4598 * t46;
5754   t4601 = 0.30135713905319050996e-4 * t4593 - 0.39486114238683127572e-2 * t4596 - 0.20268187404037972271e-4 * t4599;
5755   t4602 = t25 * t4601;
5756   t4613 = t3582 * t279;
5757   t4616 = t821 * t1130;
5758   t4620 = t3590 * t279;
5759   t4651 = t3624 * t1126;
5760   t4654 = t62 * t1104;
5761   t4658 = t174 * t269;
5762   t4665 = 0.53114609167735973502e-1 * t2133 * t3594 * t269 - 0.12461621718547169973e1 * t2137 * t1115 * t1263 - 0.70819478890314631336e-1 * t705 * t825 * t1104 + 0.33230991249459119928e1 * t710 * t1346 * t1104 - 0.11432585570925925678e2 * t1597 * t1278 * t1126 - 0.35409739445157315668e-1 * t705 * t3610 * t269 + 0.16615495624729559964e1 * t710 * t1115 * t1254 + 0.70819478890314631335e-1 * t54 * t162 * t4601 + 0.16615495624729559964e1 * t167 * t61 * t4601 * t179 - 0.76217237139506171188e1 * t490 * t4651 - 0.15243447427901234238e2 * t490 * t839 * t4654 + 0.10488523547622316684e3 * t1618 * t3632 * t4658 - 0.76217237139506171188e1 * t490 * t1278 * t269;
5763   t4666 = t160 * t4665;
5764   t4668 = -0.2e1 * t1105 * t325 + 0.4e1 * t315 * t1109 - 0.2e1 * t315 * t1131 - t1255 * t280 + 0.2e1 * t270 * t1260 - t270 * t1283 + t4602 * t71 - 0.6e1 * t52 * t4613 + 0.4e1 * t52 * t4616 + 0.2e1 * t52 * t4620 - t52 * t4666;
5765   t4669 = t263 * t4668;
5766   if(v3rho3 != NULL && (p->info->flags & XC_FLAGS_NEEDS_LAPLACIAN) && (p->info->flags & XC_FLAGS_HAVE_KXC))
5767     v3sigmalapl2[0] = -0.3e1 / 0.8e1 * t262 * t4669;
5768 
5769   if(v3rho3 != NULL && (p->info->flags & XC_FLAGS_NEEDS_LAPLACIAN) && (p->info->flags & XC_FLAGS_HAVE_KXC))
5770     v3sigmalapl2[1] = 0.0e0;
5771 
5772   if(v3rho3 != NULL && (p->info->flags & XC_FLAGS_NEEDS_LAPLACIAN) && (p->info->flags & XC_FLAGS_HAVE_KXC))
5773     v3sigmalapl2[2] = 0.0e0;
5774 
5775   if(v3rho3 != NULL && (p->info->flags & XC_FLAGS_NEEDS_LAPLACIAN) && (p->info->flags & XC_FLAGS_HAVE_KXC))
5776     v3sigmalapl2[3] = 0.0e0;
5777 
5778   if(v3rho3 != NULL && (p->info->flags & XC_FLAGS_NEEDS_LAPLACIAN) && (p->info->flags & XC_FLAGS_HAVE_KXC))
5779     v3sigmalapl2[4] = 0.0e0;
5780 
5781   if(v3rho3 != NULL && (p->info->flags & XC_FLAGS_NEEDS_LAPLACIAN) && (p->info->flags & XC_FLAGS_HAVE_KXC))
5782     v3sigmalapl2[5] = 0.0e0;
5783 
5784   if(v3rho3 != NULL && (p->info->flags & XC_FLAGS_NEEDS_LAPLACIAN) && (p->info->flags & XC_FLAGS_HAVE_KXC))
5785     v3sigmalapl2[6] = 0.0e0;
5786 
5787   if(v3rho3 != NULL && (p->info->flags & XC_FLAGS_NEEDS_LAPLACIAN) && (p->info->flags & XC_FLAGS_HAVE_KXC))
5788     v3sigmalapl2[7] = 0.0e0;
5789 
5790   t4672 = 0.1e1 / t3021;
5791   t4673 = t1908 * t4672;
5792   t4676 = t1912 * t4672 * t1542;
5793   t4678 = t616 * t4672;
5794   t4679 = t4678 * t98;
5795   t4681 = 0.30135713905319050996e-4 * t4673 - 0.39486114238683127572e-2 * t4676 - 0.20268187404037972271e-4 * t4679;
5796   t4682 = t25 * t4681;
5797   t4693 = t3684 * t302;
5798   t4696 = t878 * t1172;
5799   t4700 = t3692 * t302;
5800   t4731 = t3726 * t1168;
5801   t4734 = t106 * t1146;
5802   t4738 = t242 * t292;
5803   t4745 = 0.53114609167735973502e-1 * t2314 * t3696 * t292 - 0.12461621718547169973e1 * t2318 * t1157 * t1307 - 0.70819478890314631336e-1 * t772 * t882 * t1146 + 0.33230991249459119928e1 * t777 * t1381 * t1146 - 0.11432585570925925678e2 * t1967 * t1322 * t1168 - 0.35409739445157315668e-1 * t772 * t3712 * t292 + 0.16615495624729559964e1 * t777 * t1157 * t1298 + 0.70819478890314631335e-1 * t54 * t236 * t4681 + 0.16615495624729559964e1 * t240 * t61 * t4681 * t247 - 0.76217237139506171188e1 * t659 * t4731 - 0.15243447427901234238e2 * t659 * t896 * t4734 + 0.10488523547622316684e3 * t1984 * t3734 * t4738 - 0.76217237139506171188e1 * t659 * t1322 * t292;
5804   t4746 = t234 * t4745;
5805   t4748 = -0.6e1 * t104 * t4693 + 0.4e1 * t104 * t4696 + 0.2e1 * t104 * t4700 - t104 * t4746 - 0.2e1 * t1147 * t347 + t4682 * t115 + 0.4e1 * t337 * t1151 - 0.2e1 * t337 * t1173 - t1299 * t303 + 0.2e1 * t293 * t1304 - t293 * t1327;
5806   t4749 = t286 * t4748;
5807   if(v3rho3 != NULL && (p->info->flags & XC_FLAGS_NEEDS_LAPLACIAN) && (p->info->flags & XC_FLAGS_HAVE_KXC))
5808     v3sigmalapl2[8] = -0.3e1 / 0.8e1 * t262 * t4749;
5809 
5810   t4755 = -0.12054285562127620398e-3 * t4593 + 0.15794445695473251028e-1 * t4596 + 0.81072749616151889082e-4 * t4599;
5811   t4756 = t25 * t4755;
5812   t4769 = t3773 * t279;
5813   t4772 = t3382 * t324;
5814   t4775 = t923 * t1130;
5815   t4779 = t3784 * t279;
5816   t4785 = t1115 * t3792;
5817   t4794 = t1104 * t179;
5818   t4816 = t3827 * t1126;
5819   t4819 = t3421 * t1357;
5820   t4822 = t3208 * t3164;
5821   t4828 = t941 * t4654;
5822   t4831 = 0.53114609167735973502e-1 * t2133 * t927 * t3164 - 0.12461621718547169973e1 * t2137 * t4785 - 0.35409739445157315668e-1 * t705 * t3407 * t314 - 0.35409739445157315668e-1 * t705 * t927 * t1104 + 0.16615495624729559964e1 * t710 * t4794 * t355 - 0.11432585570925925678e2 * t3807 * t1202 + 0.16615495624729559964e1 * t710 * t1346 * t1181 - 0.35409739445157315668e-1 * t705 * t3813 * t269 + 0.16615495624729559964e1 * t710 * t1115 * t1335 + 0.70819478890314631335e-1 * t54 * t162 * t4755 + 0.16615495624729559964e1 * t167 * t61 * t4755 * t179 - 0.76217237139506171188e1 * t490 * t4816 - 0.76217237139506171188e1 * t490 * t4819 + 0.10488523547622316684e3 * t3429 * t4822 - 0.76217237139506171188e1 * t490 * t941 * t3164 - 0.76217237139506171188e1 * t490 * t4828;
5823   t4832 = t160 * t4831;
5824   t4834 = -t1105 * t366 + 0.2e1 * t356 * t1109 - t356 * t1131 - t1182 * t325 + 0.2e1 * t315 * t1186 - t315 * t1206 - t1336 * t280 + 0.2e1 * t270 * t1340 - t270 * t1362 - 0.6e1 * t3144 * t4769 + t4756 * t71 + 0.2e1 * t52 * t4772 + 0.2e1 * t52 * t4775 + 0.2e1 * t52 * t4779 - t52 * t4832;
5825   t4835 = t263 * t4834;
5826   if(v3rho3 != NULL && (p->info->flags & XC_FLAGS_NEEDS_LAPLACIAN) && (p->info->flags & XC_FLAGS_HAVE_KXC))
5827     v3sigmalapltau[0] = -0.3e1 / 0.8e1 * t262 * t4835;
5828 
5829   if(v3rho3 != NULL && (p->info->flags & XC_FLAGS_NEEDS_LAPLACIAN) && (p->info->flags & XC_FLAGS_HAVE_KXC))
5830     v3sigmalapltau[1] = 0.0e0;
5831 
5832   if(v3rho3 != NULL && (p->info->flags & XC_FLAGS_NEEDS_LAPLACIAN) && (p->info->flags & XC_FLAGS_HAVE_KXC))
5833     v3sigmalapltau[2] = 0.0e0;
5834 
5835   if(v3rho3 != NULL && (p->info->flags & XC_FLAGS_NEEDS_LAPLACIAN) && (p->info->flags & XC_FLAGS_HAVE_KXC))
5836     v3sigmalapltau[3] = 0.0e0;
5837 
5838   if(v3rho3 != NULL && (p->info->flags & XC_FLAGS_NEEDS_LAPLACIAN) && (p->info->flags & XC_FLAGS_HAVE_KXC))
5839     v3sigmalapltau[4] = 0.0e0;
5840 
5841   if(v3rho3 != NULL && (p->info->flags & XC_FLAGS_NEEDS_LAPLACIAN) && (p->info->flags & XC_FLAGS_HAVE_KXC))
5842     v3sigmalapltau[5] = 0.0e0;
5843 
5844   if(v3rho3 != NULL && (p->info->flags & XC_FLAGS_NEEDS_LAPLACIAN) && (p->info->flags & XC_FLAGS_HAVE_KXC))
5845     v3sigmalapltau[6] = 0.0e0;
5846 
5847   if(v3rho3 != NULL && (p->info->flags & XC_FLAGS_NEEDS_LAPLACIAN) && (p->info->flags & XC_FLAGS_HAVE_KXC))
5848     v3sigmalapltau[7] = 0.0e0;
5849 
5850   if(v3rho3 != NULL && (p->info->flags & XC_FLAGS_NEEDS_LAPLACIAN) && (p->info->flags & XC_FLAGS_HAVE_KXC))
5851     v3sigmalapltau[8] = 0.0e0;
5852 
5853   if(v3rho3 != NULL && (p->info->flags & XC_FLAGS_NEEDS_LAPLACIAN) && (p->info->flags & XC_FLAGS_HAVE_KXC))
5854     v3sigmalapltau[9] = 0.0e0;
5855 
5856   if(v3rho3 != NULL && (p->info->flags & XC_FLAGS_NEEDS_LAPLACIAN) && (p->info->flags & XC_FLAGS_HAVE_KXC))
5857     v3sigmalapltau[10] = 0.0e0;
5858 
5859   t4841 = -0.12054285562127620398e-3 * t4673 + 0.15794445695473251028e-1 * t4676 + 0.81072749616151889082e-4 * t4679;
5860   t4842 = t25 * t4841;
5861   t4855 = t3883 * t302;
5862   t4858 = t3489 * t346;
5863   t4861 = t976 * t1172;
5864   t4865 = t3894 * t302;
5865   t4871 = t1157 * t3902;
5866   t4880 = t1146 * t247;
5867   t4902 = t3937 * t1168;
5868   t4905 = t3528 * t1392;
5869   t4908 = t3329 * t3285;
5870   t4914 = t994 * t4734;
5871   t4917 = 0.53114609167735973502e-1 * t2314 * t980 * t3285 - 0.12461621718547169973e1 * t2318 * t4871 - 0.35409739445157315668e-1 * t772 * t3514 * t336 - 0.35409739445157315668e-1 * t772 * t980 * t1146 + 0.16615495624729559964e1 * t777 * t4880 * t374 - 0.11432585570925925678e2 * t3917 * t1235 + 0.16615495624729559964e1 * t777 * t1381 * t1214 - 0.35409739445157315668e-1 * t772 * t3923 * t292 + 0.16615495624729559964e1 * t777 * t1157 * t1370 + 0.70819478890314631335e-1 * t54 * t236 * t4841 + 0.16615495624729559964e1 * t240 * t61 * t4841 * t247 - 0.76217237139506171188e1 * t659 * t4902 - 0.76217237139506171188e1 * t659 * t4905 + 0.10488523547622316684e3 * t3536 * t4908 - 0.76217237139506171188e1 * t659 * t994 * t3285 - 0.76217237139506171188e1 * t659 * t4914;
5872   t4918 = t234 * t4917;
5873   t4920 = 0.2e1 * t104 * t4858 + 0.2e1 * t104 * t4861 + 0.2e1 * t104 * t4865 - t104 * t4918 - t1147 * t385 + t4842 * t115 + 0.2e1 * t375 * t1151 - t375 * t1173 - t1215 * t347 + 0.2e1 * t337 * t1219 - t337 * t1239 - t1371 * t303 + 0.2e1 * t293 * t1375 - t293 * t1397 - 0.6e1 * t3265 * t4855;
5874   t4921 = t286 * t4920;
5875   if(v3rho3 != NULL && (p->info->flags & XC_FLAGS_NEEDS_LAPLACIAN) && (p->info->flags & XC_FLAGS_HAVE_KXC))
5876     v3sigmalapltau[11] = -0.3e1 / 0.8e1 * t262 * t4921;
5877 
5878   t4927 = 0.48217142248510481592e-3 * t4593 - 0.63177782781893004114e-1 * t4596 - 0.32429099846460755632e-3 * t4599;
5879   t4928 = t25 * t4927;
5880   t4939 = t3983 * t279;
5881   t4942 = t923 * t1205;
5882   t4946 = t3991 * t279;
5883   t4961 = t1429 * t1126;
5884   t4977 = t4026 * t1126;
5885   t4980 = t62 * t1181;
5886   t4990 = 0.53114609167735973502e-1 * t2133 * t3995 * t269 - 0.12461621718547169973e1 * t2137 * t1115 * t1414 - 0.70819478890314631336e-1 * t705 * t927 * t1181 + 0.33230991249459119928e1 * t710 * t4005 * t1181 - 0.11432585570925925678e2 * t1597 * t4961 - 0.35409739445157315668e-1 * t705 * t4012 * t269 + 0.16615495624729559964e1 * t710 * t1115 * t1405 + 0.70819478890314631335e-1 * t54 * t162 * t4927 + 0.16615495624729559964e1 * t167 * t61 * t4927 * t179 - 0.76217237139506171188e1 * t490 * t4977 - 0.15243447427901234238e2 * t490 * t941 * t4980 + 0.10488523547622316684e3 * t1618 * t4034 * t4658 - 0.76217237139506171188e1 * t490 * t1429 * t269;
5887   t4991 = t160 * t4990;
5888   t4993 = -0.2e1 * t1182 * t366 + 0.4e1 * t356 * t1186 - 0.2e1 * t356 * t1206 - t1406 * t280 + 0.2e1 * t270 * t1411 - t270 * t1434 + t4928 * t71 - 0.6e1 * t52 * t4939 + 0.4e1 * t52 * t4942 + 0.2e1 * t52 * t4946 - t52 * t4991;
5889   t4994 = t263 * t4993;
5890   if(v3rho3 != NULL && (p->info->flags & XC_FLAGS_HAVE_KXC))
5891     v3sigmatau2[0] = -0.3e1 / 0.8e1 * t262 * t4994;
5892 
5893   if(v3rho3 != NULL && (p->info->flags & XC_FLAGS_HAVE_KXC))
5894     v3sigmatau2[1] = 0.0e0;
5895 
5896   if(v3rho3 != NULL && (p->info->flags & XC_FLAGS_HAVE_KXC))
5897     v3sigmatau2[2] = 0.0e0;
5898 
5899   if(v3rho3 != NULL && (p->info->flags & XC_FLAGS_HAVE_KXC))
5900     v3sigmatau2[3] = 0.0e0;
5901 
5902   if(v3rho3 != NULL && (p->info->flags & XC_FLAGS_HAVE_KXC))
5903     v3sigmatau2[4] = 0.0e0;
5904 
5905   if(v3rho3 != NULL && (p->info->flags & XC_FLAGS_HAVE_KXC))
5906     v3sigmatau2[5] = 0.0e0;
5907 
5908   if(v3rho3 != NULL && (p->info->flags & XC_FLAGS_HAVE_KXC))
5909     v3sigmatau2[6] = 0.0e0;
5910 
5911   if(v3rho3 != NULL && (p->info->flags & XC_FLAGS_HAVE_KXC))
5912     v3sigmatau2[7] = 0.0e0;
5913 
5914   t5000 = 0.48217142248510481592e-3 * t4673 - 0.63177782781893004114e-1 * t4676 - 0.32429099846460755632e-3 * t4679;
5915   t5001 = t25 * t5000;
5916   t5012 = t4079 * t302;
5917   t5015 = t976 * t1238;
5918   t5019 = t4087 * t302;
5919   t5034 = t1466 * t1168;
5920   t5050 = t4122 * t1168;
5921   t5053 = t106 * t1214;
5922   t5063 = 0.53114609167735973502e-1 * t2314 * t4091 * t292 - 0.12461621718547169973e1 * t2318 * t1157 * t1451 - 0.70819478890314631336e-1 * t772 * t980 * t1214 + 0.33230991249459119928e1 * t777 * t4101 * t1214 - 0.11432585570925925678e2 * t1967 * t5034 - 0.35409739445157315668e-1 * t772 * t4108 * t292 + 0.16615495624729559964e1 * t777 * t1157 * t1442 + 0.70819478890314631335e-1 * t54 * t236 * t5000 + 0.16615495624729559964e1 * t240 * t61 * t5000 * t247 - 0.76217237139506171188e1 * t659 * t5050 - 0.15243447427901234238e2 * t659 * t994 * t5053 + 0.10488523547622316684e3 * t1984 * t4130 * t4738 - 0.76217237139506171188e1 * t659 * t1466 * t292;
5923   t5064 = t234 * t5063;
5924   t5066 = -0.6e1 * t104 * t5012 + 0.4e1 * t104 * t5015 + 0.2e1 * t104 * t5019 - t104 * t5064 + t5001 * t115 - 0.2e1 * t1215 * t385 + 0.4e1 * t375 * t1219 - 0.2e1 * t375 * t1239 - t1443 * t303 + 0.2e1 * t293 * t1448 - t293 * t1471;
5925   t5067 = t286 * t5066;
5926   if(v3rho3 != NULL && (p->info->flags & XC_FLAGS_HAVE_KXC))
5927     v3sigmatau2[8] = -0.3e1 / 0.8e1 * t262 * t5067;
5928 
5929   t5070 = 0.1e1 / t1005;
5930   t5071 = t1536 * t5070;
5931   t5074 = t1540 * t5070 * t1542;
5932   t5076 = t440 * t5070;
5933   t5077 = t5076 * t46;
5934   t5079 = 0.60271427810638101989e-4 * t5071 - 0.78972228477366255143e-2 * t5074 - 0.40536374808075944541e-4 * t5077;
5935   t5080 = t25 * t5079;
5936   t5088 = t1259 * t324;
5937   t5089 = t1567 * t5088;
5938   t5092 = t821 * t1282;
5939   t5095 = t1263 * t314;
5940   t5109 = t5095 * t492;
5941   t5123 = t5095 * t1621;
5942   t5131 = 0.53114609167735973502e-1 * t54 * t1579 * t5095 - 0.12461621718547169973e1 * t1584 * t61 * t5095 * t179 - 0.10622921833547194700e0 * t705 * t825 * t1254 + 0.49846486874188679892e1 * t710 * t1346 * t1254 - 0.11432585570925925678e2 * t1597 * t5109 * t62 + 0.70819478890314631335e-1 * t54 * t162 * t5079 + 0.16615495624729559964e1 * t167 * t61 * t5079 * t179 - 0.22865171141851851357e2 * t490 * t3624 * t1357 + 0.10488523547622316684e3 * t1618 * t5123 * t174 - 0.76217237139506171188e1 * t488 * t489 * t5095 * t492;
5943   t5132 = t160 * t5131;
5944   t5134 = -0.3e1 * t1255 * t325 + 0.6e1 * t315 * t1260 - 0.3e1 * t315 * t1283 + t5080 * t71 - 0.6e1 * t52 * t5089 + 0.6e1 * t52 * t5092 - t52 * t5132;
5945   t5135 = t263 * t5134;
5946   if(v3rho3 != NULL && (p->info->flags & XC_FLAGS_NEEDS_LAPLACIAN) && (p->info->flags & XC_FLAGS_HAVE_KXC))
5947     v3lapl3[0] = -0.3e1 / 0.8e1 * t262 * t5135;
5948 
5949   if(v3rho3 != NULL && (p->info->flags & XC_FLAGS_NEEDS_LAPLACIAN) && (p->info->flags & XC_FLAGS_HAVE_KXC))
5950     v3lapl3[1] = 0.0e0;
5951 
5952   if(v3rho3 != NULL && (p->info->flags & XC_FLAGS_NEEDS_LAPLACIAN) && (p->info->flags & XC_FLAGS_HAVE_KXC))
5953     v3lapl3[2] = 0.0e0;
5954 
5955   t5138 = 0.1e1 / t1050;
5956   t5139 = t1908 * t5138;
5957   t5142 = t1912 * t5138 * t1542;
5958   t5144 = t616 * t5138;
5959   t5145 = t5144 * t98;
5960   t5147 = 0.60271427810638101989e-4 * t5139 - 0.78972228477366255143e-2 * t5142 - 0.40536374808075944541e-4 * t5145;
5961   t5148 = t25 * t5147;
5962   t5156 = t1303 * t346;
5963   t5157 = t1937 * t5156;
5964   t5160 = t878 * t1326;
5965   t5163 = t1307 * t336;
5966   t5177 = t5163 * t661;
5967   t5191 = t5163 * t1987;
5968   t5199 = 0.53114609167735973502e-1 * t54 * t1949 * t5163 - 0.12461621718547169973e1 * t1954 * t61 * t5163 * t247 - 0.10622921833547194700e0 * t772 * t882 * t1298 + 0.49846486874188679892e1 * t777 * t1381 * t1298 - 0.11432585570925925678e2 * t1967 * t5177 * t106 + 0.70819478890314631335e-1 * t54 * t236 * t5147 + 0.16615495624729559964e1 * t240 * t61 * t5147 * t247 - 0.22865171141851851357e2 * t659 * t3726 * t1392 + 0.10488523547622316684e3 * t1984 * t5191 * t242 - 0.76217237139506171188e1 * t658 * t489 * t5163 * t661;
5969   t5200 = t234 * t5199;
5970   t5202 = -0.6e1 * t104 * t5157 + 0.6e1 * t104 * t5160 - t104 * t5200 + t5148 * t115 - 0.3e1 * t1299 * t347 + 0.6e1 * t337 * t1304 - 0.3e1 * t337 * t1327;
5971   t5203 = t286 * t5202;
5972   if(v3rho3 != NULL && (p->info->flags & XC_FLAGS_NEEDS_LAPLACIAN) && (p->info->flags & XC_FLAGS_HAVE_KXC))
5973     v3lapl3[3] = -0.3e1 / 0.8e1 * t262 * t5203;
5974 
5975   t5209 = -0.24108571124255240795e-3 * t5071 + 0.31588891390946502057e-1 * t5074 + 0.16214549923230377816e-3 * t5077;
5976   t5210 = t25 * t5209;
5977   t5222 = t2682 * t1259;
5978   t5225 = t3784 * t324;
5979   t5228 = t923 * t1282;
5980   t5234 = t1263 * t179;
5981   t5244 = t1254 * t179;
5982   t5261 = t3827 * t1357;
5983   t5264 = t174 * t1263;
5984   t5271 = t62 * t1254;
5985   t5275 = 0.53114609167735973502e-1 * t2133 * t927 * t1263 - 0.12461621718547169973e1 * t2137 * t5234 * t355 - 0.70819478890314631336e-1 * t705 * t3813 * t314 - 0.35409739445157315668e-1 * t705 * t927 * t1254 + 0.16615495624729559964e1 * t710 * t5244 * t355 - 0.11432585570925925678e2 * t1597 * t1278 * t2709 + 0.33230991249459119928e1 * t710 * t1346 * t1335 + 0.70819478890314631335e-1 * t54 * t162 * t5209 + 0.16615495624729559964e1 * t167 * t61 * t5209 * t179 - 0.15243447427901234238e2 * t490 * t5261 + 0.10488523547622316684e3 * t1618 * t2727 * t5264 - 0.76217237139506171188e1 * t490 * t941 * t1263 - 0.76217237139506171188e1 * t490 * t941 * t5271;
5986   t5276 = t160 * t5275;
5987   t5278 = -t1255 * t366 + 0.2e1 * t356 * t1260 - t356 * t1283 - 0.2e1 * t1336 * t325 + 0.4e1 * t315 * t1340 - 0.2e1 * t315 * t1362 - 0.6e1 * t52 * t5222 + 0.4e1 * t52 * t5225 + 0.2e1 * t52 * t5228 - t52 * t5276 + t5210 * t71;
5988   t5279 = t263 * t5278;
5989   if(v3rho3 != NULL && (p->info->flags & XC_FLAGS_NEEDS_LAPLACIAN) && (p->info->flags & XC_FLAGS_HAVE_KXC))
5990     v3lapl2tau[0] = -0.3e1 / 0.8e1 * t262 * t5279;
5991 
5992   if(v3rho3 != NULL && (p->info->flags & XC_FLAGS_NEEDS_LAPLACIAN) && (p->info->flags & XC_FLAGS_HAVE_KXC))
5993     v3lapl2tau[1] = 0.0e0;
5994 
5995   if(v3rho3 != NULL && (p->info->flags & XC_FLAGS_NEEDS_LAPLACIAN) && (p->info->flags & XC_FLAGS_HAVE_KXC))
5996     v3lapl2tau[2] = 0.0e0;
5997 
5998   if(v3rho3 != NULL && (p->info->flags & XC_FLAGS_NEEDS_LAPLACIAN) && (p->info->flags & XC_FLAGS_HAVE_KXC))
5999     v3lapl2tau[3] = 0.0e0;
6000 
6001   if(v3rho3 != NULL && (p->info->flags & XC_FLAGS_NEEDS_LAPLACIAN) && (p->info->flags & XC_FLAGS_HAVE_KXC))
6002     v3lapl2tau[4] = 0.0e0;
6003 
6004   t5285 = -0.24108571124255240795e-3 * t5139 + 0.31588891390946502057e-1 * t5142 + 0.16214549923230377816e-3 * t5145;
6005   t5286 = t25 * t5285;
6006   t5298 = t2834 * t1303;
6007   t5301 = t3894 * t346;
6008   t5304 = t976 * t1326;
6009   t5310 = t1307 * t247;
6010   t5320 = t1298 * t247;
6011   t5337 = t3937 * t1392;
6012   t5340 = t242 * t1307;
6013   t5347 = t106 * t1298;
6014   t5351 = 0.53114609167735973502e-1 * t2314 * t980 * t1307 - 0.12461621718547169973e1 * t2318 * t5310 * t374 - 0.70819478890314631336e-1 * t772 * t3923 * t336 - 0.35409739445157315668e-1 * t772 * t980 * t1298 + 0.16615495624729559964e1 * t777 * t5320 * t374 - 0.11432585570925925678e2 * t1967 * t1322 * t2861 + 0.33230991249459119928e1 * t777 * t1381 * t1370 + 0.70819478890314631335e-1 * t54 * t236 * t5285 + 0.16615495624729559964e1 * t240 * t61 * t5285 * t247 - 0.15243447427901234238e2 * t659 * t5337 + 0.10488523547622316684e3 * t1984 * t2879 * t5340 - 0.76217237139506171188e1 * t659 * t994 * t1307 - 0.76217237139506171188e1 * t659 * t994 * t5347;
6015   t5352 = t234 * t5351;
6016   t5354 = -0.6e1 * t104 * t5298 + 0.4e1 * t104 * t5301 + 0.2e1 * t104 * t5304 - t104 * t5352 + t5286 * t115 - t1299 * t385 + 0.2e1 * t375 * t1304 - t375 * t1327 - 0.2e1 * t1371 * t347 + 0.4e1 * t337 * t1375 - 0.2e1 * t337 * t1397;
6017   t5355 = t286 * t5354;
6018   if(v3rho3 != NULL && (p->info->flags & XC_FLAGS_NEEDS_LAPLACIAN) && (p->info->flags & XC_FLAGS_HAVE_KXC))
6019     v3lapl2tau[5] = -0.3e1 / 0.8e1 * t262 * t5355;
6020 
6021   t5361 = 0.96434284497020963182e-3 * t5071 - 0.12635556556378600823e0 * t5074 - 0.64858199692921511265e-3 * t5077;
6022   t5362 = t25 * t5361;
6023   t5373 = t3983 * t324;
6024   t5376 = t923 * t1361;
6025   t5380 = t3991 * t324;
6026   t5411 = t4026 * t1357;
6027   t5414 = t62 * t1335;
6028   t5418 = t174 * t314;
6029   t5425 = 0.53114609167735973502e-1 * t2133 * t3995 * t314 - 0.12461621718547169973e1 * t2137 * t1346 * t1414 - 0.70819478890314631336e-1 * t705 * t927 * t1335 + 0.33230991249459119928e1 * t710 * t4005 * t1335 - 0.11432585570925925678e2 * t1597 * t1429 * t1357 - 0.35409739445157315668e-1 * t705 * t4012 * t314 + 0.16615495624729559964e1 * t710 * t1346 * t1405 + 0.70819478890314631335e-1 * t54 * t162 * t5361 + 0.16615495624729559964e1 * t167 * t61 * t5361 * t179 - 0.76217237139506171188e1 * t490 * t5411 - 0.15243447427901234238e2 * t490 * t941 * t5414 + 0.10488523547622316684e3 * t1618 * t4034 * t5418 - 0.76217237139506171188e1 * t490 * t1429 * t314;
6030   t5426 = t160 * t5425;
6031   t5428 = -0.2e1 * t1336 * t366 + 0.4e1 * t356 * t1340 - 0.2e1 * t356 * t1362 - t1406 * t325 + 0.2e1 * t315 * t1411 - t315 * t1434 - 0.6e1 * t52 * t5373 + 0.4e1 * t52 * t5376 + 0.2e1 * t52 * t5380 - t52 * t5426 + t5362 * t71;
6032   t5429 = t263 * t5428;
6033   if(v3rho3 != NULL && (p->info->flags & XC_FLAGS_NEEDS_LAPLACIAN) && (p->info->flags & XC_FLAGS_HAVE_KXC))
6034     v3lapltau2[0] = -0.3e1 / 0.8e1 * t262 * t5429;
6035 
6036   if(v3rho3 != NULL && (p->info->flags & XC_FLAGS_NEEDS_LAPLACIAN) && (p->info->flags & XC_FLAGS_HAVE_KXC))
6037     v3lapltau2[1] = 0.0e0;
6038 
6039   if(v3rho3 != NULL && (p->info->flags & XC_FLAGS_NEEDS_LAPLACIAN) && (p->info->flags & XC_FLAGS_HAVE_KXC))
6040     v3lapltau2[2] = 0.0e0;
6041 
6042   if(v3rho3 != NULL && (p->info->flags & XC_FLAGS_NEEDS_LAPLACIAN) && (p->info->flags & XC_FLAGS_HAVE_KXC))
6043     v3lapltau2[3] = 0.0e0;
6044 
6045   if(v3rho3 != NULL && (p->info->flags & XC_FLAGS_NEEDS_LAPLACIAN) && (p->info->flags & XC_FLAGS_HAVE_KXC))
6046     v3lapltau2[4] = 0.0e0;
6047 
6048   t5435 = 0.96434284497020963182e-3 * t5139 - 0.12635556556378600823e0 * t5142 - 0.64858199692921511265e-3 * t5145;
6049   t5436 = t25 * t5435;
6050   t5447 = t4079 * t346;
6051   t5450 = t976 * t1396;
6052   t5454 = t4087 * t346;
6053   t5485 = t4122 * t1392;
6054   t5488 = t106 * t1370;
6055   t5492 = t242 * t336;
6056   t5499 = 0.53114609167735973502e-1 * t2314 * t4091 * t336 - 0.12461621718547169973e1 * t2318 * t1381 * t1451 - 0.70819478890314631336e-1 * t772 * t980 * t1370 + 0.33230991249459119928e1 * t777 * t4101 * t1370 - 0.11432585570925925678e2 * t1967 * t1466 * t1392 - 0.35409739445157315668e-1 * t772 * t4108 * t336 + 0.16615495624729559964e1 * t777 * t1381 * t1442 + 0.70819478890314631335e-1 * t54 * t236 * t5435 + 0.16615495624729559964e1 * t240 * t61 * t5435 * t247 - 0.76217237139506171188e1 * t659 * t5485 - 0.15243447427901234238e2 * t659 * t994 * t5488 + 0.10488523547622316684e3 * t1984 * t4130 * t5492 - 0.76217237139506171188e1 * t659 * t1466 * t336;
6057   t5500 = t234 * t5499;
6058   t5502 = -0.6e1 * t104 * t5447 + 0.4e1 * t104 * t5450 + 0.2e1 * t104 * t5454 - t104 * t5500 + t5436 * t115 - 0.2e1 * t1371 * t385 + 0.4e1 * t375 * t1375 - 0.2e1 * t375 * t1397 - t1443 * t347 + 0.2e1 * t337 * t1448 - t337 * t1471;
6059   t5503 = t286 * t5502;
6060   if(v3rho3 != NULL && (p->info->flags & XC_FLAGS_NEEDS_LAPLACIAN) && (p->info->flags & XC_FLAGS_HAVE_KXC))
6061     v3lapltau2[5] = -0.3e1 / 0.8e1 * t262 * t5503;
6062 
6063   t5509 = -0.38573713798808385273e-2 * t5071 + 0.50542226225514403291e0 * t5074 + 0.25943279877168604506e-2 * t5077;
6064   t5510 = t25 * t5509;
6065   t5518 = t1410 * t365;
6066   t5519 = t1567 * t5518;
6067   t5522 = t923 * t1433;
6068   t5525 = t1414 * t355;
6069   t5539 = t5525 * t492;
6070   t5553 = t5525 * t1621;
6071   t5561 = 0.53114609167735973502e-1 * t54 * t1579 * t5525 - 0.12461621718547169973e1 * t1584 * t61 * t5525 * t179 - 0.10622921833547194700e0 * t705 * t927 * t1405 + 0.49846486874188679892e1 * t710 * t4005 * t1405 - 0.11432585570925925678e2 * t1597 * t5539 * t62 + 0.70819478890314631335e-1 * t54 * t162 * t5509 + 0.16615495624729559964e1 * t167 * t61 * t5509 * t179 - 0.22865171141851851357e2 * t490 * t4026 * t2709 + 0.10488523547622316684e3 * t1618 * t5553 * t174 - 0.76217237139506171188e1 * t488 * t489 * t5525 * t492;
6072   t5562 = t160 * t5561;
6073   t5564 = -0.3e1 * t1406 * t366 + 0.6e1 * t356 * t1411 - 0.3e1 * t356 * t1434 - 0.6e1 * t52 * t5519 + 0.6e1 * t52 * t5522 - t52 * t5562 + t5510 * t71;
6074   t5565 = t263 * t5564;
6075   if(v3rho3 != NULL && (p->info->flags & XC_FLAGS_HAVE_KXC))
6076     v3tau3[0] = -0.3e1 / 0.8e1 * t262 * t5565;
6077 
6078   if(v3rho3 != NULL && (p->info->flags & XC_FLAGS_HAVE_KXC))
6079     v3tau3[1] = 0.0e0;
6080 
6081   if(v3rho3 != NULL && (p->info->flags & XC_FLAGS_HAVE_KXC))
6082     v3tau3[2] = 0.0e0;
6083 
6084   t5571 = -0.38573713798808385273e-2 * t5139 + 0.50542226225514403291e0 * t5142 + 0.25943279877168604506e-2 * t5145;
6085   t5572 = t25 * t5571;
6086   t5580 = t1447 * t384;
6087   t5581 = t1937 * t5580;
6088   t5584 = t976 * t1470;
6089   t5587 = t1451 * t374;
6090   t5601 = t5587 * t661;
6091   t5615 = t5587 * t1987;
6092   t5623 = 0.53114609167735973502e-1 * t54 * t1949 * t5587 - 0.12461621718547169973e1 * t1954 * t61 * t5587 * t247 - 0.10622921833547194700e0 * t772 * t980 * t1442 + 0.49846486874188679892e1 * t777 * t4101 * t1442 - 0.11432585570925925678e2 * t1967 * t5601 * t106 + 0.70819478890314631335e-1 * t54 * t236 * t5571 + 0.16615495624729559964e1 * t240 * t61 * t5571 * t247 - 0.22865171141851851357e2 * t659 * t4122 * t2861 + 0.10488523547622316684e3 * t1984 * t5615 * t242 - 0.76217237139506171188e1 * t658 * t489 * t5587 * t661;
6093   t5624 = t234 * t5623;
6094   t5626 = -0.6e1 * t104 * t5581 + 0.6e1 * t104 * t5584 - t104 * t5624 + t5572 * t115 - 0.3e1 * t1443 * t385 + 0.6e1 * t375 * t1448 - 0.3e1 * t375 * t1471;
6095   t5627 = t286 * t5626;
6096   if(v3rho3 != NULL && (p->info->flags & XC_FLAGS_HAVE_KXC))
6097     v3tau3[3] = -0.3e1 / 0.8e1 * t262 * t5627;
6098 
6099 #ifndef XC_DONT_COMPILE_LXC
6100 
6101   if(order < 4) return;
6102 
6103 
6104   t5632 = 0.5e1 / 0.9e1 * t1491;
6105   t5635 = 0.5e1 / 0.9e1 * t1504;
6106   t5641 = -0.2e1 * t1478 - 0.2e1 * t1487 - t5632 - 0.6e1 * t1495 - 0.2e1 * t1500 - t5635 - 0.2e1 * t1508 - 0.4e1 * t1511 - 0.2e1 * t1513 - 0.6e1 * t1517 - 0.3e1 / 0.2e1 * t1635;
6107   t5656 = t528 * t1722 * t1663;
6108   t5667 = t551 * t1712 * t1655;
6109   t5677 = t8 * t419 * t500;
6110   t5682 = 0.10e2 / 0.27e2 * t8 * t79 * t1750 * t117;
6111   t5686 = 0.10e2 / 0.27e2 * t8 * t16 * t1750 * t73;
6112   t5691 = t8 * t402 * t1515;
6113   t5693 = t412 * t412;
6114   t5698 = t395 * t418;
6115   t5700 = t8 * t5698 * t398;
6116   t5702 = t14 * t14;
6117   t5704 = 0.1e1 / t394 / t5702;
6118   t5705 = t5704 * t17;
6119   t5706 = t397 * t397;
6120   t5711 = t1672 * t134;
6121   t5713 = t8 * t5711 * t1675;
6122   t5716 = t8 * t512 * t1485;
6123   t5718 = t1480 * t10;
6124   t5720 = t9 / t5718;
6125   t5722 = 0.12e2 * t1481 - 0.12e2 * t5720;
6126   t5728 = t8 * t560 * t192;
6127   t5730 = -0.2e1 / 0.3e1 * t528 * t529 * t1497 * t128 - 0.2e1 / 0.3e1 * t5656 + 0.2e1 / 0.3e1 * t1717 * t529 * t397 * t412 + 0.2e1 / 0.3e1 * t1707 * t552 * t507 * t516 - 0.2e1 / 0.3e1 * t5667 - 0.2e1 / 0.3e1 * t551 * t552 * t1484 * t191 - 0.2e1 * t528 * t1740 * t1663 + t5677 / 0.2e1 + t5682 + t5686 - t8 * t396 * t500 * t397 - 0.2e1 * t5691 - t8 * t396 * t73 * t5693 / 0.2e1 + 0.2e1 / 0.9e1 * t5700 - 0.5e1 / 0.27e2 * t8 * t5705 * t73 * t5706 + 0.4e1 / 0.27e2 * t5713 - 0.2e1 / 0.3e1 * t5716 - t8 * t190 * t117 * t5722 / 0.2e1 - 0.20e2 / 0.27e2 * t5728;
6128   t5735 = t77 * t77;
6129   t5737 = 0.1e1 / t504 / t5735;
6130   t5738 = t5737 * t17;
6131   t5739 = t507 * t507;
6132   t5744 = t1644 * t134;
6133   t5746 = t8 * t5744 * t1647;
6134   t5748 = t505 * t418;
6135   t5750 = t8 * t5748 * t508;
6136   t5752 = t516 * t516;
6137   t5758 = t8 * t1659 * t517;
6138   t5761 = t8 * t402 * t1493;
6139   t5764 = t8 * t402 * t1498;
6140   t5771 = t8 * t1679 * t1506;
6141   t5774 = t8 * t1667 * t406;
6142   t5777 = t8 * t1667 * t413;
6143   t5793 = t8 * t543 * t129;
6144   t5796 = t8 * t135 * t1633;
6145   t5801 = 0.1e1 / t27 / t2909;
6146   t5808 = (0.6160e4 / 0.81e2 * tau[0] * t1523 - 0.2618e4 / 0.81e2 * sigma[0] * t5801 - 0.1540e4 / 0.81e2 * lapl[0] * t1523) * t39 * t42;
6147   t5813 = t47 * t47;
6148   t5814 = 0.1e1 / t50 / t1532 / t49 * t5813;
6149   t5815 = t442 * t442;
6150   t5817 = t5815 * t39 * t42;
6151   t5820 = t1534 * t47;
6152   t5826 = t440 * t5815;
6153   t5827 = t39 * t42;
6154   t5828 = t5827 * t1542;
6155   t5835 = t435 * t435;
6156   t5840 = t451 * t1528;
6157   t5843 = t46 * t435;
6158   t5855 = -0.39111111111111111111e0 * t5808 - 0.53104860383639490765e-2 * t5814 * t5817 + 0.12857904599602795091e-1 * t5820 * t5817 - 0.23144228279285031164e-1 * t1536 * t442 * t435 - 0.28079014569730224051e0 * t5826 * t5828 + 0.30325335735308641974e1 * t1540 * t442 * t1542 * t435 - 0.22744001801481481481e0 * t441 * t5835 * t443 * t446 - 0.30325335735308641975e0 * t1546 * t5840 + 0.15565967926301162704e-1 * t2097 * t5843 - 0.14412933265093669170e-2 * t5826 * t5827 + 0.45890370370370370369e0 * t152 * t5835 * t451 + 0.61187160493827160492e0 * t690 * t5840 - 0.27534222222222222222e0 * t153 * t5808;
6159   t5871 = 0.1e1 / t1566 / t70;
6160   t5872 = t463 * t463;
6161   t5880 = t497 * t497;
6162   t5894 = t166 * t1578;
6163   t5895 = t470 * t470;
6164   t5900 = t486 * t486;
6165   t5902 = 0.1e1 / t5900 / t169;
6166   t5903 = t5902 * t55;
6167   t5904 = t1616 * t489;
6168   t5905 = t5903 * t5904;
6169   t5908 = 0.1e1 / t178 / t1619 / t177;
6170   t5910 = t174 * t62;
6171   t5914 = t1614 * t161;
6172   t5915 = t5914 * t1617;
6173   t5916 = t5895 * t1621;
6174   t5920 = t456 * t456;
6175   t5939 = t487 * t468;
6176   t5940 = t5939 * t489;
6177   t5953 = 0.1e1 / t55 / t1576 / t51;
6178   t5954 = t5953 * t66;
6179   t5979 = 0.16615495624729559964e1 * t167 * t61 * t5855 * t179 + 0.70819478890314631335e-1 * t54 * t162 * t5855 + 0.24923243437094339947e1 * t5894 * t61 * t5895 * t179 - 0.24056046973484009303e4 * t5905 * t5895 * t5908 * t5910 + 0.20977047095244633367e3 * t5915 * t5916 * t174 + 0.49846486874188679892e1 * t474 * t61 * t5920 * t179 + 0.66461982498918239856e1 * t710 * t711 * t1557 - 0.15243447427901234237e2 * t1596 * t489 * t5895 * t492 + 0.31868765500641584101e0 * t2133 * t66 * t470 * t456 - 0.74769730311283019838e1 * t2137 * t2138 * t456 + 0.11432585570925925678e2 * t5940 * t5895 * t492 * t62 - 0.10622921833547194700e0 * t54 * t469 * t5920 - 0.14163895778062926267e0 * t705 * t1589 * t1557 - 0.13278652291933993376e0 * t54 * t5954 * t5895 - 0.45730342283703702713e2 * t490 * t1609 * t470 - 0.22865171141851851357e2 * t490 * t5920 * t492 * t62 + 0.62931141285733900104e3 * t1618 * t456 * t1621 * t2171 + 0.31465570642866950052e3 * t1618 * t5916 * t62 - 0.30486894855802468476e2 * t490 * t1557 * t492 * t723 - 0.68595513425555554068e2 * t1597 * t493 * t2178;
6180   t5982 = -0.36e2 * t52 * t1567 * t463 * t497 + 0.8e1 * t52 * t1572 * t1630 - t52 * t160 * t5979 + t25 * t5855 * t71 + 0.6e1 * t52 * t462 * t5880 + 0.24e2 * t52 * t5871 * t5872 - 0.4e1 * t1558 * t184 - 0.24e2 * t157 * t1569 + 0.24e2 * t157 * t1573 - 0.4e1 * t157 * t1631 + 0.12e2 * t457 * t464 - 0.6e1 * t457 * t498;
6181   t5987 = t8 * t1502 * t186;
6182   t5989 = -0.3e1 * t8 * t123 * t500 * t412 - 0.5e1 / 0.27e2 * t8 * t5738 * t117 * t5739 + 0.4e1 / 0.27e2 * t5746 + 0.2e1 / 0.9e1 * t5750 - t8 * t506 * t117 * t5752 / 0.2e1 + 0.2e1 / 0.3e1 * t5758 - 0.2e1 * t5761 - 0.2e1 / 0.3e1 * t5764 + 0.4e1 / 0.9e1 * t8 * t1673 * t186 * t1674 - 0.2e1 / 0.3e1 * t5771 + 0.4e1 / 0.3e1 * t5774 + 0.2e1 / 0.3e1 * t5777 - 0.2e1 * t8 * t123 * t1633 * t128 - 0.2e1 * t8 * t123 * t186 * t1497 + t8 * t123 * t73 * t5722 / 0.2e1 - 0.20e2 / 0.27e2 * t5793 - t5796 / 0.2e1 - 0.3e1 / 0.8e1 * t8 * t18 * t5982 - 0.5e1 / 0.9e1 * t5987;
6183   t5992 = t1638 - 0.3e1 / 0.2e1 * t1641 + 0.4e1 / 0.9e1 * t1649 - 0.2e1 / 0.3e1 * t1653 - 0.2e1 * t1657 + 0.4e1 / 0.3e1 * t1661 - 0.2e1 * t1665 + 0.4e1 / 0.3e1 * t1669 + 0.4e1 / 0.9e1 * t1677 - 0.2e1 / 0.3e1 * t1681 + t10 * (t5730 + t5989);
6184   if(v4rho4 != NULL && (p->info->flags & XC_FLAGS_HAVE_LXC))
6185     v4rho4[0] = t5641 + t5992;
6186 
6187   t5998 = t1714 / 0.3e1;
6188   t6000 = -0.3e1 / 0.2e1 * t1696 + t2049 + 0.3e1 / 0.2e1 * t1702 + 0.3e1 / 0.4e1 * t1638 - 0.3e1 / 0.4e1 * t1641 - t1636 - t5632 - t5635 + t1710 / 0.3e1 - t5998 + t1720 / 0.3e1;
6189   t6001 = t1724 / 0.3e1;
6190   t6006 = -t6001 - t1729 - t1733 / 0.2e1 + t1738 - t1742 - t1746 / 0.2e1 - t1658 - t1666 - 0.7e1 / 0.2e1 * t1753 - 0.3e1 / 0.2e1 * t1757 - t1760;
6191   t6013 = -0.3e1 / 0.2e1 * t1764 - t1768 / 0.2e1 - t1771 + t2051 + t2052 + 0.7e1 / 0.2e1 * t1781 - 0.3e1 * t1785 + t1650 - t1653 / 0.3e1 + t1661 + t1669;
6192   t6016 = t1750 * t73;
6193   t6018 = t528 * t6016 * t1727;
6194   t6032 = t1750 * t117;
6195   t6034 = t551 * t6032 * t1736;
6196   t6041 = t528 * t134 * t186 * t530;
6197   t6044 = t1717 * t1722 * t1718;
6198   t6049 = t551 * t418 * t117 * t553;
6199   t6050 = t6049 / 0.9e1;
6200   t6060 = t528 * t418 * t73 * t530;
6201   t6061 = t6060 / 0.9e1;
6202   t6067 = 0.7e1 / 0.6e1 * t6018 - t551 * t552 * t208 * t1484 / 0.6e1 + t551 * t1735 * t9 * t516 / 0.2e1 - t528 * t17 * t500 * t530 / 0.2e1 - 0.7e1 / 0.6e1 * t6034 - t551 * t1816 * t1655 / 0.2e1 - t6041 / 0.3e1 + t6044 / 0.9e1 - t5656 / 0.6e1 + t6050 - t528 * t1740 * t1744 / 0.2e1 - t528 * t529 * t203 * t1497 / 0.6e1 + t6061 - t5667 / 0.6e1 + t5677 / 0.4e1 - 0.3e1 / 0.2e1 * t8 * t543 * t186;
6203   t6073 = 0.1e1 / t133 / t1480;
6204   t6076 = t8 * t78 * t6073 * t561;
6205   t6079 = t8 * t512 * t1755;
6206   t6082 = t8 * t1667 * t537;
6207   t6083 = t6082 / 0.3e1;
6208   t6085 = t8 * t1779 * t1783;
6209   t6088 = t8 * t1659 * t566;
6210   t6089 = t6088 / 0.3e1;
6211   t6090 = t505 * t542;
6212   t6099 = t8 * t402 * t1762;
6213   t6106 = t8 * t560 * t209;
6214   t6109 = t8 * t543 * t204;
6215   t6113 = t8 * t15 * t6073 * t544;
6216   t6119 = t5682 + t5686 - 0.3e1 / 0.2e1 * t8 * t543 * t500 * t9 + 0.25e2 / 0.6e1 * t6076 - t6079 / 0.2e1 + t6083 + 0.7e1 / 0.2e1 * t6085 + t6089 + t8 * t6090 * t192 / 0.2e1 - t8 * t190 * t254 * t1484 / 0.2e1 - t6099 / 0.2e1 - t8 * t123 * t1633 * t203 / 0.2e1 - 0.5e1 / 0.27e2 * t6106 - 0.5e1 / 0.27e2 * t6109 - 0.25e2 / 0.6e1 * t6113 + t8 * t1645 * t254 * t1646 / 0.9e1;
6217   t6122 = t8 * t1651 * t1766;
6218   t6137 = t395 * t542;
6219   t6142 = -t6122 / 0.6e1 - t5691 / 0.2e1 + t5700 / 0.9e1 + t5713 / 0.27e2 - t5716 / 0.6e1 - 0.5e1 / 0.9e1 * t5728 + t5746 / 0.27e2 + t5750 / 0.9e1 + t5758 / 0.3e1 - t5761 / 0.2e1 - t5764 / 0.6e1 - t5771 / 0.6e1 + 0.2e1 / 0.3e1 * t5774 + t5777 / 0.3e1 - t8 * t6137 * t129 / 0.2e1 - 0.5e1 / 0.9e1 * t5793;
6220   t6144 = t8 * t1489 * t254;
6221   t6147 = t8 * t1751 * t117;
6222   t6164 = t5 * t7 * t5737;
6223   t6170 = t1707 * t1712 * t1708;
6224   t6173 = t5 * t7 * t5704;
6225   t6181 = t542 * t186;
6226   t6185 = t528 * t1722 * t1744;
6227   t6192 = t551 * t1712 * t1731;
6228   t6199 = t8 * t1779 * t73;
6229   t6201 = -0.5e1 / 0.36e2 * t6144 - 0.5e1 / 0.2e1 * t6147 + t1717 * t529 * t1744 * t128 / 0.3e1 + t1707 * t552 * t1731 * t191 / 0.3e1 - t5796 / 0.8e1 - 0.5e1 / 0.12e2 * t5987 + t1717 * t1726 * t9 * t397 / 0.3e1 - 0.5e1 / 0.27e2 * t6164 * t552 * t208 * t1646 + t6170 / 0.9e1 - 0.5e1 / 0.27e2 * t6173 * t529 * t203 * t1674 + t1717 * t1740 * t1718 / 0.3e1 - t528 * t6181 * t1727 - t6185 / 0.6e1 - t528 * t1726 * t9 * t412 / 0.2e1 - t6192 / 0.6e1 - t1707 * t1735 * t9 * t507 / 0.3e1 + 0.5e1 / 0.2e1 * t6199;
6230   t6205 = t1678 - t1681 / 0.3e1 - t1478 - t1488 - t1496 - t1501 - t1509 - 0.2e1 * t1511 - t1513 - t1518 + t10 * (t6067 + t6119 + t6142 + t6201);
6231   if(v4rho4 != NULL && (p->info->flags & XC_FLAGS_HAVE_LXC))
6232     v4rho4[1] = t6000 + t6006 + t6013 + t6205;
6233 
6234   t6231 = t8 * t512 * t1841;
6235   t6234 = t8 * t402 * t1854;
6236   t6237 = t8 * t402 * t1859;
6237   t6240 = 0.1e1 / t133 / t5718;
6238   t6242 = t9 * t9;
6239   t6256 = t8 * t5698 * t577;
6240   t6258 = -0.2e1 / 0.9e1 * t6018 + 0.2e1 / 0.9e1 * t6034 - 0.2e1 / 0.9e1 * t6041 + 0.2e1 / 0.27e2 * t6044 + 0.4e1 / 0.27e2 * t6049 + 0.4e1 / 0.27e2 * t6060 + t5677 / 0.12e2 + t5682 + t5686 + 0.4e1 / 0.9e1 * t1717 * t1726 * t530 * t9 - t8 * t190 * t669 * t516 / 0.2e1 - t8 * t396 * t500 * t576 / 0.6e1 - t8 * t123 * t500 * t582 / 0.2e1 - t6231 / 0.3e1 - t6234 / 0.3e1 - t6237 / 0.3e1 - t8 * t505 * t6240 * t117 * t6242 / 0.3e1 - t8 * t395 * t6240 * t73 * t6242 / 0.3e1 - t8 * t6137 * t204 / 0.3e1 + t6256 / 0.27e2;
6241   t6260 = t8 * t1679 * t1850;
6242   t6266 = t8 * t1659 * t593;
6243   t6273 = t8 * t512 * t1846;
6244   t6276 = t8 * t1659 * t597;
6245   t6279 = t8 * t1667 * t583;
6246   t6282 = t8 * t5748 * t588;
6247   t6288 = t8 * t1751 * t1863;
6248   t6300 = -t6260 / 0.9e1 + t8 * t6090 * t209 / 0.3e1 + 0.2e1 / 0.9e1 * t6266 - t8 * t506 * t669 * t507 / 0.6e1 - t6273 / 0.3e1 + t6276 / 0.9e1 + t6279 / 0.9e1 + t6282 / 0.27e2 - t8 * t123 * t186 * t1858 - 0.7e1 / 0.3e1 * t6288 + 0.41e2 / 0.9e1 * t6076 - t6079 / 0.3e1 + 0.4e1 / 0.9e1 * t6082 - 0.2e1 / 0.3e1 * t6085 + 0.4e1 / 0.9e1 * t6088 - t6099 / 0.3e1 - 0.10e2 / 0.27e2 * t6106 - 0.10e2 / 0.27e2 * t6109 - 0.41e2 / 0.9e1 * t6113 - t6122 / 0.9e1;
6249   t6321 = t551 * t1712 * t1828;
6250   t6350 = t5700 / 0.27e2 - 0.10e2 / 0.27e2 * t5728 + t5750 / 0.27e2 + t5758 / 0.9e1 + 0.2e1 / 0.9e1 * t5774 + t5777 / 0.9e1 - 0.10e2 / 0.27e2 * t5793 - 0.5e1 / 0.18e2 * t6144 + t6147 / 0.3e1 - 0.4e1 / 0.9e1 * t1707 * t1735 * t553 * t9 - 0.5e1 / 0.18e2 * t5987 + t1707 * t552 * t596 * t507 / 0.9e1 - t6321 / 0.9e1 - t551 * t552 * t1840 * t191 / 0.3e1 - t551 * t552 * t596 * t516 / 0.6e1 - t528 * t1740 * t1832 / 0.3e1 - t528 * t529 * t1858 * t128 / 0.3e1 - t528 * t529 * t582 * t412 / 0.6e1 + t1707 * t552 * t587 * t516 / 0.9e1 - 0.5e1 / 0.27e2 * t6173 * t529 * t576 * t397;
6251   t6352 = t1717 * t1722 * t1820;
6252   t6355 = t528 * t6016 * t1824;
6253   t6362 = t551 * t134 * t254 * t553;
6254   t6372 = t528 * t1722 * t1832;
6255   t6379 = t1707 * t1712 * t1808;
6256   t6389 = t551 * t6032 * t1812;
6257   t6394 = t542 * t254;
6258   t6399 = t8 * t521 * t669;
6259   t6407 = 0.2e1 / 0.27e2 * t6352 + 0.7e1 / 0.9e1 * t6355 + 0.2e1 / 0.9e1 * t1707 * t1816 * t1708 - 0.2e1 / 0.9e1 * t6362 - 0.2e1 / 0.3e1 * t528 * t6181 * t1824 + t1717 * t529 * t582 * t397 / 0.9e1 - t6372 / 0.9e1 - 0.5e1 / 0.27e2 * t6164 * t552 * t587 * t507 + 0.2e1 / 0.27e2 * t6379 + t1717 * t529 * t576 * t412 / 0.9e1 + 0.2e1 / 0.9e1 * t1717 * t1740 * t1820 - 0.7e1 / 0.9e1 * t6389 - t551 * t1816 * t1731 / 0.3e1 + 0.2e1 / 0.3e1 * t551 * t6394 * t1736 + t6399 / 0.12e2 + t8 * t560 * t254 + 0.2e1 / 0.27e2 * t6170 - t6185 / 0.9e1 - t6192 / 0.9e1 - t6199 / 0.3e1;
6260   t6419 = t10 * (t6258 + t6300 + t6350 + t6407) - t1804 / 0.4e1 - t1696 + t1699 / 0.2e1 + t1702 + t1638 / 0.2e1 - t1641 / 0.4e1 - t5632 - t5635 + 0.2e1 / 0.9e1 * t1810 + 0.2e1 / 0.3e1 * t1814 - 0.2e1 / 0.3e1 * t1818 + 0.2e1 / 0.9e1 * t1822;
6261   t6433 = -0.2e1 / 0.3e1 * t1826 + 0.2e1 / 0.9e1 * t1710 - 0.4e1 / 0.9e1 * t1714 + 0.2e1 / 0.9e1 * t1720 - 0.4e1 / 0.9e1 * t1724 - 0.2e1 / 0.3e1 * t1729 - t1830 / 0.3e1 - t1834 / 0.3e1 - t1733 / 0.3e1 + 0.2e1 / 0.3e1 * t1738 - 0.2e1 / 0.3e1 * t1742 - t1746 / 0.3e1 - 0.2e1 / 0.3e1 * t1837;
6262   t6443 = -t1843 - t1848 - t1852 / 0.3e1 - t1856 - t1861 + 0.2e1 * t1865 - t1867 / 0.9e1 - t1870 / 0.3e1 - t1873 / 0.3e1 - t1876 / 0.9e1 - 0.5e1 / 0.3e1 * t1753 - t1757 - 0.4e1 / 0.3e1 * t1760;
6263   t6457 = -t1764 - t1768 / 0.3e1 - 0.4e1 / 0.3e1 * t1771 + 0.2e1 / 0.3e1 * t1774 + 0.2e1 / 0.3e1 * t1777 + 0.5e1 / 0.3e1 * t1781 - 0.2e1 * t1785 - t1653 / 0.9e1 + 0.2e1 / 0.3e1 * t1661 + 0.2e1 / 0.3e1 * t1669 - t1681 / 0.9e1 - t1478 / 0.3e1 - 0.2e1 / 0.3e1 * t1511 - t1513 / 0.3e1;
6264   if(v4rho4 != NULL && (p->info->flags & XC_FLAGS_HAVE_LXC))
6265     v4rho4[2] = t6419 + t6433 + t6443 + t6457;
6266 
6267   t6462 = -t2002 - 0.3e1 / 0.4e1 * t1804 + 0.3e1 / 0.4e1 * t1699 + t1639 - t5632 - t5635 - t2034 - t2043 + t1810 / 0.3e1 + t1814 - t1818;
6268   t6466 = t1822 / 0.3e1 - t1826 - t5998 - t6001 - t1830 / 0.2e1 - t1834 / 0.2e1 - t2008 - t2012 - t2016 - t2020 - t2025;
6269   t6476 = t2030 + t2039 - 0.2e1 * t1837 - 0.3e1 / 0.2e1 * t1843 - 0.3e1 / 0.2e1 * t1848 - t1852 / 0.2e1 - 0.3e1 / 0.2e1 * t1856 - 0.3e1 / 0.2e1 * t1861 + 0.3e1 * t1865 - t1867 / 0.3e1 - t1870;
6270   t6492 = 0.6e1 * t1481 + 0.12e2 * t5720;
6271   t6498 = t8 * t5744 * t2036;
6272   t6501 = t8 * t1651 * t2009;
6273   t6504 = t8 * t512 * t2013;
6274   t6507 = t8 * t512 * t2017;
6275   t6510 = t8 * t512 * t2022;
6276   t6513 = t8 * t5711 * t2027;
6277   t6516 = t8 * t402 * t2005;
6278   t6522 = t6050 + t6061 + t5682 + t5686 + t1707 * t552 * t2040 * t191 / 0.3e1 + t1717 * t529 * t2031 * t128 / 0.3e1 - t8 * t123 * t186 * t2004 / 0.2e1 - t8 * t123 * t73 * t6492 / 0.2e1 + t6498 / 0.27e2 - t6501 / 0.6e1 - t6504 / 0.2e1 - t6507 / 0.2e1 - t6510 / 0.6e1 + t6513 / 0.27e2 - t6516 / 0.6e1 + 0.3e1 / 0.2e1 * t8 * t560 * t669 * t9;
6279   t6551 = -0.3e1 / 0.2e1 * t8 * t190 * t254 * t1840 + t8 * t190 * t117 * t6492 / 0.2e1 + t8 * t1673 * t186 * t2026 / 0.9e1 - t8 * t190 * t1999 * t191 / 0.2e1 - t6231 / 0.2e1 - t6234 / 0.2e1 - t6237 / 0.2e1 + t6256 / 0.9e1 - t6260 / 0.6e1 + 0.2e1 / 0.3e1 * t6266 - t6273 / 0.2e1 + t6276 / 0.3e1 + t6279 / 0.3e1 + t6282 / 0.9e1 + t6288 - t6076 / 0.3e1 + t6083;
6280   t6559 = t8 * t196 * t1999;
6281   t6594 = t6089 - 0.5e1 / 0.9e1 * t6106 - 0.5e1 / 0.9e1 * t6109 + t6113 / 0.3e1 - 0.5e1 / 0.27e2 * t5728 - 0.5e1 / 0.27e2 * t5793 - t6559 / 0.8e1 - 0.5e1 / 0.12e2 * t6144 - t1707 * t1735 * t587 * t9 / 0.3e1 - t551 * t552 * t208 * t1840 / 0.2e1 + t551 * t1735 * t9 * t596 / 0.2e1 + t1707 * t1816 * t1808 / 0.3e1 + t551 * t6394 * t1812 - t551 * t17 * t669 * t553 / 0.2e1 - t551 * t1816 * t1828 / 0.2e1 - t551 * t552 * t2021 * t191 / 0.6e1 - 0.5e1 / 0.27e2 * t6173 * t529 * t2026 * t128;
6282   t6607 = t528 * t1722 * t2031;
6283   t6614 = t551 * t1712 * t2040;
6284   t6633 = -t528 * t1740 * t2031 / 0.2e1 - t528 * t529 * t2004 * t128 / 0.6e1 + t1717 * t1726 * t576 * t9 / 0.3e1 - t6607 / 0.6e1 - t528 * t1726 * t9 * t582 / 0.2e1 - t6614 / 0.6e1 - t528 * t529 * t203 * t1858 / 0.2e1 - 0.5e1 / 0.27e2 * t6164 * t552 * t2035 * t191 - 0.5e1 / 0.36e2 * t5987 - t6321 / 0.6e1 + t6352 / 0.9e1 - t6355 / 0.3e1 - t6362 / 0.3e1 - t6372 / 0.6e1 + t6379 / 0.9e1 + t6389 / 0.3e1 + t6399 / 0.4e1;
6285   t6637 = -t1873 - t1876 / 0.3e1 + t1753 - t1760 - t1771 + t1774 + t1777 - t1781 + t1662 + t1670 + t10 * (t6522 + t6551 + t6594 + t6633);
6286   if(v4rho4 != NULL && (p->info->flags & XC_FLAGS_HAVE_LXC))
6287     v4rho4[3] = t6462 + t6466 + t6476 + t6637;
6288 
6289   t6650 = -0.3e1 / 0.2e1 * t2001 - 0.2e1 * t2007 - 0.2e1 * t2011 - 0.6e1 * t2015 - 0.6e1 * t2019 - 0.2e1 * t2024 + 0.4e1 / 0.9e1 * t2029 - 0.2e1 * t2033 + 0.4e1 / 0.9e1 * t2038 - 0.2e1 * t2042 - 0.2e1 * t1870;
6290   t6658 = t587 * t587;
6291   t6663 = t596 * t596;
6292   t6673 = -0.12e2 * t1481 - 0.12e2 * t5720;
6293   t6698 = t576 * t576;
6294   t6703 = t582 * t582;
6295   t6714 = t5682 + t5686 - 0.5e1 / 0.27e2 * t8 * t5738 * t117 * t6658 - t8 * t506 * t117 * t6663 / 0.2e1 + 0.4e1 / 0.9e1 * t8 * t1645 * t254 * t2035 - t8 * t190 * t117 * t6673 / 0.2e1 - 0.3e1 * t8 * t190 * t669 * t596 - 0.2e1 * t8 * t190 * t254 * t2021 + t8 * t123 * t73 * t6673 / 0.2e1 - t8 * t506 * t669 * t587 - 0.2e1 * t8 * t190 * t1999 * t208 - 0.5e1 / 0.27e2 * t8 * t5705 * t73 * t6698 - t8 * t396 * t73 * t6703 / 0.2e1 + 0.4e1 / 0.27e2 * t6498 - 0.2e1 / 0.3e1 * t6501 - 0.2e1 * t6504 - 0.2e1 * t6507 - 0.2e1 / 0.3e1 * t6510 + 0.4e1 / 0.27e2 * t6513;
6296   t6750 = 0.1e1 / t82 / t3021;
6297   t6757 = (0.6160e4 / 0.81e2 * tau[1] * t1895 - 0.2618e4 / 0.81e2 * sigma[2] * t6750 - 0.1540e4 / 0.81e2 * lapl[1] * t1895) * t39 * t42;
6298   t6762 = t99 * t99;
6299   t6763 = 0.1e1 / t102 / t1904 / t101 * t6762;
6300   t6764 = t618 * t618;
6301   t6766 = t6764 * t39 * t42;
6302   t6769 = t1906 * t99;
6303   t6775 = t616 * t6764;
6304   t6782 = t611 * t611;
6305   t6787 = t451 * t1900;
6306   t6790 = t98 * t611;
6307   t6802 = -0.39111111111111111111e0 * t6757 - 0.53104860383639490765e-2 * t6763 * t6766 + 0.12857904599602795091e-1 * t6769 * t6766 - 0.23144228279285031164e-1 * t1908 * t618 * t611 - 0.28079014569730224051e0 * t6775 * t5828 + 0.30325335735308641974e1 * t1912 * t618 * t1542 * t611 - 0.22744001801481481481e0 * t617 * t6782 * t443 * t446 - 0.30325335735308641975e0 * t1916 * t6787 + 0.15565967926301162704e-1 * t2278 * t6790 - 0.14412933265093669170e-2 * t6775 * t5827 + 0.45890370370370370369e0 * t226 * t6782 * t451 + 0.61187160493827160492e0 * t757 * t6787 - 0.27534222222222222222e0 * t227 * t6757;
6308   t6818 = 0.1e1 / t1936 / t114;
6309   t6819 = t635 * t635;
6310   t6827 = t666 * t666;
6311   t6837 = t628 * t628;
6312   t6846 = t642 * t642;
6313   t6847 = t6846 * t1987;
6314   t6865 = t166 * t1948;
6315   t6870 = t5902 * t105;
6316   t6871 = t6870 * t5904;
6317   t6874 = 0.1e1 / t246 / t1985 / t245;
6318   t6876 = t242 * t106;
6319   t6891 = t1614 * t235;
6320   t6892 = t6891 * t1617;
6321   t6903 = t487 * t640;
6322   t6904 = t6903 * t489;
6323   t6917 = 0.1e1 / t105 / t1946 / t103;
6324   t6918 = t6917 * t110;
6325   t6922 = -0.45730342283703702713e2 * t659 * t1979 * t642 - 0.22865171141851851357e2 * t659 * t6837 * t661 * t106 + 0.62931141285733900104e3 * t1984 * t628 * t1987 * t2352 + 0.31465570642866950052e3 * t1984 * t6847 * t106 - 0.30486894855802468476e2 * t659 * t1927 * t661 * t790 - 0.68595513425555554068e2 * t1967 * t662 * t2359 + 0.16615495624729559964e1 * t240 * t61 * t6802 * t247 + 0.70819478890314631335e-1 * t54 * t236 * t6802 + 0.24923243437094339947e1 * t6865 * t61 * t6846 * t247 - 0.24056046973484009303e4 * t6871 * t6846 * t6874 * t6876 + 0.49846486874188679892e1 * t646 * t61 * t6837 * t247 + 0.66461982498918239856e1 * t777 * t778 * t1927 - 0.15243447427901234237e2 * t1966 * t489 * t6846 * t661 + 0.20977047095244633367e3 * t6892 * t6847 * t242 + 0.31868765500641584101e0 * t2314 * t110 * t642 * t628 - 0.74769730311283019838e1 * t2318 * t2319 * t628 + 0.11432585570925925678e2 * t6904 * t6846 * t661 * t106 - 0.10622921833547194700e0 * t54 * t641 * t6837 - 0.14163895778062926267e0 * t772 * t1959 * t1927 - 0.13278652291933993376e0 * t54 * t6918 * t6846;
6326   t6925 = -0.36e2 * t104 * t1937 * t635 * t666 + 0.8e1 * t104 * t1942 * t1996 - t104 * t234 * t6922 + 0.6e1 * t104 * t634 * t6827 + 0.24e2 * t104 * t6818 * t6819 + t25 * t6802 * t115 - 0.4e1 * t1928 * t252 - 0.24e2 * t231 * t1939 + 0.24e2 * t231 * t1943 - 0.4e1 * t231 * t1997 + 0.12e2 * t629 * t636 - 0.6e1 * t629 * t667;
6327   t6929 = -0.2e1 / 0.3e1 * t6516 + 0.2e1 / 0.9e1 * t6256 + 0.4e1 / 0.3e1 * t6266 + 0.2e1 / 0.3e1 * t6276 + 0.2e1 / 0.3e1 * t6279 + 0.2e1 / 0.9e1 * t6282 - 0.20e2 / 0.27e2 * t6106 - 0.20e2 / 0.27e2 * t6109 - t6559 / 0.2e1 - 0.5e1 / 0.9e1 * t6144 + 0.2e1 / 0.3e1 * t1717 * t529 * t576 * t582 + 0.2e1 / 0.3e1 * t1707 * t552 * t587 * t596 - 0.2e1 / 0.3e1 * t551 * t552 * t2021 * t208 - 0.2e1 / 0.3e1 * t528 * t529 * t2004 * t203 - 0.2e1 * t551 * t1816 * t2040 - 0.2e1 / 0.3e1 * t6607 - 0.2e1 / 0.3e1 * t6614 + t6399 / 0.2e1 - 0.3e1 / 0.8e1 * t8 * t80 * t6925;
6328   t6932 = -0.2e1 * t1873 - 0.2e1 / 0.3e1 * t1876 - 0.4e1 * t1837 - 0.3e1 / 0.2e1 * t1804 + t1699 - t5632 - t5635 - 0.2e1 / 0.3e1 * t1867 + 0.4e1 / 0.3e1 * t1774 + 0.4e1 / 0.3e1 * t1777 + t10 * (t6714 + t6929);
6329   if(v4rho4 != NULL && (p->info->flags & XC_FLAGS_HAVE_LXC))
6330     v4rho4[4] = t6650 + t6932;
6331 
6332   t6950 = t8 * t123 * t2078;
6333   t6954 = t8 * t419 * t282 / 0.9e1;
6334   t6956 = t8 * t123 * t2075;
6335   t6959 = t8 * t18 * t2185;
6336   t6962 = t8 * t135 * t730;
6337   t6972 = t8 * t396 * t2071;
6338   t6975 = t8 * t402 * t679;
6339   t6980 = t62 * t1580;
6340   t6993 = t156 * t456;
6341   t6997 = t269 * t456;
6342   t7004 = t62 * t1557;
6343   t7020 = t5910 * t1580;
6344   t7027 = t440 * t148;
6345   t7036 = t152 * t1528;
6346   t7047 = t1523 * t39 * t42;
6347   t7060 = t1537 * t39 * t42;
6348   t7072 = t1542 * t148 * t435;
6349   t7075 = t1550 * t39;
6350   t7082 = 0.27798224424032921811e0 * t441 * t430 * t687 - 0.97287299539382266899e-3 * t7027 * t2098 * t435 + 0.25943279877168604506e-2 * t2097 * t143 * t46 + 0.18016166581367086463e-3 * t1550 * t265 - 0.19120987654320987654e-1 * t7036 * t691 - 0.38573713798808385273e-2 * t1536 * t143 * t442 + 0.14465142674553144478e-2 * t1536 * t33 * t148 * t435 - 0.22307818930041152263e1 * t7047 + 0.94766674172839506173e-2 * t686 * t5840 + 0.15296790123456790123e0 * t2101 * t2104 - 0.56088230452674897120e0 * t690 * t451 * t430 - 0.15704704526748971194e1 * t153 * t7047 + 0.66381075479549363457e-3 * t5814 * t33 * t7060 - 0.16072380749503493864e-2 * t5820 * t33 * t7060 + 0.50542226225514403292e0 * t1540 * t143 * t1542 * t442 - 0.18953334834567901234e0 * t1540 * t33 * t7072 + 0.35098768212162780064e-1 * t7075 * t42 * t33 * t1542 - 0.75813339338271604938e-1 * t2092 * t1547;
6351   t7087 = -0.22865171141851851357e2 * t490 * t2166 * t470 + 0.31465570642866950052e3 * t1618 * t2170 * t6980 - 0.34297756712777777035e2 * t1597 * t493 * t2981 + 0.20977047095244633367e3 * t5915 * t1622 * t4658 + 0.11432585570925925678e2 * t5940 * t1598 * t1126 + 0.15934382750320792050e0 * t2133 * t706 * t6993 - 0.37384865155641509919e1 * t2137 * t711 * t6997 - 0.22865171141851851357e2 * t490 * t722 * t6993 - 0.76217237139506171188e1 * t490 * t722 * t7004 - 0.22865171141851851357e2 * t490 * t2109 * t492 * t723 - 0.22865171141851851357e2 * t490 * t2166 * t2178 + 0.31465570642866950052e3 * t1618 * t696 * t1621 * t2171 - 0.24056046973484009303e4 * t5905 * t269 * t5908 * t7020 + 0.16615495624729559964e1 * t167 * t61 * t7082 * t179;
6352   t7088 = t1617 * t269;
6353   t7089 = t1615 * t7088;
6354   t7090 = t3208 * t6993;
6355   t7094 = t1596 * t489 * t456;
6356   t7106 = t5894 * t61;
6357   t7107 = t1580 * t179;
6358   t7124 = t54 * t5953;
6359   t7131 = t1557 * t179;
6360   t7138 = 0.31465570642866950052e3 * t7089 * t7090 - 0.34297756712777777034e2 * t7094 * t724 + 0.49846486874188679892e1 * t710 * t2149 * t696 - 0.10622921833547194700e0 * t705 * t2142 * t456 - 0.35409739445157315668e-1 * t705 * t706 * t1557 + 0.24923243437094339947e1 * t7106 * t7107 * t269 - 0.37384865155641509919e1 * t2137 * t2138 * t696 - 0.10622921833547194700e0 * t705 * t66 * t2109 * t156 + 0.15934382750320792050e0 * t2133 * t2142 * t470 - 0.15243447427901234237e2 * t1597 * t1598 * t269 - 0.13278652291933993376e0 * t7124 * t706 * t1580 + 0.49846486874188679892e1 * t710 * t711 * t2109 + 0.16615495624729559964e1 * t710 * t7131 * t269 + 0.70819478890314631335e-1 * t54 * t162 * t7082;
6361   t7156 = t279 * t183;
6362   t7191 = t25 * t7082 * t71 - 0.6e1 * t270 * t1569 - 0.18e2 * t157 * t2123 + 0.12e2 * t157 * t2127 + 0.6e1 * t157 * t2130 + 0.6e1 * t270 * t1573 - t270 * t1631 - 0.3e1 * t2110 * t184 + 0.6e1 * t457 * t702 + 0.6e1 * t697 * t464 - 0.3e1 * t697 * t498;
6363   if(v4rho4 != NULL && (p->info->flags & XC_FLAGS_HAVE_LXC))
6364     v4rho3sigma[0] = -0.3e1 / 0.2e1 * t262 * t678 * t730 * t412 - t262 * t678 * t282 * t1497 / 0.2e1 - t262 * t527 * t730 * t397 / 0.2e1 - 0.3e1 / 0.2e1 * t262 * t678 * t2185 * t128 - 0.2e1 * t6950 + t6954 - 0.4e1 * t6956 - 0.3e1 / 0.2e1 * t6959 - t6962 / 0.2e1 + t262 * t1716 * t282 * t1674 / 0.9e1 - t2210 * t2211 * t1663 / 0.2e1 - 0.2e1 / 0.3e1 * t6972 - 0.2e1 / 0.3e1 * t6975 - 0.3e1 / 0.8e1 * t262 * t263 * (-t52 * t160 * (t7087 + t7138) + 0.2e1 * t52 * t701 * t1630 + 0.6e1 * t52 * t2126 * t497 + 0.6e1 * t52 * t462 * t2182 * t183 - 0.18e2 * t52 * t1567 * t727 * t463 - 0.18e2 * t3144 * t7156 * t497 + 0.24e2 * t52 * t5871 * t279 * t1568 - 0.3e1 * t157 * t2183 - 0.3e1 * t457 * t728 - t1558 * t280 + t7191);
6365 
6366   if(v4rho4 != NULL && (p->info->flags & XC_FLAGS_HAVE_LXC))
6367     v4rho3sigma[1] = 0.0e0;
6368 
6369   t7197 = t8 * t506 * t2195;
6370   t7200 = t8 * t512 * t737;
6371   t7203 = t8 * t190 * t2199;
6372   t7207 = t8 * t521 * t305 / 0.9e1;
6373   if(v4rho4 != NULL && (p->info->flags & XC_FLAGS_HAVE_LXC))
6374     v4rho3sigma[2] = -0.2e1 / 0.3e1 * t7197 - 0.2e1 / 0.3e1 * t7200 - 0.2e1 * t7203 + t7207 + t262 * t1706 * t305 * t1646 / 0.9e1 - t2210 * t2228 * t1655 / 0.2e1 - t262 * t736 * t305 * t1484 / 0.2e1;
6375 
6376   t7230 = 0.4e1 / 0.3e1 * t2206 * t2216;
6377   t7235 = t1672 * t282;
6378   t7239 = t2219 * t2209;
6379   t7244 = t134 * t2 * t4;
6380   t7245 = t7244 * t742;
6381   t7247 = t2205 * t2209;
6382   t7249 = 0.4e1 / 0.9e1 * t7247 * t2212;
6383   t7251 = t542 * t2 * t4;
6384   t7252 = t7251 * t2222;
6385   if(v4rho4 != NULL && (p->info->flags & XC_FLAGS_HAVE_LXC))
6386     v4rho3sigma[3] = -t2220 * t678 * t730 * t9 - t2220 * t678 * t282 / 0.2e1 - t262 * t678 * t2185 * t203 / 0.2e1 - t7230 - 0.2e1 / 0.3e1 * t6950 + t6954 - 0.4e1 / 0.3e1 * t6956 - t6959 / 0.2e1 - t6962 / 0.3e1 + t2210 * t7235 * t1718 / 0.9e1 - t7239 * t2211 * t1727 / 0.3e1 - 0.2e1 / 0.9e1 * t7245 - t7249 + t7252 / 0.6e1 - t2210 * t395 * t730 * t530 / 0.3e1 - t2210 * t2211 * t1744 / 0.6e1 - 0.2e1 / 0.9e1 * t6972 - 0.4e1 / 0.9e1 * t6975;
6387 
6388   if(v4rho4 != NULL && (p->info->flags & XC_FLAGS_HAVE_LXC))
6389     v4rho3sigma[4] = 0.0e0;
6390 
6391   t7266 = t7244 * t747;
6392   t7269 = 0.4e1 / 0.9e1 * t7247 * t2229;
6393   t7270 = t7251 * t2233;
6394   t7272 = t1644 * t305;
6395   t7285 = t7244 * t798;
6396   t7288 = 0.4e1 / 0.3e1 * t2206 * t2239;
6397   if(v4rho4 != NULL && (p->info->flags & XC_FLAGS_HAVE_LXC))
6398     v4rho3sigma[5] = -0.2e1 / 0.9e1 * t7197 - 0.4e1 / 0.9e1 * t7200 - 0.2e1 / 0.3e1 * t7203 + t7207 - 0.2e1 / 0.9e1 * t7266 - t7269 - t7270 / 0.6e1 + t2210 * t7272 * t1708 / 0.9e1 + t7239 * t2228 * t1736 / 0.3e1 - t2210 * t2228 * t1731 / 0.6e1 + t2220 * t736 * t305 / 0.2e1 - t7285 / 0.6e1 - t7288 - t262 * t550 * t797 * t507 / 0.6e1 - t262 * t736 * t797 * t516 / 0.2e1;
6399 
6400   t7301 = t2206 * t2244;
6401   t7313 = t2206 * t2248;
6402   if(v4rho4 != NULL && (p->info->flags & XC_FLAGS_HAVE_LXC))
6403     v4rho3sigma[6] = -0.4e1 / 0.9e1 * t7245 - t7249 - t7230 - 0.4e1 / 0.3e1 * t7252 - 0.2e1 / 0.9e1 * t6975 + t6954 - t6962 / 0.6e1 - 0.2e1 / 0.9e1 * t7301 + t2210 * t7235 * t1820 / 0.9e1 - t262 * t527 * t730 * t576 / 0.6e1 - t7239 * t2211 * t1824 / 0.3e1 - 0.2e1 / 0.3e1 * t7313 - t2210 * t2211 * t1832 / 0.6e1 - t262 * t678 * t730 * t582 / 0.2e1 - t262 * t678 * t282 * t1858 / 0.2e1;
6404 
6405   if(v4rho4 != NULL && (p->info->flags & XC_FLAGS_HAVE_LXC))
6406     v4rho3sigma[7] = 0.0e0;
6407 
6408   t7330 = t2206 * t2253;
6409   t7338 = t2206 * t2257;
6410   t7347 = t2206 * t2260;
6411   t7356 = t2206 * t2367;
6412   if(v4rho4 != NULL && (p->info->flags & XC_FLAGS_HAVE_LXC))
6413     v4rho3sigma[8] = -0.4e1 / 0.9e1 * t7266 - t7269 + 0.4e1 / 0.3e1 * t7270 - 0.2e1 / 0.9e1 * t7200 + t7207 - t7285 / 0.3e1 - t7288 - 0.2e1 / 0.9e1 * t7330 + t2210 * t7272 * t1808 / 0.9e1 + t7239 * t2228 * t1812 / 0.3e1 - 0.4e1 / 0.3e1 * t7338 - t2210 * t505 * t797 * t553 / 0.3e1 + t2220 * t736 * t797 * t9 - 0.2e1 / 0.3e1 * t7347 - t2210 * t2228 * t1828 / 0.6e1 - t262 * t736 * t305 * t1840 / 0.2e1 - t7356 / 0.2e1 - t262 * t736 * t2366 * t191 / 0.2e1;
6414 
6415   if(v4rho4 != NULL && (p->info->flags & XC_FLAGS_HAVE_LXC))
6416     v4rho3sigma[9] = -0.2e1 / 0.3e1 * t7245 - 0.2e1 / 0.3e1 * t7301 - 0.2e1 * t7313 + t6954 + t262 * t1716 * t282 * t2026 / 0.9e1 - t2210 * t2211 * t2031 / 0.2e1 - t262 * t678 * t282 * t2004 / 0.2e1;
6417 
6418   if(v4rho4 != NULL && (p->info->flags & XC_FLAGS_HAVE_LXC))
6419     v4rho3sigma[10] = 0.0e0;
6420 
6421   t7387 = t230 * t628;
6422   t7391 = t106 * t1927;
6423   t7407 = t6876 * t1950;
6424   t7417 = t292 * t628;
6425   t7427 = t106 * t1950;
6426   t7431 = t1617 * t292;
6427   t7432 = t1983 * t7431;
6428   t7433 = t3329 * t7387;
6429   t7437 = t1966 * t489 * t628;
6430   t7440 = -0.22865171141851851357e2 * t659 * t789 * t7387 - 0.76217237139506171188e1 * t659 * t789 * t7391 - 0.22865171141851851357e2 * t659 * t2290 * t661 * t790 - 0.22865171141851851357e2 * t659 * t2347 * t2359 + 0.31465570642866950052e3 * t1984 * t763 * t1987 * t2352 - 0.24056046973484009303e4 * t6871 * t292 * t6874 * t7407 - 0.34297756712777777035e2 * t1967 * t662 * t3093 + 0.20977047095244633367e3 * t6892 * t1988 * t4738 - 0.37384865155641509919e1 * t2318 * t778 * t7417 + 0.11432585570925925678e2 * t6904 * t1968 * t1168 + 0.15934382750320792050e0 * t2314 * t773 * t7387 + 0.31465570642866950052e3 * t1984 * t2351 * t7427 + 0.31465570642866950052e3 * t7432 * t7433 - 0.34297756712777777034e2 * t7437 * t791;
6431   t7443 = t1542 * t222 * t611;
6432   t7446 = t1920 * t39;
6433   t7461 = t1895 * t39 * t42;
6434   t7466 = t1909 * t39 * t42;
6435   t7476 = t226 * t1900;
6436   t7486 = t616 * t222;
6437   t7499 = -0.18953334834567901234e0 * t1912 * t88 * t7443 + 0.35098768212162780064e-1 * t7446 * t42 * t88 * t1542 - 0.75813339338271604938e-1 * t2273 * t1917 + 0.94766674172839506173e-2 * t753 * t6787 + 0.15296790123456790123e0 * t2282 * t2285 - 0.56088230452674897120e0 * t757 * t451 * t606 - 0.15704704526748971194e1 * t227 * t7461 + 0.66381075479549363457e-3 * t6763 * t88 * t7466 - 0.16072380749503493864e-2 * t6769 * t88 * t7466 + 0.50542226225514403292e0 * t1912 * t217 * t1542 * t618 - 0.19120987654320987654e-1 * t7476 * t758 - 0.38573713798808385273e-2 * t1908 * t217 * t618 + 0.14465142674553144478e-2 * t1908 * t88 * t222 * t611 - 0.97287299539382266899e-3 * t7486 * t2279 * t611 + 0.25943279877168604506e-2 * t2278 * t217 * t98 + 0.18016166581367086463e-3 * t1920 * t288 + 0.27798224424032921811e0 * t617 * t606 * t754 - 0.22307818930041152263e1 * t7461;
6438   t7507 = t54 * t6917;
6439   t7523 = t6865 * t61;
6440   t7524 = t1950 * t247;
6441   t7538 = t1927 * t247;
6442   t7548 = 0.16615495624729559964e1 * t240 * t61 * t7499 * t247 + 0.70819478890314631335e-1 * t54 * t236 * t7499 - 0.13278652291933993376e0 * t7507 * t773 * t1950 - 0.22865171141851851357e2 * t659 * t2347 * t642 - 0.15243447427901234237e2 * t1967 * t1968 * t292 - 0.35409739445157315668e-1 * t772 * t773 * t1927 + 0.15934382750320792050e0 * t2314 * t2323 * t642 + 0.24923243437094339947e1 * t7523 * t7524 * t292 - 0.37384865155641509919e1 * t2318 * t2319 * t763 - 0.10622921833547194700e0 * t772 * t110 * t2290 * t230 + 0.49846486874188679892e1 * t777 * t778 * t2290 + 0.16615495624729559964e1 * t777 * t7538 * t292 + 0.49846486874188679892e1 * t777 * t2330 * t763 - 0.10622921833547194700e0 * t772 * t2323 * t628;
6443   t7577 = t302 * t251;
6444   t7601 = 0.24e2 * t104 * t6818 * t302 * t1938 + t25 * t7499 * t115 - 0.18e2 * t3265 * t7577 * t666 - 0.6e1 * t293 * t1939 + 0.6e1 * t293 * t1943 - 0.3e1 * t2291 * t252 - 0.18e2 * t231 * t2304 + 0.12e2 * t231 * t2308 + 0.6e1 * t231 * t2311 + 0.6e1 * t629 * t769 + 0.6e1 * t764 * t636;
6445   if(v4rho4 != NULL && (p->info->flags & XC_FLAGS_HAVE_LXC))
6446     v4rho3sigma[11] = t262 * t1706 * t305 * t2035 / 0.9e1 - t2210 * t2228 * t2040 / 0.2e1 - 0.2e1 / 0.3e1 * t7330 - 0.4e1 * t7338 - 0.2e1 * t7347 - 0.2e1 / 0.3e1 * t7266 + t7207 - 0.3e1 / 0.8e1 * t262 * t286 * (-t104 * t234 * (t7440 + t7548) + 0.2e1 * t104 * t768 * t1996 + 0.6e1 * t104 * t2307 * t666 + 0.6e1 * t104 * t634 * t2363 * t251 - 0.18e2 * t104 * t1937 * t794 * t635 - 0.3e1 * t231 * t2364 - 0.3e1 * t629 * t795 - t1928 * t303 - t293 * t1997 - 0.3e1 * t764 * t667 + t7601) - 0.3e1 / 0.2e1 * t262 * t736 * t797 * t596 - t262 * t736 * t305 * t2021 / 0.2e1 - t262 * t550 * t797 * t587 / 0.2e1 - 0.3e1 / 0.2e1 * t262 * t736 * t2366 * t208 - 0.3e1 / 0.2e1 * t7356 - t7285 / 0.2e1;
6447 
6448   t7647 = t324 * t183;
6449   t7651 = t5871 * t324;
6450   t7658 = t7027 * t2400 * t435;
6451   t7660 = t1550 * t310;
6452   t7662 = t7036 * t812;
6453   t7666 = t1536 * t29 * t148 * t435;
6454   t7669 = t5814 * t29 * t7060;
6455   t7672 = t5820 * t29 * t7060;
6456   t7675 = t1540 * t29 * t7072;
6457   t7679 = t7075 * t42 * t29 * t1542;
6458   t7681 = t809 * t5840;
6459   t7692 = -0.19457459907876453380e-2 * t7658 + 0.36032333162734172925e-3 * t7660 - 0.38241975308641975308e-1 * t7662 + 0.28930285349106288954e-2 * t7666 + 0.13276215095909872691e-2 * t7669 - 0.32144761499006987728e-2 * t7672 - 0.37906669669135802469e0 * t7675 + 0.70197536424325560128e-1 * t7679 + 0.18953334834567901234e-1 * t7681 + 0.19120987654320987654e0 * t2102 + 0.63177782781893004115e0 * t2090 - 0.15934156378600823045e1 * t2083 - 0.48217142248510481592e-2 * t2086 + 0.32429099846460755633e-2 * t2099 - 0.94766674172839506172e-1 * t2095 - 0.50989300411522633745e0 * t2105 - 0.11217646090534979424e1 * t2107 + 0.25271113112757201647e0 * t2093;
6460   t7708 = t66 * t2407;
6461   t7736 = 0.31465570642866950052e3 * t3207 * t7090 - 0.34297756712777777034e2 * t7094 * t840 + 0.16615495624729559964e1 * t710 * t7131 * t314 + 0.24923243437094339947e1 * t7106 * t7107 * t314 - 0.37384865155641509919e1 * t2137 * t2138 * t816 - 0.10622921833547194700e0 * t705 * t7708 * t156 + 0.15934382750320792050e0 * t2133 * t2437 * t470 + 0.49846486874188679892e1 * t710 * t711 * t2407 + 0.49846486874188679892e1 * t710 * t2149 * t816 - 0.10622921833547194700e0 * t705 * t2437 * t456 - 0.35409739445157315668e-1 * t705 * t825 * t1557 - 0.15243447427901234237e2 * t1597 * t1598 * t314 - 0.13278652291933993376e0 * t7124 * t825 * t1580 - 0.22865171141851851357e2 * t490 * t2460 * t470;
6462   t7750 = t2407 * t492;
6463   t7766 = t314 * t456;
6464   t7776 = t816 * t1621;
6465   t7780 = t314 * t5908;
6466   t7784 = 0.16615495624729559964e1 * t167 * t61 * t7692 * t179 + 0.70819478890314631335e-1 * t54 * t162 * t7692 - 0.22865171141851851357e2 * t490 * t839 * t6993 - 0.76217237139506171188e1 * t490 * t839 * t7004 - 0.22865171141851851357e2 * t490 * t7750 * t723 - 0.34297756712777777035e2 * t1597 * t493 * t3628 + 0.20977047095244633367e3 * t5915 * t1622 * t5418 + 0.31465570642866950052e3 * t1618 * t2464 * t6980 + 0.15934382750320792050e0 * t2133 * t825 * t6993 - 0.37384865155641509919e1 * t2137 * t711 * t7766 + 0.11432585570925925678e2 * t5940 * t1598 * t1357 - 0.22865171141851851357e2 * t490 * t2460 * t2178 + 0.31465570642866950052e3 * t1618 * t7776 * t2171 - 0.24056046973484009303e4 * t5905 * t7780 * t7020;
6467   t7794 = t462 * t2474;
6468   t7798 = t1567 * t843;
6469   t7802 = -0.3e1 * t817 * t498 - 0.3e1 * t2408 * t184 - 0.18e2 * t3144 * t7647 * t497 + 0.24e2 * t52 * t7651 * t1568 - 0.18e2 * t157 * t2421 + t25 * t7692 * t71 - t52 * t160 * (t7736 + t7784) + 0.2e1 * t52 * t821 * t1630 + 0.6e1 * t52 * t2424 * t497 + 0.6e1 * t52 * t7794 * t183 - 0.18e2 * t52 * t7798 * t463;
6470   t7825 = t8 * t419 * t327 / 0.9e1;
6471   t7827 = t8 * t123 * t2382;
6472   t7830 = t8 * t123 * t2385;
6473   t7833 = t8 * t18 * t2477;
6474   t7836 = t8 * t135 * t846;
6475   t7846 = t8 * t402 * t804;
6476   t7849 = t8 * t396 * t2378;
6477   if(v4rho4 != NULL && (p->info->flags & XC_FLAGS_NEEDS_LAPLACIAN) && (p->info->flags & XC_FLAGS_HAVE_LXC))
6478     v4rho3lapl[0] = -0.3e1 / 0.8e1 * t262 * t263 * (-t1558 * t325 - 0.6e1 * t315 * t1569 + 0.12e2 * t157 * t2425 + 0.6e1 * t157 * t2428 - 0.3e1 * t157 * t2475 + 0.6e1 * t315 * t1573 - t315 * t1631 + 0.6e1 * t457 * t822 - 0.3e1 * t457 * t844 + 0.6e1 * t817 * t464 + t7802) - t262 * t678 * t327 * t1497 / 0.2e1 - 0.3e1 / 0.2e1 * t262 * t678 * t846 * t412 - 0.3e1 / 0.2e1 * t262 * t678 * t2477 * t128 - t262 * t527 * t846 * t397 / 0.2e1 + t7825 - 0.4e1 * t7827 - 0.2e1 * t7830 - 0.3e1 / 0.2e1 * t7833 - t7836 / 0.2e1 + t262 * t1716 * t327 * t1674 / 0.9e1 - t2210 * t2499 * t1663 / 0.2e1 - 0.2e1 / 0.3e1 * t7846 - 0.2e1 / 0.3e1 * t7849;
6479 
6480   t7852 = t8 * t506 * t2487;
6481   t7855 = t8 * t512 * t852;
6482   t7858 = t8 * t190 * t2491;
6483   t7862 = t8 * t521 * t349 / 0.9e1;
6484   if(v4rho4 != NULL && (p->info->flags & XC_FLAGS_NEEDS_LAPLACIAN) && (p->info->flags & XC_FLAGS_HAVE_LXC))
6485     v4rho3lapl[1] = -0.2e1 / 0.3e1 * t7852 - 0.2e1 / 0.3e1 * t7855 - 0.2e1 * t7858 + t7862 + t262 * t1706 * t349 * t1646 / 0.9e1 - t2210 * t2514 * t1655 / 0.2e1 - t262 * t736 * t349 * t1484 / 0.2e1;
6486 
6487   t7874 = t1672 * t327;
6488   t7896 = 0.4e1 / 0.3e1 * t2206 * t2504;
6489   t7897 = t7244 * t857;
6490   t7900 = 0.4e1 / 0.9e1 * t7247 * t2500;
6491   t7901 = t7251 * t2508;
6492   if(v4rho4 != NULL && (p->info->flags & XC_FLAGS_NEEDS_LAPLACIAN) && (p->info->flags & XC_FLAGS_HAVE_LXC))
6493     v4rho3lapl[2] = t2210 * t7874 * t1718 / 0.9e1 - t7239 * t2499 * t1727 / 0.3e1 - t2220 * t678 * t846 * t9 + t7825 - 0.4e1 / 0.3e1 * t7827 - 0.2e1 / 0.3e1 * t7830 - t7833 / 0.2e1 - t7836 / 0.3e1 - t2220 * t678 * t327 / 0.2e1 - t262 * t678 * t2477 * t203 / 0.2e1 - t7896 - 0.2e1 / 0.9e1 * t7897 - t7900 + t7901 / 0.6e1 - t2210 * t395 * t846 * t530 / 0.3e1 - t2210 * t2499 * t1744 / 0.6e1 - 0.4e1 / 0.9e1 * t7846 - 0.2e1 / 0.9e1 * t7849;
6494 
6495   t7915 = t7244 * t862;
6496   t7918 = 0.4e1 / 0.9e1 * t7247 * t2515;
6497   t7919 = t7251 * t2519;
6498   t7921 = t1644 * t349;
6499   t7934 = t7244 * t904;
6500   t7937 = 0.4e1 / 0.3e1 * t2206 * t2525;
6501   if(v4rho4 != NULL && (p->info->flags & XC_FLAGS_NEEDS_LAPLACIAN) && (p->info->flags & XC_FLAGS_HAVE_LXC))
6502     v4rho3lapl[3] = -0.2e1 / 0.9e1 * t7852 - 0.4e1 / 0.9e1 * t7855 - 0.2e1 / 0.3e1 * t7858 + t7862 - 0.2e1 / 0.9e1 * t7915 - t7918 - t7919 / 0.6e1 + t2210 * t7921 * t1708 / 0.9e1 + t7239 * t2514 * t1736 / 0.3e1 - t2210 * t2514 * t1731 / 0.6e1 + t2220 * t736 * t349 / 0.2e1 - t7934 / 0.6e1 - t7937 - t262 * t550 * t903 * t507 / 0.6e1 - t262 * t736 * t903 * t516 / 0.2e1;
6503 
6504   t7950 = t2206 * t2530;
6505   t7962 = t2206 * t2534;
6506   if(v4rho4 != NULL && (p->info->flags & XC_FLAGS_NEEDS_LAPLACIAN) && (p->info->flags & XC_FLAGS_HAVE_LXC))
6507     v4rho3lapl[4] = -0.4e1 / 0.9e1 * t7897 - t7900 - t7896 - 0.4e1 / 0.3e1 * t7901 - 0.2e1 / 0.9e1 * t7846 + t7825 - t7836 / 0.6e1 - 0.2e1 / 0.9e1 * t7950 + t2210 * t7874 * t1820 / 0.9e1 - t262 * t527 * t846 * t576 / 0.6e1 - t7239 * t2499 * t1824 / 0.3e1 - 0.2e1 / 0.3e1 * t7962 - t2210 * t2499 * t1832 / 0.6e1 - t262 * t678 * t846 * t582 / 0.2e1 - t262 * t678 * t327 * t1858 / 0.2e1;
6508 
6509   t7979 = t2206 * t2539;
6510   t7987 = t2206 * t2543;
6511   t7996 = t2206 * t2546;
6512   t8005 = t2206 * t2638;
6513   if(v4rho4 != NULL && (p->info->flags & XC_FLAGS_NEEDS_LAPLACIAN) && (p->info->flags & XC_FLAGS_HAVE_LXC))
6514     v4rho3lapl[5] = -0.4e1 / 0.9e1 * t7915 - t7918 + 0.4e1 / 0.3e1 * t7919 - 0.2e1 / 0.9e1 * t7855 + t7862 - t7934 / 0.3e1 - t7937 - 0.2e1 / 0.9e1 * t7979 + t2210 * t7921 * t1808 / 0.9e1 + t7239 * t2514 * t1812 / 0.3e1 - 0.4e1 / 0.3e1 * t7987 - t2210 * t505 * t903 * t553 / 0.3e1 + t2220 * t736 * t903 * t9 - 0.2e1 / 0.3e1 * t7996 - t2210 * t2514 * t1828 / 0.6e1 - t262 * t736 * t349 * t1840 / 0.2e1 - t8005 / 0.2e1 - t262 * t736 * t2637 * t191 / 0.2e1;
6515 
6516   if(v4rho4 != NULL && (p->info->flags & XC_FLAGS_NEEDS_LAPLACIAN) && (p->info->flags & XC_FLAGS_HAVE_LXC))
6517     v4rho3lapl[6] = -0.2e1 / 0.3e1 * t7897 - 0.2e1 / 0.3e1 * t7950 - 0.2e1 * t7962 + t7825 + t262 * t1716 * t327 * t2026 / 0.9e1 - t2210 * t2499 * t2031 / 0.2e1 - t262 * t678 * t327 * t2004 / 0.2e1;
6518 
6519   t8050 = t6763 * t84 * t7466;
6520   t8053 = t6769 * t84 * t7466;
6521   t8056 = t1912 * t84 * t7443;
6522   t8060 = t7446 * t42 * t84 * t1542;
6523   t8062 = t866 * t6787;
6524   t8072 = t7476 * t869;
6525   t8076 = t1908 * t84 * t222 * t611;
6526   t8079 = t7486 * t2560 * t611;
6527   t8081 = t1920 * t332;
6528   t8084 = 0.13276215095909872691e-2 * t8050 - 0.32144761499006987728e-2 * t8053 - 0.37906669669135802469e0 * t8056 + 0.70197536424325560128e-1 * t8060 + 0.18953334834567901234e-1 * t8062 - 0.48217142248510481592e-2 * t2267 + 0.32429099846460755633e-2 * t2280 + 0.63177782781893004115e0 * t2271 + 0.19120987654320987654e0 * t2283 - 0.15934156378600823045e1 * t2264 - 0.50989300411522633745e0 * t2286 - 0.11217646090534979424e1 * t2288 - 0.94766674172839506172e-1 * t2276 - 0.38241975308641975308e-1 * t8072 + 0.28930285349106288954e-2 * t8076 - 0.19457459907876453380e-2 * t8079 + 0.36032333162734172925e-3 * t8081 + 0.25271113112757201647e0 * t2274;
6529   t8096 = t336 * t628;
6530   t8112 = t2567 * t661;
6531   t8116 = 0.49846486874188679892e1 * t777 * t2330 * t873 + 0.49846486874188679892e1 * t777 * t778 * t2567 - 0.15243447427901234237e2 * t1967 * t1968 * t336 - 0.13278652291933993376e0 * t7507 * t882 * t1950 + 0.16615495624729559964e1 * t240 * t61 * t8084 * t247 - 0.34297756712777777034e2 * t7437 * t897 + 0.31465570642866950052e3 * t3328 * t7433 + 0.15934382750320792050e0 * t2314 * t882 * t7387 - 0.37384865155641509919e1 * t2318 * t778 * t8096 + 0.11432585570925925678e2 * t6904 * t1968 * t1392 + 0.31465570642866950052e3 * t1984 * t2624 * t7427 - 0.22865171141851851357e2 * t659 * t896 * t7387 - 0.76217237139506171188e1 * t659 * t896 * t7391 - 0.22865171141851851357e2 * t659 * t8112 * t790;
6532   t8120 = t873 * t1987;
6533   t8124 = t336 * t6874;
6534   t8143 = t110 * t2567;
6535   t8162 = -0.22865171141851851357e2 * t659 * t2620 * t2359 + 0.31465570642866950052e3 * t1984 * t8120 * t2352 - 0.24056046973484009303e4 * t6871 * t8124 * t7407 - 0.34297756712777777035e2 * t1967 * t662 * t3730 + 0.20977047095244633367e3 * t6892 * t1988 * t5492 + 0.70819478890314631335e-1 * t54 * t236 * t8084 - 0.37384865155641509919e1 * t2318 * t2319 * t873 - 0.22865171141851851357e2 * t659 * t2620 * t642 - 0.10622921833547194700e0 * t772 * t8143 * t230 - 0.10622921833547194700e0 * t772 * t2597 * t628 + 0.15934382750320792050e0 * t2314 * t2597 * t642 + 0.24923243437094339947e1 * t7523 * t7524 * t336 - 0.35409739445157315668e-1 * t772 * t882 * t1927 + 0.16615495624729559964e1 * t777 * t7538 * t336;
6536   t8171 = t346 * t251;
6537   t8176 = t6818 * t346;
6538   t8190 = t634 * t2634;
6539   t8199 = t1937 * t900;
6540   t8203 = 0.24e2 * t104 * t8176 * t1938 + 0.6e1 * t104 * t8190 * t251 + 0.6e1 * t104 * t2584 * t666 - 0.18e2 * t104 * t8199 * t635 - t1928 * t347 - t337 * t1997 - 0.18e2 * t231 * t2581 - 0.3e1 * t231 * t2635 - 0.3e1 * t2568 * t252 - 0.3e1 * t629 * t901 - 0.3e1 * t874 * t667;
6541   if(v4rho4 != NULL && (p->info->flags & XC_FLAGS_NEEDS_LAPLACIAN) && (p->info->flags & XC_FLAGS_HAVE_LXC))
6542     v4rho3lapl[7] = -0.3e1 / 0.8e1 * t262 * t286 * (0.6e1 * t231 * t2588 + 0.12e2 * t231 * t2585 + 0.6e1 * t629 * t879 - 0.6e1 * t337 * t1939 + 0.6e1 * t337 * t1943 + 0.6e1 * t874 * t636 - t104 * t234 * (t8116 + t8162) + 0.2e1 * t104 * t878 * t1996 + t25 * t8084 * t115 - 0.18e2 * t3265 * t8171 * t666 + t8203) - t262 * t550 * t903 * t587 / 0.2e1 - 0.3e1 / 0.2e1 * t262 * t736 * t2637 * t208 - 0.3e1 / 0.2e1 * t8005 + t262 * t1706 * t349 * t2035 / 0.9e1 - t2210 * t2514 * t2040 / 0.2e1 - 0.4e1 * t7987 - 0.2e1 * t7996 - 0.2e1 / 0.3e1 * t7979 - 0.2e1 / 0.3e1 * t7915 - 0.3e1 / 0.2e1 * t262 * t736 * t903 * t596 - t262 * t736 * t349 * t2021 / 0.2e1 - t7934 / 0.2e1 + t7862;
6543 
6544   t8264 = t918 * t1621;
6545   t8268 = t355 * t5908;
6546   t8275 = t2669 * t492;
6547   t8279 = t355 * t174;
6548   t8283 = -0.15243447427901234237e2 * t1597 * t1598 * t355 - 0.13278652291933993376e0 * t7124 * t927 * t1580 - 0.22865171141851851357e2 * t490 * t2723 * t470 - 0.10622921833547194700e0 * t705 * t2699 * t456 + 0.15934382750320792050e0 * t2133 * t2699 * t470 + 0.24923243437094339947e1 * t7106 * t7107 * t355 - 0.37384865155641509919e1 * t2137 * t2138 * t918 - 0.76217237139506171188e1 * t490 * t941 * t7004 - 0.22865171141851851357e2 * t490 * t2723 * t2178 + 0.31465570642866950052e3 * t1618 * t8264 * t2171 - 0.24056046973484009303e4 * t5905 * t8268 * t7020 - 0.22865171141851851357e2 * t490 * t941 * t6993 - 0.22865171141851851357e2 * t490 * t8275 * t723 + 0.20977047095244633367e3 * t5915 * t1622 * t8279;
6549   t8316 = t66 * t2669;
6550   t8338 = 0.77829839631505813518e-2 * t7658 - 0.14412933265093669170e-2 * t7660 + 0.15296790123456790123e0 * t7662 - 0.11572114139642515582e-1 * t7666 - 0.53104860383639490765e-2 * t7669 + 0.12857904599602795091e-1 * t7672 + 0.15162667867654320987e1 * t7675 - 0.28079014569730224051e0 * t7679 - 0.75813339338271604937e-1 * t7681 - 0.76483950617283950616e0 * t2102 - 0.25271113112757201646e1 * t2090 + 0.63736625514403292180e1 * t2083 + 0.19286856899404192636e-1 * t2086 - 0.12971639938584302253e-1 * t2099 + 0.37906669669135802469e0 * t2095 + 0.20395720164609053498e1 * t2105 + 0.44870584362139917696e1 * t2107 - 0.10108445245102880658e1 * t2093;
6551   t8346 = -0.34297756712777777035e2 * t1597 * t493 * t4030 + 0.15934382750320792050e0 * t2133 * t927 * t6993 - 0.37384865155641509919e1 * t2137 * t711 * t355 * t456 + 0.11432585570925925678e2 * t5940 * t1598 * t2709 - 0.34297756712777777034e2 * t7094 * t942 + 0.31465570642866950052e3 * t3429 * t7090 + 0.31465570642866950052e3 * t1618 * t2727 * t6980 + 0.49846486874188679892e1 * t710 * t711 * t2669 - 0.35409739445157315668e-1 * t705 * t927 * t1557 + 0.16615495624729559964e1 * t710 * t7131 * t355 + 0.49846486874188679892e1 * t710 * t2149 * t918 - 0.10622921833547194700e0 * t705 * t8316 * t156 + 0.16615495624729559964e1 * t167 * t61 * t8338 * t179 + 0.70819478890314631335e-1 * t54 * t162 * t8338;
6552   t8359 = t365 * t183;
6553   t8363 = t5871 * t365;
6554   t8375 = t462 * t2737;
6555   t8379 = t1567 * t945;
6556   t8399 = 0.6e1 * t52 * t8375 * t183 + t25 * t8338 * t71 + 0.6e1 * t52 * t2686 * t497 - 0.18e2 * t52 * t8379 * t463 - 0.6e1 * t356 * t1569 - 0.18e2 * t157 * t2683 + 0.12e2 * t157 * t2687 + 0.6e1 * t157 * t2690 + 0.6e1 * t356 * t1573 + 0.6e1 * t457 * t924 + 0.6e1 * t919 * t464;
6557   t8405 = t8 * t18 * t2740;
6558   t8408 = t8 * t135 * t948;
6559   t8427 = t8 * t123 * t2656;
6560   t8431 = t8 * t419 * t368 / 0.9e1;
6561   t8433 = t8 * t123 * t2653;
6562   t8436 = t8 * t396 * t2649;
6563   t8439 = t8 * t402 * t910;
6564   if(v4rho4 != NULL && (p->info->flags & XC_FLAGS_HAVE_LXC))
6565     v4rho3tau[0] = -0.3e1 / 0.8e1 * t262 * t263 * (-t52 * t160 * (t8283 + t8346) - 0.3e1 * t157 * t2738 - t1558 * t366 - 0.3e1 * t457 * t946 - t356 * t1631 + 0.2e1 * t52 * t923 * t1630 - 0.18e2 * t3144 * t8359 * t497 + 0.24e2 * t52 * t8363 * t1568 - 0.3e1 * t919 * t498 - 0.3e1 * t2670 * t184 + t8399) - 0.3e1 / 0.2e1 * t8405 - t8408 / 0.2e1 - t262 * t678 * t368 * t1497 / 0.2e1 - 0.3e1 / 0.2e1 * t262 * t678 * t948 * t412 - 0.3e1 / 0.2e1 * t262 * t678 * t2740 * t128 - t262 * t527 * t948 * t397 / 0.2e1 - 0.2e1 * t8427 + t8431 - 0.4e1 * t8433 - 0.2e1 / 0.3e1 * t8436 - 0.2e1 / 0.3e1 * t8439 + t262 * t1716 * t368 * t1674 / 0.9e1 - t2210 * t2762 * t1663 / 0.2e1;
6566 
6567   t8449 = t8 * t506 * t2750;
6568   t8452 = t8 * t512 * t954;
6569   t8455 = t8 * t190 * t2754;
6570   t8459 = t8 * t521 * t387 / 0.9e1;
6571   if(v4rho4 != NULL && (p->info->flags & XC_FLAGS_HAVE_LXC))
6572     v4rho3tau[1] = -0.2e1 / 0.3e1 * t8449 - 0.2e1 / 0.3e1 * t8452 - 0.2e1 * t8455 + t8459 + t262 * t1706 * t387 * t1646 / 0.9e1 - t2210 * t2777 * t1655 / 0.2e1 - t262 * t736 * t387 * t1484 / 0.2e1;
6573 
6574   t8474 = t1672 * t368;
6575   t8486 = 0.4e1 / 0.3e1 * t2206 * t2767;
6576   t8504 = 0.4e1 / 0.9e1 * t7247 * t2763;
6577   t8505 = t7251 * t2771;
6578   t8507 = t7244 * t959;
6579   if(v4rho4 != NULL && (p->info->flags & XC_FLAGS_HAVE_LXC))
6580     v4rho3tau[2] = -t7239 * t2762 * t1727 / 0.3e1 + t2210 * t8474 * t1718 / 0.9e1 - t2220 * t678 * t368 / 0.2e1 - t262 * t678 * t2740 * t203 / 0.2e1 - t8486 - t8405 / 0.2e1 - t8408 / 0.3e1 - t2220 * t678 * t948 * t9 - t2210 * t395 * t948 * t530 / 0.3e1 - t2210 * t2762 * t1744 / 0.6e1 - 0.2e1 / 0.3e1 * t8427 + t8431 - 0.4e1 / 0.3e1 * t8433 - 0.2e1 / 0.9e1 * t8436 - 0.4e1 / 0.9e1 * t8439 - t8504 + t8505 / 0.6e1 - 0.2e1 / 0.9e1 * t8507;
6581 
6582   t8512 = t7244 * t964;
6583   t8515 = 0.4e1 / 0.9e1 * t7247 * t2778;
6584   t8516 = t7251 * t2782;
6585   t8518 = t1644 * t387;
6586   t8531 = t7244 * t1002;
6587   t8534 = 0.4e1 / 0.3e1 * t2206 * t2788;
6588   if(v4rho4 != NULL && (p->info->flags & XC_FLAGS_HAVE_LXC))
6589     v4rho3tau[3] = -0.2e1 / 0.9e1 * t8449 - 0.4e1 / 0.9e1 * t8452 - 0.2e1 / 0.3e1 * t8455 + t8459 - 0.2e1 / 0.9e1 * t8512 - t8515 - t8516 / 0.6e1 + t2210 * t8518 * t1708 / 0.9e1 + t7239 * t2777 * t1736 / 0.3e1 - t2210 * t2777 * t1731 / 0.6e1 + t2220 * t736 * t387 / 0.2e1 - t8531 / 0.6e1 - t8534 - t262 * t550 * t1001 * t507 / 0.6e1 - t262 * t736 * t1001 * t516 / 0.2e1;
6590 
6591   t8547 = t2206 * t2793;
6592   t8559 = t2206 * t2797;
6593   if(v4rho4 != NULL && (p->info->flags & XC_FLAGS_HAVE_LXC))
6594     v4rho3tau[4] = -0.4e1 / 0.9e1 * t8507 - t8504 - t8486 - 0.4e1 / 0.3e1 * t8505 - 0.2e1 / 0.9e1 * t8439 + t8431 - t8408 / 0.6e1 - 0.2e1 / 0.9e1 * t8547 + t2210 * t8474 * t1820 / 0.9e1 - t262 * t527 * t948 * t576 / 0.6e1 - t7239 * t2762 * t1824 / 0.3e1 - 0.2e1 / 0.3e1 * t8559 - t2210 * t2762 * t1832 / 0.6e1 - t262 * t678 * t948 * t582 / 0.2e1 - t262 * t678 * t368 * t1858 / 0.2e1;
6595 
6596   t8576 = t2206 * t2802;
6597   t8584 = t2206 * t2806;
6598   t8593 = t2206 * t2809;
6599   t8602 = t2206 * t2893;
6600   if(v4rho4 != NULL && (p->info->flags & XC_FLAGS_HAVE_LXC))
6601     v4rho3tau[5] = -0.4e1 / 0.9e1 * t8512 - t8515 + 0.4e1 / 0.3e1 * t8516 - 0.2e1 / 0.9e1 * t8452 + t8459 - t8531 / 0.3e1 - t8534 - 0.2e1 / 0.9e1 * t8576 + t2210 * t8518 * t1808 / 0.9e1 + t7239 * t2777 * t1812 / 0.3e1 - 0.4e1 / 0.3e1 * t8584 - t2210 * t505 * t1001 * t553 / 0.3e1 + t2220 * t736 * t1001 * t9 - 0.2e1 / 0.3e1 * t8593 - t2210 * t2777 * t1828 / 0.6e1 - t262 * t736 * t387 * t1840 / 0.2e1 - t8602 / 0.2e1 - t262 * t736 * t2892 * t191 / 0.2e1;
6602 
6603   if(v4rho4 != NULL && (p->info->flags & XC_FLAGS_HAVE_LXC))
6604     v4rho3tau[6] = -0.2e1 / 0.3e1 * t8507 - 0.2e1 / 0.3e1 * t8547 - 0.2e1 * t8559 + t8431 + t262 * t1716 * t368 * t2026 / 0.9e1 - t2210 * t2762 * t2031 / 0.2e1 - t262 * t678 * t368 * t2004 / 0.2e1;
6605 
6606   t8625 = t384 * t251;
6607   t8632 = t634 * t2889;
6608   t8636 = t1937 * t998;
6609   t8640 = t6818 * t384;
6610   t8675 = t971 * t1987;
6611   t8679 = t374 * t6874;
6612   t8686 = t2821 * t661;
6613   t8690 = t374 * t242;
6614   t8710 = t110 * t2821;
6615   t8717 = -0.76217237139506171188e1 * t659 * t994 * t7391 - 0.22865171141851851357e2 * t659 * t2875 * t2359 + 0.31465570642866950052e3 * t1984 * t8675 * t2352 - 0.24056046973484009303e4 * t6871 * t8679 * t7407 - 0.22865171141851851357e2 * t659 * t994 * t7387 - 0.22865171141851851357e2 * t659 * t8686 * t790 + 0.20977047095244633367e3 * t6892 * t1988 * t8690 - 0.34297756712777777035e2 * t1967 * t662 * t4126 + 0.15934382750320792050e0 * t2314 * t980 * t7387 - 0.37384865155641509919e1 * t2318 * t778 * t374 * t628 + 0.11432585570925925678e2 * t6904 * t1968 * t2861 + 0.31465570642866950052e3 * t1984 * t2879 * t7427 - 0.10622921833547194700e0 * t772 * t8710 * t230 - 0.10622921833547194700e0 * t772 * t2851 * t628;
6616   t8742 = -0.53104860383639490765e-2 * t8050 + 0.12857904599602795091e-1 * t8053 + 0.15162667867654320987e1 * t8056 - 0.28079014569730224051e0 * t8060 - 0.75813339338271604937e-1 * t8062 + 0.19286856899404192636e-1 * t2267 - 0.12971639938584302253e-1 * t2280 - 0.25271113112757201646e1 * t2271 - 0.76483950617283950616e0 * t2283 + 0.63736625514403292180e1 * t2264 + 0.20395720164609053498e1 * t2286 + 0.44870584362139917696e1 * t2288 + 0.37906669669135802469e0 * t2276 + 0.15296790123456790123e0 * t8072 - 0.11572114139642515582e-1 * t8076 + 0.77829839631505813518e-2 * t8079 - 0.14412933265093669170e-2 * t8081 - 0.10108445245102880658e1 * t2274;
6617   t8778 = 0.15934382750320792050e0 * t2314 * t2851 * t642 + 0.24923243437094339947e1 * t7523 * t7524 * t374 + 0.70819478890314631335e-1 * t54 * t236 * t8742 + 0.16615495624729559964e1 * t240 * t61 * t8742 * t247 + 0.31465570642866950052e3 * t3536 * t7433 - 0.34297756712777777034e2 * t7437 * t995 - 0.22865171141851851357e2 * t659 * t2875 * t642 - 0.15243447427901234237e2 * t1967 * t1968 * t374 - 0.13278652291933993376e0 * t7507 * t980 * t1950 + 0.49846486874188679892e1 * t777 * t778 * t2821 + 0.49846486874188679892e1 * t777 * t2330 * t971 - 0.35409739445157315668e-1 * t772 * t980 * t1927 + 0.16615495624729559964e1 * t777 * t7538 * t374 - 0.37384865155641509919e1 * t2318 * t2319 * t971;
6618   t8784 = 0.6e1 * t375 * t1943 - 0.6e1 * t375 * t1939 + 0.6e1 * t972 * t636 - t1928 * t385 - 0.3e1 * t629 * t999 - t375 * t1997 - 0.3e1 * t972 * t667 - 0.3e1 * t231 * t2890 - 0.3e1 * t2822 * t252 - t104 * t234 * (t8717 + t8778) + t25 * t8742 * t115;
6619   if(v4rho4 != NULL && (p->info->flags & XC_FLAGS_HAVE_LXC))
6620     v4rho3tau[7] = -0.3e1 / 0.8e1 * t262 * t286 * (0.24e2 * t104 * t8640 * t1938 + 0.2e1 * t104 * t976 * t1996 + 0.6e1 * t104 * t8632 * t251 + 0.6e1 * t104 * t2838 * t666 - 0.18e2 * t104 * t8636 * t635 - 0.18e2 * t3265 * t8625 * t666 - 0.18e2 * t231 * t2835 + 0.12e2 * t231 * t2839 + 0.6e1 * t231 * t2842 + 0.6e1 * t629 * t977 + t8784) - t262 * t736 * t387 * t2021 / 0.2e1 - 0.3e1 / 0.2e1 * t262 * t736 * t1001 * t596 - 0.3e1 / 0.2e1 * t262 * t736 * t2892 * t208 - t262 * t550 * t1001 * t587 / 0.2e1 - 0.3e1 / 0.2e1 * t8602 - t8531 / 0.2e1 + t262 * t1706 * t387 * t2035 / 0.9e1 - t2210 * t2777 * t2040 / 0.2e1 - 0.2e1 * t8593 - 0.2e1 / 0.3e1 * t8576 - 0.4e1 * t8584 + t8459 - 0.2e1 / 0.3e1 * t8512;
6621 
6622   t8819 = t7244 * t1047 / 0.6e1;
6623   t8820 = t2206 * t2899;
6624   t8822 = t2206 * t2997;
6625   t8836 = t442 * t39 * t42;
6626   t8848 = t2097 * t39;
6627   t8861 = 0.1e1 / t26 / t4282;
6628   t8876 = -0.82976344349436704324e-4 * t5814 * t1007 * t8836 + 0.20090475936879367331e-3 * t5820 * t1007 * t8836 + 0.64289522998013975458e-3 * t1536 * t2911 * t148 - 0.60271427810638101992e-4 * t1536 * t1007 * t435 - 0.43873460265203475082e-2 * t8848 * t42 * t1007 * t1542 - 0.84237043709190672156e-1 * t1540 * t2911 * t1542 * t148 + 0.78972228477366255147e-2 * t1540 * t2905 * t435 - 0.40012595761865569274e-1 * t441 * t8861 * t443 * t446 - 0.43238799795281007511e-3 * t440 * t2911 * t2917 - 0.22520208226708858079e-4 * t2916 * t8836 + 0.40536374808075944542e-4 * t2916 * t5843 + 0.80733058984910836761e-1 * t152 * t8861 * t451;
6629   t8907 = -0.6e1 * t52 * t1567 * t1043 * t463 + 0.4e1 * t52 * t701 * t2182 + t25 * t8876 * t71 + 0.2e1 * t52 * t2943 * t497 - 0.24e2 * t3144 * t7156 * t727 + 0.2e1 * t1016 * t464 - t1016 * t498 + 0.8e1 * t157 * t2939 - 0.2e1 * t2924 * t184 - 0.2e1 * t2110 * t280 + 0.4e1 * t270 * t2130 + 0.8e1 * t697 * t702 - 0.4e1 * t697 * t728;
6630   t8949 = t696 * t696;
6631   t8964 = t156 * t696;
6632   t8968 = t269 * t696;
6633   t8972 = t1024 * t62;
6634   t8989 = 0.53114609167735973502e-1 * t2133 * t2963 * t470 - 0.13278652291933993376e0 * t7124 * t2947 * t470 - 0.76217237139506171188e1 * t490 * t1039 * t456 - 0.70819478890314631336e-1 * t705 * t706 * t2109 - 0.15243447427901234237e2 * t1597 * t1039 * t470 + 0.16615495624729559964e1 * t710 * t2149 * t1015 + 0.33230991249459119928e1 * t710 * t711 * t2923 - 0.70819478890314631336e-1 * t54 * t469 * t8949 + 0.33230991249459119928e1 * t474 * t61 * t8949 * t179 + 0.70819478890314631335e-1 * t54 * t162 * t8876 + 0.16615495624729559964e1 * t167 * t61 * t8876 * t179 + 0.21245843667094389400e0 * t2133 * t706 * t8964 - 0.49846486874188679892e1 * t2137 * t711 * t8968 + 0.11432585570925925678e2 * t5940 * t493 * t8972 - 0.70819478890314631336e-1 * t705 * t66 * t2923 * t156 - 0.35409739445157315668e-1 * t705 * t2963 * t456 - 0.12461621718547169973e1 * t2137 * t2138 * t1015 - 0.76217237139506171188e1 * t490 * t2977 * t470;
6635   t9006 = t62 * t470;
6636   t9013 = t1015 * t1621;
6637   t9020 = t62 * t2109;
6638   t9024 = t174 * t456;
6639   t9029 = t5910 * t470;
6640   t9036 = t2923 * t492;
6641   t9046 = t3208 * t8964;
6642   t9051 = -0.15243447427901234238e2 * t490 * t8949 * t492 * t62 + 0.33230991249459119928e1 * t710 * t1115 * t2109 + 0.53114609167735973502e-1 * t2133 * t2947 * t456 + 0.24923243437094339947e1 * t7106 * t2138 * t1024 - 0.12461621718547169973e1 * t2137 * t2149 * t1024 + 0.31465570642866950052e3 * t1618 * t2985 * t9006 - 0.76217237139506171188e1 * t490 * t2977 * t2178 + 0.10488523547622316684e3 * t1618 * t9013 * t2171 - 0.30486894855802468476e2 * t490 * t722 * t8964 - 0.15243447427901234238e2 * t490 * t722 * t9020 + 0.10488523547622316684e3 * t1618 * t2985 * t9024 - 0.24056046973484009303e4 * t5905 * t1024 * t5908 * t9029 - 0.11432585570925925678e2 * t1597 * t493 * t4354 - 0.15243447427901234238e2 * t490 * t9036 * t723 - 0.11432585570925925678e2 * t1597 * t1039 * t2178 + 0.20977047095244633367e3 * t5915 * t2985 * t2171 + 0.41954094190489266736e3 * t7089 * t9046 - 0.45730342283703702713e2 * t3179 * t2167;
6643   t9061 = t727 * t727;
6644   t9065 = 0.8e1 * t270 * t2127 + 0.4e1 * t157 * t2944 - 0.12e2 * t270 * t2123 - 0.12e2 * t157 * t2936 + 0.4e1 * t52 * t462 * t2993 * t183 - 0.6e1 * t52 * t2935 * t497 + 0.24e2 * t52 * t5871 * t1020 * t463 - t457 * t1044 - t52 * t160 * (t8989 + t9051) - 0.2e1 * t270 * t2183 - 0.2e1 * t157 * t2994 + 0.2e1 * t457 * t1021 + 0.4e1 * t52 * t462 * t9061;
6645   if(v4rho4 != NULL && (p->info->flags & XC_FLAGS_HAVE_LXC))
6646     v4rho2sigma2[0] = -t8819 - 0.4e1 / 0.3e1 * t8820 - t8822 - t262 * t527 * t1046 * t397 / 0.6e1 - t262 * t678 * t2996 * t128 - t262 * t678 * t1046 * t412 / 0.2e1 - 0.3e1 / 0.8e1 * t262 * t263 * (t8907 + t9065);
6647 
6648   if(v4rho4 != NULL && (p->info->flags & XC_FLAGS_HAVE_LXC))
6649     v4rho2sigma2[1] = 0.0e0;
6650 
6651   if(v4rho4 != NULL && (p->info->flags & XC_FLAGS_HAVE_LXC))
6652     v4rho2sigma2[2] = 0.0e0;
6653 
6654   if(v4rho4 != NULL && (p->info->flags & XC_FLAGS_HAVE_LXC))
6655     v4rho2sigma2[3] = 0.0e0;
6656 
6657   if(v4rho4 != NULL && (p->info->flags & XC_FLAGS_HAVE_LXC))
6658     v4rho2sigma2[4] = 0.0e0;
6659 
6660   t9071 = t7244 * t1092 / 0.6e1;
6661   t9072 = t2206 * t3002;
6662   if(v4rho4 != NULL && (p->info->flags & XC_FLAGS_HAVE_LXC))
6663     v4rho2sigma2[5] = -t9071 - 0.4e1 / 0.3e1 * t9072 - t262 * t550 * t1091 * t507 / 0.6e1 - t262 * t736 * t1091 * t516 / 0.2e1;
6664 
6665   t9084 = t2206 * t3006;
6666   if(v4rho4 != NULL && (p->info->flags & XC_FLAGS_HAVE_LXC))
6667     v4rho2sigma2[6] = -t8819 - 0.2e1 / 0.3e1 * t8820 - t8822 / 0.2e1 - 0.2e1 / 0.3e1 * t9084 - t2210 * t395 * t1046 * t530 / 0.6e1 - t262 * t678 * t2996 * t203 / 0.2e1 - t2220 * t678 * t1046 * t9 / 0.2e1;
6668 
6669   if(v4rho4 != NULL && (p->info->flags & XC_FLAGS_HAVE_LXC))
6670     v4rho2sigma2[7] = 0.0e0;
6671 
6672   if(v4rho4 != NULL && (p->info->flags & XC_FLAGS_HAVE_LXC))
6673     v4rho2sigma2[8] = 0.0e0;
6674 
6675   if(v4rho4 != NULL && (p->info->flags & XC_FLAGS_HAVE_LXC))
6676     v4rho2sigma2[9] = 0.0e0;
6677 
6678   if(v4rho4 != NULL && (p->info->flags & XC_FLAGS_HAVE_LXC))
6679     v4rho2sigma2[10] = 0.0e0;
6680 
6681   t9099 = t2206 * t3011;
6682   t9109 = t2206 * t3109;
6683   if(v4rho4 != NULL && (p->info->flags & XC_FLAGS_HAVE_LXC))
6684     v4rho2sigma2[11] = -t9071 - 0.2e1 / 0.3e1 * t9072 - 0.2e1 / 0.3e1 * t9099 - t2210 * t505 * t1091 * t553 / 0.6e1 + t2220 * t736 * t1091 * t9 / 0.2e1 - t9109 / 0.2e1 - t262 * t736 * t3108 * t191 / 0.2e1;
6685 
6686   if(v4rho4 != NULL && (p->info->flags & XC_FLAGS_HAVE_LXC))
6687     v4rho2sigma2[12] = -t8819 - 0.4e1 / 0.3e1 * t9084 - t262 * t527 * t1046 * t576 / 0.6e1 - t262 * t678 * t1046 * t582 / 0.2e1;
6688 
6689   if(v4rho4 != NULL && (p->info->flags & XC_FLAGS_HAVE_LXC))
6690     v4rho2sigma2[13] = 0.0e0;
6691 
6692   if(v4rho4 != NULL && (p->info->flags & XC_FLAGS_HAVE_LXC))
6693     v4rho2sigma2[14] = 0.0e0;
6694 
6695   if(v4rho4 != NULL && (p->info->flags & XC_FLAGS_HAVE_LXC))
6696     v4rho2sigma2[15] = 0.0e0;
6697 
6698   if(v4rho4 != NULL && (p->info->flags & XC_FLAGS_HAVE_LXC))
6699     v4rho2sigma2[16] = 0.0e0;
6700 
6701   t9138 = t794 * t794;
6702   t9164 = -0.6e1 * t104 * t3047 * t666 + 0.4e1 * t104 * t634 * t9138 + 0.2e1 * t1061 * t636 - t1061 * t667 - 0.2e1 * t2291 * t303 + 0.8e1 * t293 * t2308 - 0.12e2 * t231 * t3048 + 0.8e1 * t231 * t3051 + 0.4e1 * t293 * t2311 - 0.2e1 * t293 * t2364 - 0.2e1 * t3036 * t252 + 0.8e1 * t764 * t769 - 0.4e1 * t764 * t795;
6703   t9197 = t618 * t39 * t42;
6704   t9209 = t2278 * t39;
6705   t9222 = 0.1e1 / t81 / t4365;
6706   t9237 = -0.82976344349436704324e-4 * t6763 * t1052 * t9197 + 0.20090475936879367331e-3 * t6769 * t1052 * t9197 + 0.64289522998013975458e-3 * t1908 * t3023 * t222 - 0.60271427810638101992e-4 * t1908 * t1052 * t611 - 0.43873460265203475082e-2 * t9209 * t42 * t1052 * t1542 - 0.84237043709190672156e-1 * t1912 * t3023 * t1542 * t222 + 0.78972228477366255147e-2 * t1912 * t3017 * t611 - 0.40012595761865569274e-1 * t617 * t9222 * t443 * t446 - 0.43238799795281007511e-3 * t616 * t3023 * t3029 - 0.22520208226708858079e-4 * t3028 * t9197 + 0.40536374808075944542e-4 * t3028 * t6790 + 0.80733058984910836761e-1 * t226 * t9222 * t451;
6707   t9242 = t763 * t763;
6708   t9253 = t106 * t642;
6709   t9257 = t230 * t763;
6710   t9261 = t106 * t2290;
6711   t9265 = t242 * t628;
6712   t9270 = t6876 * t642;
6713   t9277 = t3035 * t661;
6714   t9284 = t1060 * t1987;
6715   t9297 = t292 * t763;
6716   t9301 = t1069 * t106;
6717   t9305 = 0.16615495624729559964e1 * t240 * t61 * t9237 * t247 + 0.33230991249459119928e1 * t646 * t61 * t9242 * t247 - 0.70819478890314631336e-1 * t54 * t641 * t9242 + 0.70819478890314631335e-1 * t54 * t236 * t9237 + 0.31465570642866950052e3 * t1984 * t3097 * t9253 - 0.30486894855802468476e2 * t659 * t789 * t9257 - 0.15243447427901234238e2 * t659 * t789 * t9261 + 0.10488523547622316684e3 * t1984 * t3097 * t9265 - 0.24056046973484009303e4 * t6871 * t1069 * t6874 * t9270 - 0.11432585570925925678e2 * t1967 * t662 * t4437 - 0.15243447427901234238e2 * t659 * t9277 * t790 - 0.76217237139506171188e1 * t659 * t3089 * t2359 + 0.10488523547622316684e3 * t1984 * t9284 * t2352 - 0.11432585570925925678e2 * t1967 * t1084 * t2359 + 0.20977047095244633367e3 * t6892 * t3097 * t2352 + 0.21245843667094389400e0 * t2314 * t773 * t9257 - 0.49846486874188679892e1 * t2318 * t778 * t9297 + 0.11432585570925925678e2 * t6904 * t662 * t9301;
6718   t9344 = t3329 * t9257;
6719   t9361 = -0.70819478890314631336e-1 * t772 * t773 * t2290 + 0.53114609167735973502e-1 * t2314 * t3059 * t628 + 0.24923243437094339947e1 * t7523 * t2319 * t1069 - 0.70819478890314631336e-1 * t772 * t110 * t3035 * t230 - 0.35409739445157315668e-1 * t772 * t3075 * t628 - 0.12461621718547169973e1 * t2318 * t2319 * t1060 + 0.16615495624729559964e1 * t777 * t2330 * t1060 + 0.33230991249459119928e1 * t777 * t778 * t3035 + 0.33230991249459119928e1 * t777 * t1157 * t2290 - 0.12461621718547169973e1 * t2318 * t2330 * t1069 - 0.15243447427901234238e2 * t659 * t9242 * t661 * t106 - 0.76217237139506171188e1 * t659 * t3089 * t642 + 0.41954094190489266736e3 * t7432 * t9344 - 0.45730342283703702713e2 * t3300 * t2348 - 0.15243447427901234237e2 * t1967 * t1084 * t642 + 0.53114609167735973502e-1 * t2314 * t3075 * t642 - 0.13278652291933993376e0 * t7507 * t3059 * t642 - 0.76217237139506171188e1 * t659 * t1084 * t628;
6720   t9367 = 0.4e1 * t104 * t768 * t2363 + 0.4e1 * t104 * t634 * t3105 * t251 + 0.4e1 * t231 * t3056 - 0.24e2 * t3265 * t7577 * t794 - 0.12e2 * t293 * t2304 - 0.6e1 * t104 * t1937 * t1088 * t635 + 0.24e2 * t104 * t6818 * t1065 * t635 - t629 * t1089 + 0.2e1 * t629 * t1066 - 0.2e1 * t231 * t3106 + 0.2e1 * t104 * t3055 * t666 - t104 * t234 * (t9305 + t9361) + t25 * t9237 * t115;
6721   if(v4rho4 != NULL && (p->info->flags & XC_FLAGS_HAVE_LXC))
6722     v4rho2sigma2[17] = -t9071 - 0.4e1 / 0.3e1 * t9099 - t9109 - t262 * t550 * t1091 * t587 / 0.6e1 - t262 * t736 * t3108 * t208 - t262 * t736 * t1091 * t596 / 0.2e1 - 0.3e1 / 0.8e1 * t262 * t286 * (t9164 + t9367);
6723 
6724   t9373 = t7244 * t1134 / 0.6e1;
6725   t9374 = t2206 * t3115;
6726   t9376 = t2206 * t3222;
6727   t9405 = t66 * t3130;
6728   t9416 = t5814 * t1096 * t8836;
6729   t9419 = t5820 * t1096 * t8836;
6730   t9423 = t1536 * t1096 * t435;
6731   t9427 = t8848 * t42 * t1096 * t1542;
6732   t9431 = t1540 * t3121 * t435;
6733   t9435 = t3126 * t8836;
6734   t9437 = t3126 * t5843;
6735   t9440 = -0.16595268869887340864e-3 * t9416 + 0.40180951873758734660e-3 * t9419 + 0.10447047487177271012e-2 * t2903 - 0.12054285562127620398e-3 * t9423 - 0.87746920530406950161e-2 * t9427 - 0.13688519602743484225e0 * t2907 + 0.15794445695473251029e-1 * t9431 - 0.54754078410973936901e-1 * t2914 - 0.70263049667331637203e-3 * t2918 - 0.45040416453417716157e-4 * t9435 + 0.81072749616151889082e-4 * t9437 + 0.11047681755829903978e0 * t2921;
6736   t9463 = 0.33230991249459119928e1 * t710 * t711 * t3130 - 0.70819478890314631336e-1 * t705 * t9405 * t156 - 0.35409739445157315668e-1 * t705 * t3185 * t456 - 0.12461621718547169973e1 * t2137 * t2138 * t1104 + 0.70819478890314631335e-1 * t54 * t162 * t9440 + 0.16615495624729559964e1 * t167 * t61 * t9440 * t179 - 0.35409739445157315668e-1 * t705 * t7708 * t269 - 0.70819478890314631336e-1 * t705 * t2437 * t696 - 0.76217237139506171188e1 * t490 * t3199 * t470 + 0.53114609167735973502e-1 * t2133 * t3185 * t470 + 0.16615495624729559964e1 * t710 * t2149 * t1104;
6737   t9470 = t2109 * t179;
6738   t9489 = t816 * t269;
6739   t9493 = t314 * t696;
6740   t9497 = t314 * t470;
6741   t9501 = 0.16615495624729559964e1 * t710 * t1115 * t2407 - 0.35409739445157315668e-1 * t705 * t825 * t2109 + 0.16615495624729559964e1 * t710 * t9470 * t314 + 0.33230991249459119928e1 * t710 * t3174 * t816 - 0.76217237139506171188e1 * t490 * t7750 * t1126 + 0.53114609167735973502e-1 * t2133 * t825 * t6997 + 0.24923243437094339947e1 * t7106 * t2138 * t3164 - 0.12461621718547169973e1 * t2137 * t2149 * t3164 - 0.24923243437094339946e1 * t2137 * t711 * t9489 - 0.24923243437094339946e1 * t2137 * t711 * t9493 - 0.15243447427901234237e2 * t1597 * t722 * t9497;
6742   t9512 = t3130 * t492;
6743   t9519 = t1104 * t1621;
6744   t9523 = t269 * t470;
6745   t9539 = 0.10622921833547194700e0 * t2133 * t2437 * t3160 + 0.10622921833547194700e0 * t2133 * t825 * t8964 - 0.11432585570925925678e2 * t1597 * t493 * t4654 - 0.15243447427901234238e2 * t490 * t9512 * t723 - 0.76217237139506171188e1 * t490 * t3199 * t2178 + 0.10488523547622316684e3 * t1618 * t9519 * t2171 - 0.13278652291933993376e0 * t7124 * t825 * t9523 - 0.15243447427901234238e2 * t490 * t2460 * t3160 - 0.15243447427901234238e2 * t490 * t2460 * t2981 - 0.76217237139506171188e1 * t490 * t839 * t6997 - 0.15243447427901234238e2 * t490 * t839 * t8964;
6746   t9544 = t5939 * t489 * t470;
6747   t9548 = t1596 * t489 * t696;
6748   t9553 = t1621 * t62;
6749   t9554 = t9553 * t9523;
6750   t9563 = t3208 * t6997;
6751   t9567 = t5903 * t5904 * t314;
6752   t9568 = t5908 * t5910;
6753   t9569 = t9568 * t9523;
6754   t9574 = t5914 * t7088;
6755   t9577 = -0.76217237139506171188e1 * t490 * t839 * t9020 + 0.11432585570925925678e2 * t9544 * t1127 - 0.22865171141851851356e2 * t9548 * t840 - 0.22865171141851851356e2 * t3179 * t2461 + 0.31465570642866950052e3 * t3207 * t9554 + 0.20977047095244633368e3 * t1615 * t1617 * t816 * t3209 + 0.20977047095244633368e3 * t3207 * t9046 + 0.10488523547622316684e3 * t3207 * t9563 - 0.24056046973484009303e4 * t9567 * t9569 - 0.11432585570925925678e2 * t3179 * t2471 + 0.20977047095244633367e3 * t9574 * t2465;
6756   t9582 = t462 * t3218;
6757   t9594 = t1567 * t1130;
6758   t9610 = 0.2e1 * t52 * t7794 * t279 + 0.2e1 * t52 * t3156 * t497 + 0.2e1 * t52 * t821 * t2182 - 0.6e1 * t315 * t2123 + 0.4e1 * t52 * t2424 * t727 - t52 * t160 * (t9463 + t9501 + t9539 + t9577) + 0.4e1 * t52 * t9582 * t183 + 0.4e1 * t157 * t3157 + 0.4e1 * t315 * t2127 + 0.4e1 * t817 * t702 + 0.2e1 * t315 * t2130 - 0.6e1 * t52 * t9594 * t463 + 0.2e1 * t270 * t2428 + 0.4e1 * t270 * t2425 + 0.4e1 * t697 * t822 + 0.4e1 * t157 * t3149 + 0.2e1 * t457 * t1109 - 0.6e1 * t270 * t2421;
6759   t9628 = t157 * t1567;
6760   t9638 = t52 * t5871;
6761   t9649 = 0.4e1 * t157 * t3152 - t270 * t2475 - t315 * t2183 - 0.2e1 * t697 * t844 - t2110 * t325 - t1105 * t498 - 0.2e1 * t157 * t3219 - 0.2e1 * t3131 * t184 - t2408 * t280 - 0.12e2 * t3144 * t843 * t279 * t183 - 0.12e2 * t9628 * t3146 - 0.2e1 * t817 * t728 + t25 * t9440 * t71 - 0.6e1 * t3144 * t3145 * t497 + 0.24e2 * t9638 * t3145 * t463 - t457 * t1131 - 0.12e2 * t3144 * t324 * t727 * t183 + 0.2e1 * t1105 * t464;
6762   if(v4rho4 != NULL && (p->info->flags & XC_FLAGS_NEEDS_LAPLACIAN) && (p->info->flags & XC_FLAGS_HAVE_LXC))
6763     v4rho2sigmalapl[0] = -t9373 - 0.4e1 / 0.3e1 * t9374 - t9376 - t262 * t527 * t1133 * t397 / 0.6e1 - t262 * t678 * t3221 * t128 - t262 * t678 * t1133 * t412 / 0.2e1 - 0.3e1 / 0.8e1 * t262 * t263 * (t9610 + t9649);
6764 
6765   if(v4rho4 != NULL && (p->info->flags & XC_FLAGS_NEEDS_LAPLACIAN) && (p->info->flags & XC_FLAGS_HAVE_LXC))
6766     v4rho2sigmalapl[1] = 0.0e0;
6767 
6768   if(v4rho4 != NULL && (p->info->flags & XC_FLAGS_NEEDS_LAPLACIAN) && (p->info->flags & XC_FLAGS_HAVE_LXC))
6769     v4rho2sigmalapl[2] = 0.0e0;
6770 
6771   if(v4rho4 != NULL && (p->info->flags & XC_FLAGS_NEEDS_LAPLACIAN) && (p->info->flags & XC_FLAGS_HAVE_LXC))
6772     v4rho2sigmalapl[3] = 0.0e0;
6773 
6774   if(v4rho4 != NULL && (p->info->flags & XC_FLAGS_NEEDS_LAPLACIAN) && (p->info->flags & XC_FLAGS_HAVE_LXC))
6775     v4rho2sigmalapl[4] = 0.0e0;
6776 
6777   t9655 = t7244 * t1176 / 0.6e1;
6778   t9656 = t2206 * t3227;
6779   if(v4rho4 != NULL && (p->info->flags & XC_FLAGS_NEEDS_LAPLACIAN) && (p->info->flags & XC_FLAGS_HAVE_LXC))
6780     v4rho2sigmalapl[5] = -t9655 - 0.4e1 / 0.3e1 * t9656 - t262 * t550 * t1175 * t507 / 0.6e1 - t262 * t736 * t1175 * t516 / 0.2e1;
6781 
6782   t9668 = t2206 * t3231;
6783   if(v4rho4 != NULL && (p->info->flags & XC_FLAGS_NEEDS_LAPLACIAN) && (p->info->flags & XC_FLAGS_HAVE_LXC))
6784     v4rho2sigmalapl[6] = -t9373 - 0.2e1 / 0.3e1 * t9374 - t9376 / 0.2e1 - 0.2e1 / 0.3e1 * t9668 - t2210 * t395 * t1133 * t530 / 0.6e1 - t262 * t678 * t3221 * t203 / 0.2e1 - t2220 * t678 * t1133 * t9 / 0.2e1;
6785 
6786   if(v4rho4 != NULL && (p->info->flags & XC_FLAGS_NEEDS_LAPLACIAN) && (p->info->flags & XC_FLAGS_HAVE_LXC))
6787     v4rho2sigmalapl[7] = 0.0e0;
6788 
6789   if(v4rho4 != NULL && (p->info->flags & XC_FLAGS_NEEDS_LAPLACIAN) && (p->info->flags & XC_FLAGS_HAVE_LXC))
6790     v4rho2sigmalapl[8] = 0.0e0;
6791 
6792   if(v4rho4 != NULL && (p->info->flags & XC_FLAGS_NEEDS_LAPLACIAN) && (p->info->flags & XC_FLAGS_HAVE_LXC))
6793     v4rho2sigmalapl[9] = 0.0e0;
6794 
6795   if(v4rho4 != NULL && (p->info->flags & XC_FLAGS_NEEDS_LAPLACIAN) && (p->info->flags & XC_FLAGS_HAVE_LXC))
6796     v4rho2sigmalapl[10] = 0.0e0;
6797 
6798   t9683 = t2206 * t3236;
6799   t9693 = t2206 * t3343;
6800   if(v4rho4 != NULL && (p->info->flags & XC_FLAGS_NEEDS_LAPLACIAN) && (p->info->flags & XC_FLAGS_HAVE_LXC))
6801     v4rho2sigmalapl[11] = -t9655 - 0.2e1 / 0.3e1 * t9656 - 0.2e1 / 0.3e1 * t9683 - t2210 * t505 * t1175 * t553 / 0.6e1 + t2220 * t736 * t1175 * t9 / 0.2e1 - t9693 / 0.2e1 - t262 * t736 * t3342 * t191 / 0.2e1;
6802 
6803   if(v4rho4 != NULL && (p->info->flags & XC_FLAGS_NEEDS_LAPLACIAN) && (p->info->flags & XC_FLAGS_HAVE_LXC))
6804     v4rho2sigmalapl[12] = -t9373 - 0.4e1 / 0.3e1 * t9668 - t262 * t527 * t1133 * t576 / 0.6e1 - t262 * t678 * t1133 * t582 / 0.2e1;
6805 
6806   if(v4rho4 != NULL && (p->info->flags & XC_FLAGS_NEEDS_LAPLACIAN) && (p->info->flags & XC_FLAGS_HAVE_LXC))
6807     v4rho2sigmalapl[13] = 0.0e0;
6808 
6809   if(v4rho4 != NULL && (p->info->flags & XC_FLAGS_NEEDS_LAPLACIAN) && (p->info->flags & XC_FLAGS_HAVE_LXC))
6810     v4rho2sigmalapl[14] = 0.0e0;
6811 
6812   if(v4rho4 != NULL && (p->info->flags & XC_FLAGS_NEEDS_LAPLACIAN) && (p->info->flags & XC_FLAGS_HAVE_LXC))
6813     v4rho2sigmalapl[15] = 0.0e0;
6814 
6815   if(v4rho4 != NULL && (p->info->flags & XC_FLAGS_NEEDS_LAPLACIAN) && (p->info->flags & XC_FLAGS_HAVE_LXC))
6816     v4rho2sigmalapl[16] = 0.0e0;
6817 
6818   t9736 = t6763 * t1138 * t9197;
6819   t9739 = t6769 * t1138 * t9197;
6820   t9743 = t1908 * t1138 * t611;
6821   t9747 = t9209 * t42 * t1138 * t1542;
6822   t9751 = t1912 * t3242 * t611;
6823   t9755 = t3247 * t9197;
6824   t9757 = t3247 * t6790;
6825   t9760 = -0.16595268869887340864e-3 * t9736 + 0.40180951873758734660e-3 * t9739 + 0.10447047487177271012e-2 * t3015 - 0.12054285562127620398e-3 * t9743 - 0.87746920530406950161e-2 * t9747 - 0.13688519602743484225e0 * t3019 + 0.15794445695473251029e-1 * t9751 - 0.54754078410973936901e-1 * t3026 - 0.70263049667331637203e-3 * t3030 - 0.45040416453417716157e-4 * t9755 + 0.81072749616151889082e-4 * t9757 + 0.11047681755829903978e0 * t3033;
6826   t9764 = t2290 * t247;
6827   t9777 = t110 * t3251;
6828   t9799 = 0.16615495624729559964e1 * t777 * t9764 * t336 - 0.35409739445157315668e-1 * t772 * t8143 * t292 - 0.70819478890314631336e-1 * t772 * t2597 * t763 + 0.16615495624729559964e1 * t777 * t1157 * t2567 - 0.70819478890314631336e-1 * t772 * t9777 * t230 - 0.35409739445157315668e-1 * t772 * t3306 * t628 - 0.12461621718547169973e1 * t2318 * t2319 * t1146 + 0.33230991249459119928e1 * t777 * t3295 * t873 - 0.35409739445157315668e-1 * t772 * t882 * t2290 + 0.16615495624729559964e1 * t777 * t2330 * t1146 + 0.33230991249459119928e1 * t777 * t778 * t3251;
6829   t9806 = t336 * t763;
6830   t9813 = t3251 * t661;
6831   t9820 = t1146 * t1987;
6832   t9836 = 0.53114609167735973502e-1 * t2314 * t3306 * t642 - 0.76217237139506171188e1 * t659 * t3320 * t642 - 0.24923243437094339946e1 * t2318 * t778 * t9806 - 0.11432585570925925678e2 * t1967 * t662 * t4734 - 0.15243447427901234238e2 * t659 * t9813 * t790 - 0.76217237139506171188e1 * t659 * t3320 * t2359 + 0.10488523547622316684e3 * t1984 * t9820 * t2352 - 0.76217237139506171188e1 * t659 * t8112 * t1168 + 0.10622921833547194700e0 * t2314 * t2597 * t3281 + 0.10622921833547194700e0 * t2314 * t882 * t9257 + 0.53114609167735973502e-1 * t2314 * t882 * t7417;
6833   t9844 = t873 * t292;
6834   t9848 = t336 * t642;
6835   t9852 = t292 * t642;
6836   t9874 = 0.24923243437094339947e1 * t7523 * t2319 * t3285 - 0.12461621718547169973e1 * t2318 * t2330 * t3285 - 0.24923243437094339946e1 * t2318 * t778 * t9844 - 0.15243447427901234237e2 * t1967 * t789 * t9848 - 0.13278652291933993376e0 * t7507 * t882 * t9852 - 0.15243447427901234238e2 * t659 * t2620 * t3281 - 0.15243447427901234238e2 * t659 * t2620 * t3093 - 0.76217237139506171188e1 * t659 * t896 * t7417 - 0.15243447427901234238e2 * t659 * t896 * t9257 - 0.76217237139506171188e1 * t659 * t896 * t9261 + 0.70819478890314631335e-1 * t54 * t236 * t9760;
6837   t9885 = t3329 * t7417;
6838   t9889 = t6870 * t5904 * t336;
6839   t9890 = t6874 * t6876;
6840   t9891 = t9890 * t9852;
6841   t9898 = t6891 * t7431;
6842   t9902 = t6903 * t489 * t642;
6843   t9906 = t1966 * t489 * t763;
6844   t9909 = t1987 * t106;
6845   t9910 = t9909 * t9852;
6846   t9913 = 0.16615495624729559964e1 * t240 * t61 * t9760 * t247 + 0.20977047095244633368e3 * t1983 * t1617 * t873 * t3330 + 0.20977047095244633368e3 * t3328 * t9344 + 0.10488523547622316684e3 * t3328 * t9885 - 0.24056046973484009303e4 * t9889 * t9891 - 0.22865171141851851356e2 * t3300 * t2621 - 0.11432585570925925678e2 * t3300 * t2631 + 0.20977047095244633367e3 * t9898 * t2625 + 0.11432585570925925678e2 * t9902 * t1169 - 0.22865171141851851356e2 * t9906 * t897 + 0.31465570642866950052e3 * t3328 * t9910;
6847   t9918 = t231 * t1937;
6848   t9935 = 0.2e1 * t1147 * t636 - 0.2e1 * t3252 * t252 - t1147 * t667 - 0.2e1 * t874 * t795 - t337 * t2364 - t2568 * t303 - 0.2e1 * t764 * t901 - t2291 * t347 - t293 * t2635 - 0.2e1 * t231 * t3340 + t25 * t9760 * t115 - t629 * t1173 - t104 * t234 * (t9799 + t9836 + t9874 + t9913) - 0.12e2 * t9918 * t3267 - 0.12e2 * t3265 * t900 * t302 * t251 - 0.12e2 * t3265 * t346 * t794 * t251 - 0.6e1 * t3265 * t3266 * t666 + 0.2e1 * t104 * t878 * t2363;
6849   t9939 = t104 * t6818;
6850   t9945 = t634 * t3339;
6851   t9958 = t1937 * t1172;
6852   t9981 = 0.4e1 * t104 * t9945 * t251 + 0.4e1 * t104 * t2584 * t794 + 0.2e1 * t104 * t8190 * t302 + 0.2e1 * t104 * t3277 * t666 - 0.6e1 * t104 * t9958 * t635 + 0.24e2 * t9939 * t3266 * t635 + 0.2e1 * t629 * t1151 - 0.6e1 * t337 * t2304 + 0.4e1 * t337 * t2308 + 0.4e1 * t231 * t3270 + 0.4e1 * t231 * t3273 + 0.4e1 * t231 * t3278 + 0.2e1 * t337 * t2311 - 0.6e1 * t293 * t2581 + 0.4e1 * t293 * t2585 + 0.2e1 * t293 * t2588 + 0.4e1 * t764 * t879 + 0.4e1 * t874 * t769;
6853   if(v4rho4 != NULL && (p->info->flags & XC_FLAGS_NEEDS_LAPLACIAN) && (p->info->flags & XC_FLAGS_HAVE_LXC))
6854     v4rho2sigmalapl[17] = -t9655 - 0.4e1 / 0.3e1 * t9683 - t9693 - t262 * t550 * t1175 * t587 / 0.6e1 - t262 * t736 * t3342 * t208 - t262 * t736 * t1175 * t596 / 0.2e1 - 0.3e1 / 0.8e1 * t262 * t286 * (t9935 + t9981);
6855 
6856   t9987 = t7244 * t1209 / 0.6e1;
6857   t9988 = t2206 * t3349;
6858   t9990 = t2206 * t3442;
6859   t10033 = t66 * t3357;
6860   t10049 = 0.33230991249459119928e1 * t710 * t3174 * t918 - 0.35409739445157315668e-1 * t705 * t927 * t2109 + 0.16615495624729559964e1 * t710 * t9470 * t355 - 0.35409739445157315668e-1 * t705 * t8316 * t269 - 0.70819478890314631336e-1 * t705 * t2699 * t696 + 0.16615495624729559964e1 * t710 * t1115 * t2669 - 0.70819478890314631336e-1 * t705 * t10033 * t156 - 0.35409739445157315668e-1 * t705 * t3407 * t456 - 0.12461621718547169973e1 * t2137 * t2138 * t1181 + 0.16615495624729559964e1 * t710 * t2149 * t1181 + 0.33230991249459119928e1 * t710 * t711 * t3357;
6861   t10056 = t355 * t696;
6862   t10078 = t3357 * t492;
6863   t10085 = 0.53114609167735973502e-1 * t2133 * t3407 * t470 - 0.76217237139506171188e1 * t490 * t3421 * t470 - 0.24923243437094339946e1 * t2137 * t711 * t10056 + 0.10622921833547194700e0 * t2133 * t2699 * t3160 + 0.10622921833547194700e0 * t2133 * t927 * t8964 + 0.53114609167735973502e-1 * t2133 * t927 * t6997 + 0.24923243437094339947e1 * t7106 * t2138 * t3389 - 0.15243447427901234238e2 * t490 * t941 * t8964 - 0.76217237139506171188e1 * t490 * t941 * t9020 - 0.15243447427901234238e2 * t490 * t10078 * t723 - 0.76217237139506171188e1 * t490 * t3421 * t2178;
6864   t10087 = t1181 * t1621;
6865   t10106 = t918 * t269;
6866   t10110 = t355 * t470;
6867   t10122 = 0.10488523547622316684e3 * t1618 * t10087 * t2171 - 0.76217237139506171188e1 * t490 * t8275 * t1126 - 0.15243447427901234238e2 * t490 * t2723 * t3160 - 0.15243447427901234238e2 * t490 * t2723 * t2981 - 0.11432585570925925678e2 * t1597 * t493 * t4980 - 0.12461621718547169973e1 * t2137 * t2149 * t3389 - 0.24923243437094339946e1 * t2137 * t711 * t10106 - 0.15243447427901234237e2 * t1597 * t722 * t10110 - 0.13278652291933993376e0 * t7124 * t927 * t9523 - 0.76217237139506171188e1 * t490 * t941 * t6997 + 0.31465570642866950052e3 * t3429 * t9554;
6868   t10124 = t1615 * t1617 * t918;
6869   t10132 = t5903 * t5904 * t355;
6870   t10157 = 0.66381075479549363457e-3 * t9416 - 0.16072380749503493864e-2 * t9419 - 0.41788189948709084046e-2 * t2903 + 0.48217142248510481592e-3 * t9423 + 0.35098768212162780064e-1 * t9427 + 0.54754078410973936900e0 * t2907 - 0.63177782781893004115e-1 * t9431 + 0.21901631364389574760e0 * t2914 + 0.28105219866932654882e-2 * t2918 + 0.18016166581367086463e-3 * t9435 - 0.32429099846460755633e-3 * t9437 - 0.44190727023319615911e0 * t2921;
6871   t10165 = 0.20977047095244633368e3 * t10124 * t3209 + 0.20977047095244633368e3 * t3429 * t9046 + 0.10488523547622316684e3 * t3429 * t9563 - 0.24056046973484009303e4 * t10132 * t9569 - 0.22865171141851851356e2 * t9548 * t942 - 0.22865171141851851356e2 * t3179 * t2724 - 0.11432585570925925678e2 * t3179 * t2734 + 0.20977047095244633367e3 * t9574 * t2728 + 0.11432585570925925678e2 * t9544 * t1202 + 0.16615495624729559964e1 * t167 * t61 * t10157 * t179 + 0.70819478890314631335e-1 * t54 * t162 * t10157;
6872   t10195 = -0.2e1 * t919 * t728 - t356 * t2183 - t2670 * t280 - 0.12e2 * t9628 * t3372 + 0.24e2 * t9638 * t3371 * t463 - 0.12e2 * t3144 * t365 * t727 * t183 - t52 * t160 * (t10049 + t10085 + t10122 + t10165) - 0.12e2 * t3144 * t945 * t279 * t183 - 0.6e1 * t3144 * t3371 * t497 - 0.2e1 * t157 * t3439 + 0.4e1 * t157 * t3378 + 0.2e1 * t457 * t1186 + 0.4e1 * t270 * t2687 + 0.4e1 * t157 * t3375 - t270 * t2738 + 0.2e1 * t52 * t8375 * t279 + 0.4e1 * t356 * t2127 - 0.6e1 * t270 * t2683;
6873   t10207 = t1567 * t1205;
6874   t10217 = t462 * t3438;
6875   t10236 = -t457 * t1206 + t25 * t10157 * t71 - 0.6e1 * t356 * t2123 - 0.2e1 * t697 * t946 - t2110 * t366 + 0.2e1 * t52 * t3382 * t497 - 0.6e1 * t52 * t10207 * t463 + 0.2e1 * t52 * t923 * t2182 + 0.4e1 * t52 * t2686 * t727 + 0.4e1 * t52 * t10217 * t183 + 0.4e1 * t157 * t3383 + 0.4e1 * t919 * t702 + 0.2e1 * t356 * t2130 + 0.2e1 * t270 * t2690 + 0.4e1 * t697 * t924 - 0.2e1 * t3358 * t184 + 0.2e1 * t1182 * t464 - t1182 * t498;
6876   if(v4rho4 != NULL && (p->info->flags & XC_FLAGS_HAVE_LXC))
6877     v4rho2sigmatau[0] = -t9987 - 0.4e1 / 0.3e1 * t9988 - t9990 - t262 * t527 * t1208 * t397 / 0.6e1 - t262 * t678 * t3441 * t128 - t262 * t678 * t1208 * t412 / 0.2e1 - 0.3e1 / 0.8e1 * t262 * t263 * (t10195 + t10236);
6878 
6879   if(v4rho4 != NULL && (p->info->flags & XC_FLAGS_HAVE_LXC))
6880     v4rho2sigmatau[1] = 0.0e0;
6881 
6882   if(v4rho4 != NULL && (p->info->flags & XC_FLAGS_HAVE_LXC))
6883     v4rho2sigmatau[2] = 0.0e0;
6884 
6885   if(v4rho4 != NULL && (p->info->flags & XC_FLAGS_HAVE_LXC))
6886     v4rho2sigmatau[3] = 0.0e0;
6887 
6888   if(v4rho4 != NULL && (p->info->flags & XC_FLAGS_HAVE_LXC))
6889     v4rho2sigmatau[4] = 0.0e0;
6890 
6891   t10242 = t7244 * t1242 / 0.6e1;
6892   t10243 = t2206 * t3447;
6893   if(v4rho4 != NULL && (p->info->flags & XC_FLAGS_HAVE_LXC))
6894     v4rho2sigmatau[5] = -t10242 - 0.4e1 / 0.3e1 * t10243 - t262 * t550 * t1241 * t507 / 0.6e1 - t262 * t736 * t1241 * t516 / 0.2e1;
6895 
6896   t10255 = t2206 * t3451;
6897   if(v4rho4 != NULL && (p->info->flags & XC_FLAGS_HAVE_LXC))
6898     v4rho2sigmatau[6] = -t9987 - 0.2e1 / 0.3e1 * t9988 - t9990 / 0.2e1 - 0.2e1 / 0.3e1 * t10255 - t2210 * t395 * t1208 * t530 / 0.6e1 - t262 * t678 * t3441 * t203 / 0.2e1 - t2220 * t678 * t1208 * t9 / 0.2e1;
6899 
6900   if(v4rho4 != NULL && (p->info->flags & XC_FLAGS_HAVE_LXC))
6901     v4rho2sigmatau[7] = 0.0e0;
6902 
6903   if(v4rho4 != NULL && (p->info->flags & XC_FLAGS_HAVE_LXC))
6904     v4rho2sigmatau[8] = 0.0e0;
6905 
6906   if(v4rho4 != NULL && (p->info->flags & XC_FLAGS_HAVE_LXC))
6907     v4rho2sigmatau[9] = 0.0e0;
6908 
6909   if(v4rho4 != NULL && (p->info->flags & XC_FLAGS_HAVE_LXC))
6910     v4rho2sigmatau[10] = 0.0e0;
6911 
6912   t10270 = t2206 * t3456;
6913   t10280 = t2206 * t3549;
6914   if(v4rho4 != NULL && (p->info->flags & XC_FLAGS_HAVE_LXC))
6915     v4rho2sigmatau[11] = -t10242 - 0.2e1 / 0.3e1 * t10243 - 0.2e1 / 0.3e1 * t10270 - t2210 * t505 * t1241 * t553 / 0.6e1 + t2220 * t736 * t1241 * t9 / 0.2e1 - t10280 / 0.2e1 - t262 * t736 * t3548 * t191 / 0.2e1;
6916 
6917   if(v4rho4 != NULL && (p->info->flags & XC_FLAGS_HAVE_LXC))
6918     v4rho2sigmatau[12] = -t9987 - 0.4e1 / 0.3e1 * t10255 - t262 * t527 * t1208 * t576 / 0.6e1 - t262 * t678 * t1208 * t582 / 0.2e1;
6919 
6920   if(v4rho4 != NULL && (p->info->flags & XC_FLAGS_HAVE_LXC))
6921     v4rho2sigmatau[13] = 0.0e0;
6922 
6923   if(v4rho4 != NULL && (p->info->flags & XC_FLAGS_HAVE_LXC))
6924     v4rho2sigmatau[14] = 0.0e0;
6925 
6926   if(v4rho4 != NULL && (p->info->flags & XC_FLAGS_HAVE_LXC))
6927     v4rho2sigmatau[15] = 0.0e0;
6928 
6929   if(v4rho4 != NULL && (p->info->flags & XC_FLAGS_HAVE_LXC))
6930     v4rho2sigmatau[16] = 0.0e0;
6931 
6932   t10319 = 0.66381075479549363457e-3 * t9736 - 0.16072380749503493864e-2 * t9739 - 0.41788189948709084046e-2 * t3015 + 0.48217142248510481592e-3 * t9743 + 0.35098768212162780064e-1 * t9747 + 0.54754078410973936900e0 * t3019 - 0.63177782781893004115e-1 * t9751 + 0.21901631364389574760e0 * t3026 + 0.28105219866932654882e-2 * t3030 + 0.18016166581367086463e-3 * t9755 - 0.32429099846460755633e-3 * t9757 - 0.44190727023319615911e0 * t3033;
6933   t10366 = t3464 * t661;
6934   t10376 = 0.33230991249459119928e1 * t777 * t3295 * t971 - 0.35409739445157315668e-1 * t772 * t8710 * t292 - 0.70819478890314631336e-1 * t772 * t2851 * t763 - 0.12461621718547169973e1 * t2318 * t2319 * t1214 + 0.16615495624729559964e1 * t777 * t2330 * t1214 + 0.16615495624729559964e1 * t777 * t1157 * t2821 - 0.35409739445157315668e-1 * t772 * t980 * t2290 + 0.16615495624729559964e1 * t777 * t9764 * t374 - 0.15243447427901234238e2 * t659 * t10366 * t790 - 0.76217237139506171188e1 * t659 * t3528 * t2359 + 0.10622921833547194700e0 * t2314 * t980 * t9257;
6935   t10386 = t971 * t292;
6936   t10390 = t374 * t763;
6937   t10400 = t1214 * t1987;
6938   t10413 = 0.53114609167735973502e-1 * t2314 * t980 * t7417 + 0.24923243437094339947e1 * t7523 * t2319 * t3496 - 0.12461621718547169973e1 * t2318 * t2330 * t3496 - 0.24923243437094339946e1 * t2318 * t778 * t10386 - 0.24923243437094339946e1 * t2318 * t778 * t10390 + 0.10622921833547194700e0 * t2314 * t2851 * t3281 - 0.76217237139506171188e1 * t659 * t994 * t9261 + 0.10488523547622316684e3 * t1984 * t10400 * t2352 - 0.76217237139506171188e1 * t659 * t8686 * t1168 - 0.15243447427901234238e2 * t659 * t2875 * t3281 - 0.15243447427901234238e2 * t659 * t2875 * t3093;
6939   t10424 = t374 * t642;
6940   t10446 = -0.76217237139506171188e1 * t659 * t994 * t7417 - 0.15243447427901234238e2 * t659 * t994 * t9257 - 0.11432585570925925678e2 * t1967 * t662 * t5053 - 0.15243447427901234237e2 * t1967 * t789 * t10424 - 0.13278652291933993376e0 * t7507 * t980 * t9852 + 0.70819478890314631335e-1 * t54 * t236 * t10319 + 0.16615495624729559964e1 * t240 * t61 * t10319 * t247 - 0.22865171141851851356e2 * t3300 * t2876 - 0.11432585570925925678e2 * t3300 * t2886 + 0.20977047095244633367e3 * t9898 * t2880 + 0.11432585570925925678e2 * t9902 * t1235;
6941   t10452 = t1983 * t1617 * t971;
6942   t10460 = t6870 * t5904 * t374;
6943   t10472 = t110 * t3464;
6944   t10479 = -0.22865171141851851356e2 * t9906 * t995 + 0.31465570642866950052e3 * t3536 * t9910 + 0.20977047095244633368e3 * t10452 * t3330 + 0.20977047095244633368e3 * t3536 * t9344 + 0.10488523547622316684e3 * t3536 * t9885 - 0.24056046973484009303e4 * t10460 * t9891 - 0.76217237139506171188e1 * t659 * t3528 * t642 + 0.53114609167735973502e-1 * t2314 * t3514 * t642 + 0.33230991249459119928e1 * t777 * t778 * t3464 - 0.70819478890314631336e-1 * t772 * t10472 * t230 - 0.35409739445157315668e-1 * t772 * t3514 * t628;
6945   t10488 = t1937 * t1238;
6946   t10494 = t25 * t10319 * t115 - 0.2e1 * t3465 * t252 - t1215 * t667 - 0.2e1 * t972 * t795 - t2822 * t303 - t375 * t2364 - t2291 * t385 - 0.2e1 * t764 * t999 + 0.4e1 * t104 * t2838 * t794 + 0.2e1 * t104 * t976 * t2363 - t293 * t2890 - 0.2e1 * t231 * t3546 - t629 * t1239 - t104 * t234 * (t10376 + t10413 + t10446 + t10479) - 0.12e2 * t9918 * t3479 + 0.2e1 * t1215 * t636 - 0.6e1 * t104 * t10488 * t635 + 0.4e1 * t231 * t3490;
6947   t10495 = t634 * t3545;
6948   t10541 = 0.4e1 * t104 * t10495 * t251 + 0.2e1 * t104 * t3489 * t666 - 0.12e2 * t3265 * t384 * t794 * t251 - 0.12e2 * t3265 * t998 * t302 * t251 - 0.6e1 * t3265 * t3478 * t666 + 0.4e1 * t972 * t769 - 0.6e1 * t293 * t2835 - 0.6e1 * t375 * t2304 + 0.4e1 * t764 * t977 + 0.2e1 * t293 * t2842 + 0.4e1 * t293 * t2839 + 0.4e1 * t231 * t3485 + 0.4e1 * t231 * t3482 + 0.2e1 * t629 * t1219 + 0.2e1 * t104 * t8632 * t302 + 0.4e1 * t375 * t2308 + 0.2e1 * t375 * t2311 + 0.24e2 * t9939 * t3478 * t635;
6949   if(v4rho4 != NULL && (p->info->flags & XC_FLAGS_HAVE_LXC))
6950     v4rho2sigmatau[17] = -t10242 - 0.4e1 / 0.3e1 * t10270 - t10280 - t262 * t550 * t1241 * t587 / 0.6e1 - t262 * t736 * t3548 * t208 - t262 * t736 * t1241 * t596 / 0.2e1 - 0.3e1 / 0.8e1 * t262 * t286 * (t10494 + t10541);
6951 
6952   t10547 = t7244 * t1286 / 0.6e1;
6953   t10548 = t2206 * t3555;
6954   t10550 = t2206 * t3643;
6955   t10563 = t1263 * t5908;
6956   t10570 = t3570 * t492;
6957   t10577 = t1254 * t1621;
6958   t10587 = t1263 * t62;
6959   t10591 = t156 * t816;
6960   t10595 = t314 * t816;
6961   t10605 = t62 * t2407;
6962   t10612 = t816 * t816;
6963   t10621 = t5814 * t1246 * t8836;
6964   t10624 = t5820 * t1246 * t8836;
6965   t10628 = t1536 * t1246 * t435;
6966   t10632 = t8848 * t42 * t1246 * t1542;
6967   t10636 = t1540 * t3561 * t435;
6968   t10640 = t3566 * t8836;
6969   t10642 = t3566 * t5843;
6970   t10645 = -0.33190537739774681728e-3 * t10621 + 0.80361903747517469321e-3 * t10624 + 0.16072380749503493864e-2 * t3119 - 0.24108571124255240796e-3 * t10628 - 0.17549384106081390032e-1 * t10632 - 0.21059260927297668038e0 * t3123 + 0.31588891390946502057e-1 * t10636 - 0.68442598013717421126e-1 * t1010 - 0.10809699948820251878e-2 * t3127 - 0.90080832906835432317e-4 * t10640 + 0.16214549923230377817e-3 * t10642 + 0.13809602194787379972e0 * t1013;
6971   t10653 = -0.24056046973484009303e4 * t5905 * t10563 * t9029 - 0.11432585570925925678e2 * t1597 * t493 * t5271 - 0.15243447427901234238e2 * t490 * t10570 * t723 - 0.76217237139506171188e1 * t490 * t3624 * t2178 + 0.10488523547622316684e3 * t1618 * t10577 * t2171 - 0.11432585570925925678e2 * t1597 * t1278 * t2178 + 0.20977047095244633367e3 * t5915 * t3632 * t2171 + 0.11432585570925925678e2 * t5940 * t493 * t10587 + 0.21245843667094389400e0 * t2133 * t825 * t10591 - 0.49846486874188679892e1 * t2137 * t711 * t10595 + 0.31465570642866950052e3 * t1618 * t3632 * t9006 - 0.30486894855802468476e2 * t490 * t839 * t10591 - 0.15243447427901234238e2 * t490 * t839 * t10605 + 0.10488523547622316684e3 * t1618 * t3632 * t9024 - 0.70819478890314631336e-1 * t54 * t469 * t10612 + 0.33230991249459119928e1 * t474 * t61 * t10612 * t179 + 0.70819478890314631335e-1 * t54 * t162 * t10645 + 0.16615495624729559964e1 * t167 * t61 * t10645 * t179;
6972   t10656 = t3208 * t10591;
6973   t10693 = t66 * t3570;
6974   t10709 = -0.45730342283703702713e2 * t3807 * t2461 + 0.41954094190489266736e3 * t3207 * t10656 - 0.15243447427901234238e2 * t490 * t10612 * t492 * t62 - 0.15243447427901234237e2 * t1597 * t1278 * t470 + 0.53114609167735973502e-1 * t2133 * t3610 * t470 - 0.13278652291933993376e0 * t7124 * t3594 * t470 + 0.24923243437094339947e1 * t7106 * t2138 * t1263 - 0.12461621718547169973e1 * t2137 * t2149 * t1263 - 0.76217237139506171188e1 * t490 * t3624 * t470 - 0.76217237139506171188e1 * t490 * t1278 * t456 - 0.12461621718547169973e1 * t2137 * t2138 * t1254 + 0.16615495624729559964e1 * t710 * t2149 * t1254 + 0.33230991249459119928e1 * t710 * t711 * t3570 - 0.70819478890314631336e-1 * t705 * t10693 * t156 - 0.35409739445157315668e-1 * t705 * t3610 * t456 - 0.70819478890314631336e-1 * t705 * t825 * t2407 + 0.33230991249459119928e1 * t710 * t1346 * t2407 + 0.53114609167735973502e-1 * t2133 * t3594 * t456;
6975   t10717 = t843 * t843;
6976   t10732 = t5871 * t1259;
6977   t10738 = -t457 * t1283 - t52 * t160 * (t10653 + t10709) - 0.12e2 * t315 * t2421 + 0.2e1 * t1255 * t464 + 0.4e1 * t52 * t462 * t10717 - 0.2e1 * t157 * t3640 + 0.2e1 * t457 * t1260 - t1255 * t498 - 0.2e1 * t3571 * t184 + 0.8e1 * t315 * t2425 + 0.8e1 * t817 * t822 + 0.24e2 * t52 * t10732 * t463 + t25 * t10645 * t71;
6978   t10744 = t1567 * t1282;
6979   t10748 = t462 * t3639;
6980   t10773 = -0.6e1 * t52 * t10744 * t463 + 0.4e1 * t52 * t10748 * t183 + 0.4e1 * t52 * t821 * t2474 - 0.24e2 * t3144 * t7647 * t843 - 0.6e1 * t52 * t3582 * t497 + 0.2e1 * t52 * t3590 * t497 - 0.12e2 * t157 * t3583 + 0.8e1 * t157 * t3586 + 0.4e1 * t157 * t3591 - 0.2e1 * t2408 * t325 + 0.4e1 * t315 * t2428 - 0.2e1 * t315 * t2475 - 0.4e1 * t817 * t844;
6981   if(v4rho4 != NULL && (p->info->flags & XC_FLAGS_NEEDS_LAPLACIAN) && (p->info->flags & XC_FLAGS_HAVE_LXC))
6982     v4rho2lapl2[0] = -t10547 - 0.4e1 / 0.3e1 * t10548 - t10550 - t262 * t527 * t1285 * t397 / 0.6e1 - t262 * t678 * t3642 * t128 - t262 * t678 * t1285 * t412 / 0.2e1 - 0.3e1 / 0.8e1 * t262 * t263 * (t10738 + t10773);
6983 
6984   if(v4rho4 != NULL && (p->info->flags & XC_FLAGS_NEEDS_LAPLACIAN) && (p->info->flags & XC_FLAGS_HAVE_LXC))
6985     v4rho2lapl2[1] = 0.0e0;
6986 
6987   t10779 = t7244 * t1330 / 0.6e1;
6988   t10780 = t2206 * t3648;
6989   if(v4rho4 != NULL && (p->info->flags & XC_FLAGS_NEEDS_LAPLACIAN) && (p->info->flags & XC_FLAGS_HAVE_LXC))
6990     v4rho2lapl2[2] = -t10779 - 0.4e1 / 0.3e1 * t10780 - t262 * t550 * t1329 * t507 / 0.6e1 - t262 * t736 * t1329 * t516 / 0.2e1;
6991 
6992   t10792 = t2206 * t3652;
6993   if(v4rho4 != NULL && (p->info->flags & XC_FLAGS_NEEDS_LAPLACIAN) && (p->info->flags & XC_FLAGS_HAVE_LXC))
6994     v4rho2lapl2[3] = -t10547 - 0.2e1 / 0.3e1 * t10548 - t10550 / 0.2e1 - 0.2e1 / 0.3e1 * t10792 - t2210 * t395 * t1285 * t530 / 0.6e1 - t262 * t678 * t3642 * t203 / 0.2e1 - t2220 * t678 * t1285 * t9 / 0.2e1;
6995 
6996   if(v4rho4 != NULL && (p->info->flags & XC_FLAGS_NEEDS_LAPLACIAN) && (p->info->flags & XC_FLAGS_HAVE_LXC))
6997     v4rho2lapl2[4] = 0.0e0;
6998 
6999   t10807 = t2206 * t3657;
7000   t10817 = t2206 * t3745;
7001   if(v4rho4 != NULL && (p->info->flags & XC_FLAGS_NEEDS_LAPLACIAN) && (p->info->flags & XC_FLAGS_HAVE_LXC))
7002     v4rho2lapl2[5] = -t10779 - 0.2e1 / 0.3e1 * t10780 - 0.2e1 / 0.3e1 * t10807 - t2210 * t505 * t1329 * t553 / 0.6e1 + t2220 * t736 * t1329 * t9 / 0.2e1 - t10817 / 0.2e1 - t262 * t736 * t3744 * t191 / 0.2e1;
7003 
7004   if(v4rho4 != NULL && (p->info->flags & XC_FLAGS_NEEDS_LAPLACIAN) && (p->info->flags & XC_FLAGS_HAVE_LXC))
7005     v4rho2lapl2[6] = -t10547 - 0.4e1 / 0.3e1 * t10792 - t262 * t527 * t1285 * t576 / 0.6e1 - t262 * t678 * t1285 * t582 / 0.2e1;
7006 
7007   if(v4rho4 != NULL && (p->info->flags & XC_FLAGS_NEEDS_LAPLACIAN) && (p->info->flags & XC_FLAGS_HAVE_LXC))
7008     v4rho2lapl2[7] = 0.0e0;
7009 
7010   t10847 = t1307 * t106;
7011   t10878 = t873 * t873;
7012   t10901 = t110 * t3672;
7013   t10905 = 0.11432585570925925678e2 * t6904 * t662 * t10847 + 0.31465570642866950052e3 * t1984 * t3734 * t9253 + 0.53114609167735973502e-1 * t2314 * t3712 * t642 - 0.15243447427901234237e2 * t1967 * t1322 * t642 - 0.13278652291933993376e0 * t7507 * t3696 * t642 - 0.70819478890314631336e-1 * t772 * t882 * t2567 + 0.53114609167735973502e-1 * t2314 * t3696 * t628 + 0.24923243437094339947e1 * t7523 * t2319 * t1307 - 0.12461621718547169973e1 * t2318 * t2330 * t1307 - 0.76217237139506171188e1 * t659 * t3726 * t642 - 0.15243447427901234238e2 * t659 * t10878 * t661 * t106 - 0.35409739445157315668e-1 * t772 * t3712 * t628 - 0.12461621718547169973e1 * t2318 * t2319 * t1298 + 0.16615495624729559964e1 * t777 * t2330 * t1298 + 0.33230991249459119928e1 * t777 * t778 * t3672 + 0.33230991249459119928e1 * t777 * t1381 * t2567 - 0.76217237139506171188e1 * t659 * t1322 * t628 - 0.70819478890314631336e-1 * t772 * t10901 * t230;
7014   t10906 = t230 * t873;
7015   t10910 = t106 * t2567;
7016   t10929 = t336 * t873;
7017   t10933 = t1307 * t6874;
7018   t10937 = t3672 * t661;
7019   t10944 = t1298 * t1987;
7020   t10948 = t3329 * t10906;
7021   t10961 = t6763 * t1290 * t9197;
7022   t10964 = t6769 * t1290 * t9197;
7023   t10968 = t1908 * t1290 * t611;
7024   t10972 = t9209 * t42 * t1290 * t1542;
7025   t10976 = t1912 * t3663 * t611;
7026   t10980 = t3668 * t9197;
7027   t10982 = t3668 * t6790;
7028   t10985 = -0.33190537739774681728e-3 * t10961 + 0.80361903747517469321e-3 * t10964 + 0.16072380749503493864e-2 * t3240 - 0.24108571124255240796e-3 * t10968 - 0.17549384106081390032e-1 * t10972 - 0.21059260927297668038e0 * t3244 + 0.31588891390946502057e-1 * t10976 - 0.68442598013717421126e-1 * t1055 - 0.10809699948820251878e-2 * t3248 - 0.90080832906835432317e-4 * t10980 + 0.16214549923230377817e-3 * t10982 + 0.13809602194787379972e0 * t1058;
7029   t10993 = -0.30486894855802468476e2 * t659 * t896 * t10906 - 0.15243447427901234238e2 * t659 * t896 * t10910 + 0.10488523547622316684e3 * t1984 * t3734 * t9265 + 0.20977047095244633367e3 * t6892 * t3734 * t2352 - 0.11432585570925925678e2 * t1967 * t662 * t5347 - 0.11432585570925925678e2 * t1967 * t1322 * t2359 + 0.21245843667094389400e0 * t2314 * t882 * t10906 - 0.49846486874188679892e1 * t2318 * t778 * t10929 - 0.24056046973484009303e4 * t6871 * t10933 * t9270 - 0.15243447427901234238e2 * t659 * t10937 * t790 - 0.76217237139506171188e1 * t659 * t3726 * t2359 + 0.10488523547622316684e3 * t1984 * t10944 * t2352 + 0.41954094190489266736e3 * t3328 * t10948 - 0.45730342283703702713e2 * t3917 * t2621 + 0.33230991249459119928e1 * t646 * t61 * t10878 * t247 - 0.70819478890314631336e-1 * t54 * t641 * t10878 + 0.16615495624729559964e1 * t240 * t61 * t10985 * t247 + 0.70819478890314631335e-1 * t54 * t236 * t10985;
7030   t11019 = t6818 * t1303;
7031   t11023 = -0.24e2 * t3265 * t8171 * t900 - t104 * t234 * (t10905 + t10993) + 0.2e1 * t1299 * t636 + 0.8e1 * t874 * t879 + 0.4e1 * t337 * t2588 + 0.8e1 * t337 * t2585 - 0.12e2 * t337 * t2581 - 0.6e1 * t104 * t3684 * t666 + 0.8e1 * t231 * t3688 - 0.12e2 * t231 * t3685 + 0.4e1 * t104 * t878 * t2634 + 0.4e1 * t231 * t3693 + 0.24e2 * t104 * t11019 * t635;
7032   t11024 = t900 * t900;
7033   t11037 = t634 * t3741;
7034   t11051 = t1937 * t1326;
7035   t11055 = 0.4e1 * t104 * t634 * t11024 + 0.4e1 * t104 * t11037 * t251 - 0.6e1 * t104 * t11051 * t635 + 0.2e1 * t104 * t3692 * t666 + t25 * t10985 * t115 - t1299 * t667 + 0.2e1 * t629 * t1304 - t629 * t1327 - 0.2e1 * t231 * t3742 - 0.2e1 * t3673 * t252 - 0.2e1 * t2568 * t347 - 0.2e1 * t337 * t2635 - 0.4e1 * t874 * t901;
7036   if(v4rho4 != NULL && (p->info->flags & XC_FLAGS_NEEDS_LAPLACIAN) && (p->info->flags & XC_FLAGS_HAVE_LXC))
7037     v4rho2lapl2[8] = -t10779 - 0.4e1 / 0.3e1 * t10807 - t10817 - t262 * t550 * t1329 * t587 / 0.6e1 - t262 * t736 * t3744 * t208 - t262 * t736 * t1329 * t596 / 0.2e1 - 0.3e1 / 0.8e1 * t262 * t286 * (t11023 + t11055);
7038 
7039   t11061 = t7244 * t1365 / 0.6e1;
7040   t11062 = t2206 * t3751;
7041   t11064 = t2206 * t3847;
7042   t11107 = 0.13276215095909872691e-2 * t10621 - 0.32144761499006987728e-2 * t10624 - 0.64289522998013975454e-2 * t3119 + 0.96434284497020963181e-3 * t10628 + 0.70197536424325560128e-1 * t10632 + 0.84237043709190672152e0 * t3123 - 0.12635556556378600823e0 * t10636 + 0.27377039205486968449e0 * t1010 + 0.43238799795281007510e-2 * t3127 + 0.36032333162734172925e-3 * t10640 - 0.64858199692921511265e-3 * t10642 - 0.55238408779149519889e0 * t1013;
7043   t11124 = t355 * t816;
7044   t11143 = 0.16615495624729559964e1 * t167 * t61 * t11107 * t179 + 0.70819478890314631335e-1 * t54 * t162 * t11107 - 0.15243447427901234237e2 * t1597 * t839 * t10110 - 0.13278652291933993376e0 * t7124 * t927 * t9497 - 0.11432585570925925678e2 * t1597 * t493 * t5414 - 0.24923243437094339946e1 * t2137 * t711 * t11124 + 0.10622921833547194700e0 * t2133 * t2699 * t3788 + 0.10622921833547194700e0 * t2133 * t927 * t10591 + 0.53114609167735973502e-1 * t2133 * t927 * t7766 + 0.24923243437094339947e1 * t7106 * t2138 * t3792 - 0.12461621718547169973e1 * t2137 * t2149 * t3792;
7045   t11144 = t918 * t314;
7046   t11157 = t3759 * t492;
7047   t11164 = t1335 * t1621;
7048   t11179 = -0.24923243437094339946e1 * t2137 * t711 * t11144 - 0.76217237139506171188e1 * t490 * t941 * t7766 - 0.15243447427901234238e2 * t490 * t941 * t10591 - 0.76217237139506171188e1 * t490 * t941 * t10605 - 0.15243447427901234238e2 * t490 * t11157 * t723 - 0.76217237139506171188e1 * t490 * t3827 * t2178 + 0.10488523547622316684e3 * t1618 * t11164 * t2171 - 0.76217237139506171188e1 * t490 * t8275 * t1357 - 0.15243447427901234238e2 * t490 * t2723 * t3788 - 0.15243447427901234238e2 * t490 * t2723 * t3628 + 0.20977047095244633368e3 * t10124 * t3834;
7049   t11190 = t1596 * t489 * t816;
7050   t11197 = t5914 * t3206;
7051   t11212 = 0.20977047095244633368e3 * t3429 * t10656 + 0.10488523547622316684e3 * t3429 * t3208 * t7766 - 0.24056046973484009303e4 * t10132 * t9568 * t9497 - 0.22865171141851851356e2 * t11190 * t942 - 0.22865171141851851356e2 * t3807 * t2724 - 0.11432585570925925678e2 * t3807 * t2734 + 0.20977047095244633367e3 * t11197 * t2728 + 0.11432585570925925678e2 * t9544 * t1358 + 0.31465570642866950052e3 * t3429 * t9553 * t9497 - 0.35409739445157315668e-1 * t705 * t927 * t2407 + 0.16615495624729559964e1 * t710 * t2407 * t179 * t355;
7052   t11234 = t66 * t3759;
7053   t11247 = -0.35409739445157315668e-1 * t705 * t8316 * t314 - 0.70819478890314631336e-1 * t705 * t2699 * t816 - 0.35409739445157315668e-1 * t705 * t3813 * t456 - 0.12461621718547169973e1 * t2137 * t2138 * t1335 + 0.16615495624729559964e1 * t710 * t2149 * t1335 + 0.33230991249459119928e1 * t710 * t711 * t3759 + 0.16615495624729559964e1 * t710 * t1346 * t2669 - 0.70819478890314631336e-1 * t705 * t11234 * t156 + 0.33230991249459119928e1 * t710 * t3802 * t918 - 0.76217237139506171188e1 * t490 * t3827 * t470 + 0.53114609167735973502e-1 * t2133 * t3813 * t470;
7054   t11267 = -0.6e1 * t356 * t2421 + 0.2e1 * t356 * t2428 + 0.4e1 * t356 * t2425 + 0.4e1 * t919 * t822 - 0.12e2 * t9628 * t3774 - 0.6e1 * t3144 * t3773 * t497 - 0.2e1 * t919 * t844 - t1336 * t498 - 0.2e1 * t817 * t946 - t315 * t2738 - t52 * t160 * (t11143 + t11179 + t11212 + t11247) + 0.4e1 * t817 * t924 - 0.6e1 * t315 * t2683 + 0.2e1 * t315 * t2690 + 0.4e1 * t315 * t2687 + 0.24e2 * t9638 * t3773 * t463 - t2670 * t325 + 0.2e1 * t52 * t3784 * t497;
7055   t11284 = t462 * t3843;
7056   t11289 = t1567 * t1361;
7057   t11298 = t365 * t843;
7058   t11302 = t945 * t324;
7059   t11312 = -t2408 * t366 - t356 * t2475 + 0.4e1 * t157 * t3777 + 0.2e1 * t457 * t1340 + 0.4e1 * t52 * t2686 * t843 + 0.2e1 * t52 * t923 * t2474 + 0.4e1 * t157 * t3780 + 0.4e1 * t157 * t3785 + 0.4e1 * t52 * t11284 * t183 - t457 * t1362 - 0.6e1 * t52 * t11289 * t463 + 0.2e1 * t52 * t8375 * t324 - 0.2e1 * t157 * t3844 - 0.12e2 * t3144 * t11298 * t183 - 0.12e2 * t3144 * t11302 * t183 + 0.2e1 * t1336 * t464 + t25 * t11107 * t71 - 0.2e1 * t3760 * t184;
7060   if(v4rho4 != NULL && (p->info->flags & XC_FLAGS_NEEDS_LAPLACIAN) && (p->info->flags & XC_FLAGS_HAVE_LXC))
7061     v4rho2lapltau[0] = -t11061 - 0.4e1 / 0.3e1 * t11062 - t11064 - t262 * t527 * t1364 * t397 / 0.6e1 - t262 * t678 * t3846 * t128 - t262 * t678 * t1364 * t412 / 0.2e1 - 0.3e1 / 0.8e1 * t262 * t263 * (t11267 + t11312);
7062 
7063   if(v4rho4 != NULL && (p->info->flags & XC_FLAGS_NEEDS_LAPLACIAN) && (p->info->flags & XC_FLAGS_HAVE_LXC))
7064     v4rho2lapltau[1] = 0.0e0;
7065 
7066   if(v4rho4 != NULL && (p->info->flags & XC_FLAGS_NEEDS_LAPLACIAN) && (p->info->flags & XC_FLAGS_HAVE_LXC))
7067     v4rho2lapltau[2] = 0.0e0;
7068 
7069   t11318 = t7244 * t1400 / 0.6e1;
7070   t11319 = t2206 * t3852;
7071   if(v4rho4 != NULL && (p->info->flags & XC_FLAGS_NEEDS_LAPLACIAN) && (p->info->flags & XC_FLAGS_HAVE_LXC))
7072     v4rho2lapltau[3] = -t11318 - 0.4e1 / 0.3e1 * t11319 - t262 * t550 * t1399 * t507 / 0.6e1 - t262 * t736 * t1399 * t516 / 0.2e1;
7073 
7074   t11331 = t2206 * t3856;
7075   if(v4rho4 != NULL && (p->info->flags & XC_FLAGS_NEEDS_LAPLACIAN) && (p->info->flags & XC_FLAGS_HAVE_LXC))
7076     v4rho2lapltau[4] = -t11061 - 0.2e1 / 0.3e1 * t11062 - t11064 / 0.2e1 - 0.2e1 / 0.3e1 * t11331 - t2210 * t395 * t1364 * t530 / 0.6e1 - t262 * t678 * t3846 * t203 / 0.2e1 - t2220 * t678 * t1364 * t9 / 0.2e1;
7077 
7078   if(v4rho4 != NULL && (p->info->flags & XC_FLAGS_NEEDS_LAPLACIAN) && (p->info->flags & XC_FLAGS_HAVE_LXC))
7079     v4rho2lapltau[5] = 0.0e0;
7080 
7081   if(v4rho4 != NULL && (p->info->flags & XC_FLAGS_NEEDS_LAPLACIAN) && (p->info->flags & XC_FLAGS_HAVE_LXC))
7082     v4rho2lapltau[6] = 0.0e0;
7083 
7084   t11346 = t2206 * t3861;
7085   t11356 = t2206 * t3957;
7086   if(v4rho4 != NULL && (p->info->flags & XC_FLAGS_NEEDS_LAPLACIAN) && (p->info->flags & XC_FLAGS_HAVE_LXC))
7087     v4rho2lapltau[7] = -t11318 - 0.2e1 / 0.3e1 * t11319 - 0.2e1 / 0.3e1 * t11346 - t2210 * t505 * t1399 * t553 / 0.6e1 + t2220 * t736 * t1399 * t9 / 0.2e1 - t11356 / 0.2e1 - t262 * t736 * t3956 * t191 / 0.2e1;
7088 
7089   if(v4rho4 != NULL && (p->info->flags & XC_FLAGS_NEEDS_LAPLACIAN) && (p->info->flags & XC_FLAGS_HAVE_LXC))
7090     v4rho2lapltau[8] = -t11061 - 0.4e1 / 0.3e1 * t11331 - t262 * t527 * t1364 * t576 / 0.6e1 - t262 * t678 * t1364 * t582 / 0.2e1;
7091 
7092   if(v4rho4 != NULL && (p->info->flags & XC_FLAGS_NEEDS_LAPLACIAN) && (p->info->flags & XC_FLAGS_HAVE_LXC))
7093     v4rho2lapltau[9] = 0.0e0;
7094 
7095   if(v4rho4 != NULL && (p->info->flags & XC_FLAGS_NEEDS_LAPLACIAN) && (p->info->flags & XC_FLAGS_HAVE_LXC))
7096     v4rho2lapltau[10] = 0.0e0;
7097 
7098   t11384 = t998 * t346;
7099   t11398 = t1966 * t489 * t873;
7100   t11405 = t6891 * t3327;
7101   t11423 = 0.31465570642866950052e3 * t3536 * t9909 * t9848 - 0.22865171141851851356e2 * t11398 * t995 - 0.22865171141851851356e2 * t3917 * t2876 - 0.11432585570925925678e2 * t3917 * t2886 + 0.20977047095244633367e3 * t11405 * t2880 + 0.11432585570925925678e2 * t9902 * t1393 - 0.24056046973484009303e4 * t10460 * t9890 * t9848 + 0.20977047095244633368e3 * t10452 * t3944 + 0.20977047095244633368e3 * t3536 * t10948 + 0.10488523547622316684e3 * t3536 * t3329 * t8096 - 0.35409739445157315668e-1 * t772 * t980 * t2567;
7102   t11437 = t110 * t3869;
7103   t11459 = 0.16615495624729559964e1 * t777 * t2567 * t247 * t374 + 0.33230991249459119928e1 * t777 * t3912 * t971 - 0.35409739445157315668e-1 * t772 * t8710 * t336 - 0.70819478890314631336e-1 * t772 * t2851 * t873 - 0.70819478890314631336e-1 * t772 * t11437 * t230 - 0.35409739445157315668e-1 * t772 * t3923 * t628 - 0.12461621718547169973e1 * t2318 * t2319 * t1370 + 0.16615495624729559964e1 * t777 * t2330 * t1370 + 0.33230991249459119928e1 * t777 * t778 * t3869 + 0.16615495624729559964e1 * t777 * t1381 * t2821 - 0.15243447427901234237e2 * t1967 * t896 * t10424;
7104   t11467 = t1370 * t1987;
7105   t11495 = -0.13278652291933993376e0 * t7507 * t980 * t9848 - 0.76217237139506171188e1 * t659 * t3937 * t2359 + 0.10488523547622316684e3 * t1984 * t11467 * t2352 - 0.76217237139506171188e1 * t659 * t8686 * t1392 - 0.15243447427901234238e2 * t659 * t2875 * t3898 - 0.15243447427901234238e2 * t659 * t2875 * t3730 - 0.11432585570925925678e2 * t1967 * t662 * t5488 + 0.10622921833547194700e0 * t2314 * t980 * t10906 + 0.53114609167735973502e-1 * t2314 * t980 * t8096 + 0.24923243437094339947e1 * t7523 * t2319 * t3902 - 0.12461621718547169973e1 * t2318 * t2330 * t3902;
7106   t11496 = t971 * t336;
7107   t11500 = t374 * t873;
7108   t11516 = t3869 * t661;
7109   t11538 = 0.13276215095909872691e-2 * t10961 - 0.32144761499006987728e-2 * t10964 - 0.64289522998013975454e-2 * t3240 + 0.96434284497020963181e-3 * t10968 + 0.70197536424325560128e-1 * t10972 + 0.84237043709190672152e0 * t3244 - 0.12635556556378600823e0 * t10976 + 0.27377039205486968449e0 * t1055 + 0.43238799795281007510e-2 * t3248 + 0.36032333162734172925e-3 * t10980 - 0.64858199692921511265e-3 * t10982 - 0.55238408779149519889e0 * t1058;
7110   t11546 = -0.24923243437094339946e1 * t2318 * t778 * t11496 - 0.24923243437094339946e1 * t2318 * t778 * t11500 + 0.10622921833547194700e0 * t2314 * t2851 * t3898 - 0.76217237139506171188e1 * t659 * t994 * t8096 - 0.15243447427901234238e2 * t659 * t994 * t10906 - 0.76217237139506171188e1 * t659 * t994 * t10910 - 0.15243447427901234238e2 * t659 * t11516 * t790 - 0.76217237139506171188e1 * t659 * t3937 * t642 + 0.53114609167735973502e-1 * t2314 * t3923 * t642 + 0.70819478890314631335e-1 * t54 * t236 * t11538 + 0.16615495624729559964e1 * t240 * t61 * t11538 * t247;
7111   t11560 = t384 * t900;
7112   t11573 = -t375 * t2635 - 0.12e2 * t3265 * t11384 * t251 + 0.2e1 * t1371 * t636 - 0.2e1 * t874 * t999 - t337 * t2890 - t2568 * t385 - t104 * t234 * (t11423 + t11459 + t11495 + t11546) - 0.2e1 * t231 * t3954 - t629 * t1397 - t1371 * t667 - 0.2e1 * t3870 * t252 - t2822 * t347 - 0.2e1 * t972 * t901 - 0.12e2 * t3265 * t11560 * t251 + 0.2e1 * t629 * t1375 + 0.4e1 * t104 * t2838 * t900 + 0.2e1 * t337 * t2842 + 0.4e1 * t231 * t3895;
7113   t11592 = t1937 * t1396;
7114   t11605 = t634 * t3953;
7115   t11619 = 0.2e1 * t104 * t8632 * t346 - 0.6e1 * t375 * t2581 + t25 * t11538 * t115 + 0.4e1 * t972 * t879 - 0.6e1 * t337 * t2835 + 0.4e1 * t337 * t2839 + 0.4e1 * t375 * t2585 + 0.24e2 * t9939 * t3883 * t635 - 0.6e1 * t104 * t11592 * t635 - 0.12e2 * t9918 * t3884 + 0.4e1 * t231 * t3890 + 0.4e1 * t231 * t3887 - 0.6e1 * t3265 * t3883 * t666 + 0.4e1 * t104 * t11605 * t251 + 0.2e1 * t104 * t3894 * t666 + 0.2e1 * t375 * t2588 + 0.4e1 * t874 * t977 + 0.2e1 * t104 * t976 * t2634;
7116   if(v4rho4 != NULL && (p->info->flags & XC_FLAGS_NEEDS_LAPLACIAN) && (p->info->flags & XC_FLAGS_HAVE_LXC))
7117     v4rho2lapltau[11] = -t11318 - 0.4e1 / 0.3e1 * t11346 - t11356 - t262 * t550 * t1399 * t587 / 0.6e1 - t262 * t736 * t3956 * t208 - t262 * t736 * t1399 * t596 / 0.2e1 - 0.3e1 / 0.8e1 * t262 * t286 * (t11573 + t11619);
7118 
7119   t11625 = t7244 * t1437 / 0.6e1;
7120   t11626 = t2206 * t3963;
7121   t11628 = t2206 * t4045;
7122   t11640 = t945 * t945;
7123   t11649 = t1567 * t1433;
7124   t11653 = t918 * t156;
7125   t11658 = t1596 * t489 * t355;
7126   t11661 = t918 * t918;
7127   t11681 = -0.53104860383639490765e-2 * t10621 + 0.12857904599602795091e-1 * t10624 + 0.25715809199205590182e-1 * t3119 - 0.38573713798808385273e-2 * t10628 - 0.28079014569730224051e0 * t10632 - 0.33694817483676268861e1 * t3123 + 0.50542226225514403291e0 * t10636 - 0.10950815682194787380e1 * t1010 - 0.17295519918112403004e-1 * t3127 - 0.14412933265093669170e-2 * t10640 + 0.25943279877168604506e-2 * t10642 + 0.22095363511659807955e1 * t1013;
7128   t11689 = t1405 * t1621;
7129   t11699 = t1405 * t62;
7130   t11703 = t355 * t918;
7131   t11707 = t1414 * t62;
7132   t11727 = t1414 * t5908;
7133   t11731 = 0.41954094190489266736e3 * t3429 * t3208 * t11653 - 0.45730342283703702713e2 * t11658 * t2724 + 0.33230991249459119928e1 * t474 * t61 * t11661 * t179 - 0.70819478890314631336e-1 * t54 * t469 * t11661 + 0.16615495624729559964e1 * t167 * t61 * t11681 * t179 - 0.76217237139506171188e1 * t490 * t4026 * t2178 + 0.10488523547622316684e3 * t1618 * t11689 * t2171 - 0.11432585570925925678e2 * t1597 * t1429 * t2178 + 0.20977047095244633367e3 * t5915 * t4034 * t2171 - 0.11432585570925925678e2 * t1597 * t493 * t11699 - 0.49846486874188679892e1 * t2137 * t711 * t11703 + 0.11432585570925925678e2 * t5940 * t493 * t11707 + 0.21245843667094389400e0 * t2133 * t927 * t11653 + 0.31465570642866950052e3 * t1618 * t4034 * t9006 - 0.30486894855802468476e2 * t490 * t941 * t11653 - 0.15243447427901234238e2 * t490 * t941 * t62 * t2669 + 0.10488523547622316684e3 * t1618 * t4034 * t9024 - 0.24056046973484009303e4 * t5905 * t11727 * t9029;
7134   t11732 = t3971 * t492;
7135   t11776 = t66 * t3971;
7136   t11789 = -0.15243447427901234238e2 * t490 * t11732 * t723 + 0.70819478890314631335e-1 * t54 * t162 * t11681 - 0.13278652291933993376e0 * t7124 * t3995 * t470 - 0.76217237139506171188e1 * t490 * t4026 * t470 - 0.15243447427901234238e2 * t490 * t11661 * t492 * t62 - 0.15243447427901234237e2 * t1597 * t1429 * t470 + 0.53114609167735973502e-1 * t2133 * t4012 * t470 + 0.24923243437094339947e1 * t7106 * t2138 * t1414 - 0.76217237139506171188e1 * t490 * t1429 * t456 + 0.33230991249459119928e1 * t710 * t711 * t3971 + 0.33230991249459119928e1 * t710 * t4005 * t2669 - 0.12461621718547169973e1 * t2137 * t2149 * t1414 - 0.70819478890314631336e-1 * t705 * t927 * t2669 + 0.53114609167735973502e-1 * t2133 * t3995 * t456 - 0.70819478890314631336e-1 * t705 * t11776 * t156 - 0.35409739445157315668e-1 * t705 * t4012 * t456 - 0.12461621718547169973e1 * t2137 * t2138 * t1405 + 0.16615495624729559964e1 * t710 * t2149 * t1405;
7137   t11802 = t462 * t4041;
7138   t11808 = t5871 * t1410;
7139   t11812 = 0.4e1 * t52 * t462 * t11640 - 0.2e1 * t157 * t4042 - t457 * t1434 - 0.2e1 * t3972 * t184 - 0.6e1 * t52 * t11649 * t463 - t52 * t160 * (t11731 + t11789) - 0.12e2 * t356 * t2683 + 0.2e1 * t52 * t3991 * t497 - 0.4e1 * t919 * t946 + 0.4e1 * t157 * t3992 + 0.4e1 * t52 * t11802 * t183 - 0.2e1 * t356 * t2738 + 0.24e2 * t52 * t11808 * t463;
7140   t11841 = t25 * t11681 * t71 + 0.4e1 * t52 * t923 * t2737 - 0.24e2 * t3144 * t8359 * t945 - 0.6e1 * t52 * t3983 * t497 + 0.2e1 * t1406 * t464 - t1406 * t498 + 0.2e1 * t457 * t1411 - 0.12e2 * t157 * t3984 + 0.8e1 * t157 * t3987 - 0.2e1 * t2670 * t366 + 0.8e1 * t356 * t2687 + 0.4e1 * t356 * t2690 + 0.8e1 * t919 * t924;
7141   if(v4rho4 != NULL && (p->info->flags & XC_FLAGS_HAVE_LXC))
7142     v4rho2tau2[0] = -t11625 - 0.4e1 / 0.3e1 * t11626 - t11628 - t262 * t527 * t1436 * t397 / 0.6e1 - t262 * t678 * t4044 * t128 - t262 * t678 * t1436 * t412 / 0.2e1 - 0.3e1 / 0.8e1 * t262 * t263 * (t11812 + t11841);
7143 
7144   if(v4rho4 != NULL && (p->info->flags & XC_FLAGS_HAVE_LXC))
7145     v4rho2tau2[1] = 0.0e0;
7146 
7147   t11847 = t7244 * t1474 / 0.6e1;
7148   t11848 = t2206 * t4050;
7149   if(v4rho4 != NULL && (p->info->flags & XC_FLAGS_HAVE_LXC))
7150     v4rho2tau2[2] = -t11847 - 0.4e1 / 0.3e1 * t11848 - t262 * t550 * t1473 * t507 / 0.6e1 - t262 * t736 * t1473 * t516 / 0.2e1;
7151 
7152   t11860 = t2206 * t4054;
7153   if(v4rho4 != NULL && (p->info->flags & XC_FLAGS_HAVE_LXC))
7154     v4rho2tau2[3] = -t11625 - 0.2e1 / 0.3e1 * t11626 - t11628 / 0.2e1 - 0.2e1 / 0.3e1 * t11860 - t2210 * t395 * t1436 * t530 / 0.6e1 - t262 * t678 * t4044 * t203 / 0.2e1 - t2220 * t678 * t1436 * t9 / 0.2e1;
7155 
7156   if(v4rho4 != NULL && (p->info->flags & XC_FLAGS_HAVE_LXC))
7157     v4rho2tau2[4] = 0.0e0;
7158 
7159   t11875 = t2206 * t4059;
7160   t11885 = t2206 * t4141;
7161   if(v4rho4 != NULL && (p->info->flags & XC_FLAGS_HAVE_LXC))
7162     v4rho2tau2[5] = -t11847 - 0.2e1 / 0.3e1 * t11848 - 0.2e1 / 0.3e1 * t11875 - t2210 * t505 * t1473 * t553 / 0.6e1 + t2220 * t736 * t1473 * t9 / 0.2e1 - t11885 / 0.2e1 - t262 * t736 * t4140 * t191 / 0.2e1;
7163 
7164   if(v4rho4 != NULL && (p->info->flags & XC_FLAGS_HAVE_LXC))
7165     v4rho2tau2[6] = -t11625 - 0.4e1 / 0.3e1 * t11860 - t262 * t527 * t1436 * t576 / 0.6e1 - t262 * t678 * t1436 * t582 / 0.2e1;
7166 
7167   if(v4rho4 != NULL && (p->info->flags & XC_FLAGS_HAVE_LXC))
7168     v4rho2tau2[7] = 0.0e0;
7169 
7170   t11951 = t110 * t4067;
7171   t11958 = t971 * t971;
7172   t11969 = -0.13278652291933993376e0 * t7507 * t4091 * t642 - 0.76217237139506171188e1 * t659 * t1466 * t628 + 0.16615495624729559964e1 * t777 * t2330 * t1442 + 0.33230991249459119928e1 * t777 * t778 * t4067 + 0.33230991249459119928e1 * t777 * t4101 * t2821 + 0.53114609167735973502e-1 * t2314 * t4091 * t628 + 0.24923243437094339947e1 * t7523 * t2319 * t1451 - 0.12461621718547169973e1 * t2318 * t2330 * t1451 - 0.15243447427901234237e2 * t1967 * t1466 * t642 + 0.53114609167735973502e-1 * t2314 * t4108 * t642 - 0.35409739445157315668e-1 * t772 * t4108 * t628 - 0.12461621718547169973e1 * t2318 * t2319 * t1442 - 0.70819478890314631336e-1 * t772 * t980 * t2821 - 0.70819478890314631336e-1 * t772 * t11951 * t230 - 0.76217237139506171188e1 * t659 * t4122 * t642 - 0.15243447427901234238e2 * t659 * t11958 * t661 * t106 + 0.31465570642866950052e3 * t1984 * t4130 * t9253 + 0.10488523547622316684e3 * t1984 * t4130 * t9265;
7173   t11970 = t1451 * t6874;
7174   t11974 = t4067 * t661;
7175   t11981 = t1442 * t1987;
7176   t11985 = t230 * t971;
7177   t11999 = t1442 * t106;
7178   t12006 = t374 * t971;
7179   t12010 = t1451 * t106;
7180   t12033 = -0.53104860383639490765e-2 * t10961 + 0.12857904599602795091e-1 * t10964 + 0.25715809199205590182e-1 * t3240 - 0.38573713798808385273e-2 * t10968 - 0.28079014569730224051e0 * t10972 - 0.33694817483676268861e1 * t3244 + 0.50542226225514403291e0 * t10976 - 0.10950815682194787380e1 * t1055 - 0.17295519918112403004e-1 * t3248 - 0.14412933265093669170e-2 * t10980 + 0.25943279877168604506e-2 * t10982 + 0.22095363511659807955e1 * t1058;
7181   t12045 = t1966 * t489 * t374;
7182   t12048 = -0.24056046973484009303e4 * t6871 * t11970 * t9270 - 0.15243447427901234238e2 * t659 * t11974 * t790 - 0.76217237139506171188e1 * t659 * t4122 * t2359 + 0.10488523547622316684e3 * t1984 * t11981 * t2352 - 0.30486894855802468476e2 * t659 * t994 * t11985 - 0.15243447427901234238e2 * t659 * t994 * t106 * t2821 - 0.11432585570925925678e2 * t1967 * t1466 * t2359 + 0.20977047095244633367e3 * t6892 * t4130 * t2352 - 0.11432585570925925678e2 * t1967 * t662 * t11999 + 0.21245843667094389400e0 * t2314 * t980 * t11985 - 0.49846486874188679892e1 * t2318 * t778 * t12006 + 0.11432585570925925678e2 * t6904 * t662 * t12010 - 0.70819478890314631336e-1 * t54 * t641 * t11958 + 0.33230991249459119928e1 * t646 * t61 * t11958 * t247 + 0.70819478890314631335e-1 * t54 * t236 * t12033 + 0.16615495624729559964e1 * t240 * t61 * t12033 * t247 + 0.41954094190489266736e3 * t3536 * t3329 * t11985 - 0.45730342283703702713e2 * t12045 * t2876;
7183   t12055 = t998 * t998;
7184   t12077 = -t104 * t234 * (t11969 + t12048) - 0.2e1 * t231 * t4138 - t629 * t1471 + 0.4e1 * t104 * t634 * t12055 - 0.2e1 * t4068 * t252 - t1443 * t667 - 0.4e1 * t972 * t999 - 0.2e1 * t2822 * t385 - 0.24e2 * t3265 * t8625 * t998 + 0.2e1 * t1443 * t636 - 0.2e1 * t375 * t2890 + 0.2e1 * t629 * t1448 + t25 * t12033 * t115;
7185   t12094 = t634 * t4137;
7186   t12103 = t6818 * t1447;
7187   t12109 = t1937 * t1470;
7188   t12113 = 0.4e1 * t104 * t12094 * t251 + 0.24e2 * t104 * t12103 * t635 - 0.6e1 * t104 * t12109 * t635 + 0.4e1 * t104 * t976 * t2889 - 0.6e1 * t104 * t4079 * t666 + 0.2e1 * t104 * t4087 * t666 - 0.12e2 * t231 * t4080 + 0.8e1 * t231 * t4083 + 0.4e1 * t231 * t4088 - 0.12e2 * t375 * t2835 + 0.8e1 * t375 * t2839 + 0.4e1 * t375 * t2842 + 0.8e1 * t972 * t977;
7189   if(v4rho4 != NULL && (p->info->flags & XC_FLAGS_HAVE_LXC))
7190     v4rho2tau2[8] = -t11847 - 0.4e1 / 0.3e1 * t11875 - t11885 - t262 * t550 * t1473 * t587 / 0.6e1 - t262 * t736 * t4140 * t208 - t262 * t736 * t1473 * t596 / 0.2e1 - 0.3e1 / 0.8e1 * t262 * t286 * (t12077 + t12113);
7191 
7192   t12118 = t2206 * t4210;
7193   t12130 = t4144 * rho[0];
7194   t12131 = 0.1e1 / t12130;
7195   t12134 = t7027 * t39;
7196   t12147 = 0.10372043043679588041e-4 * t5814 * t4145 * t150 - 0.25113094921099209164e-4 * t5820 * t4145 * t150 - 0.60271427810638101994e-4 * t1536 * t12131 + 0.54841825331504343852e-3 * t12134 * t42 * t4145 * t1542 + 0.78972228477366255146e-2 * t1540 * t12131 * t1542 + 0.40536374808075944542e-4 * t440 * t12131 * t46 + 0.28150260283386072598e-5 * t4151 * t150;
7197   t12238 = t5910 * t156;
7198   t12242 = 0.49846486874188679892e1 * t710 * t3174 * t1015 + 0.49846486874188679892e1 * t710 * t1115 * t2923 - 0.13278652291933993376e0 * t7124 * t66 * t4170 * t156 + 0.15934382750320792051e0 * t2133 * t2947 * t696 + 0.24923243437094339947e1 * t7106 * t711 * t4170 - 0.37384865155641509919e1 * t2137 * t4317 * t696 - 0.22865171141851851356e2 * t490 * t1039 * t696 - 0.15243447427901234237e2 * t1597 * t4184 * t156 - 0.35409739445157315668e-1 * t705 * t66 * t4154 * t156 + 0.16615495624729559964e1 * t710 * t711 * t4154 - 0.10622921833547194700e0 * t705 * t2142 * t1015 - 0.10622921833547194700e0 * t705 * t706 * t2923 + 0.31465570642866950052e3 * t1618 * t4198 * t723 - 0.24056046973484009303e4 * t5905 * t4170 * t5908 * t12238;
7199   t12249 = t4154 * t492;
7200   t12265 = t1015 * t156;
7201   t12269 = t269 * t1015;
7202   t12273 = t174 * t696;
7203   t12290 = -0.34297756712777777034e2 * t1597 * t1039 * t2981 + 0.20977047095244633367e3 * t5915 * t4198 * t2986 - 0.76217237139506171188e1 * t490 * t12249 * t723 - 0.22865171141851851357e2 * t490 * t9036 * t1126 - 0.22865171141851851357e2 * t490 * t2977 * t3160 - 0.22865171141851851357e2 * t490 * t2977 * t2981 + 0.11432585570925925678e2 * t5940 * t4184 * t723 + 0.15934382750320792050e0 * t2133 * t706 * t12265 - 0.37384865155641509919e1 * t2137 * t711 * t12269 + 0.31465570642866950052e3 * t1618 * t2985 * t12273 + 0.16615495624729559964e1 * t167 * t61 * t12147 * t179 + 0.70819478890314631335e-1 * t54 * t162 * t12147 + 0.31465570642866950052e3 * t1615 * t1617 * t1015 * t3209 - 0.34297756712777777034e2 * t3179 * t2978;
7204   t12294 = -0.3e1 * t270 * t2994 - 0.6e1 * t157 * t4164 + 0.24e2 * t52 * t5871 * t4163 * t183 - 0.18e2 * t52 * t2935 * t727 + 0.6e1 * t157 * t4167 - 0.18e2 * t3144 * t279 * t1043 * t183 + 0.6e1 * t52 * t2126 * t1043 + 0.6e1 * t52 * t701 * t2993 - t157 * t4207 + 0.2e1 * t52 * t462 * t4206 * t183 - t52 * t160 * (t12242 + t12290);
7205   if(v4rho4 != NULL && (p->info->flags & XC_FLAGS_HAVE_LXC))
7206     v4rhosigma3[0] = -t12118 / 0.2e1 - t262 * t678 * t4209 * t128 / 0.2e1 - 0.3e1 / 0.8e1 * t262 * t263 * (t25 * t12147 * t71 + 0.6e1 * t1016 * t702 - 0.3e1 * t1016 * t728 + 0.6e1 * t697 * t1021 - 0.3e1 * t697 * t1044 - t4155 * t184 - 0.18e2 * t270 * t2936 + 0.12e2 * t270 * t2939 + 0.6e1 * t270 * t2944 - 0.3e1 * t2924 * t280 + t12294);
7207 
7208   if(v4rho4 != NULL && (p->info->flags & XC_FLAGS_HAVE_LXC))
7209     v4rhosigma3[1] = 0.0e0;
7210 
7211   if(v4rho4 != NULL && (p->info->flags & XC_FLAGS_HAVE_LXC))
7212     v4rhosigma3[2] = 0.0e0;
7213 
7214   if(v4rho4 != NULL && (p->info->flags & XC_FLAGS_HAVE_LXC))
7215     v4rhosigma3[3] = 0.0e0;
7216 
7217   if(v4rho4 != NULL && (p->info->flags & XC_FLAGS_HAVE_LXC))
7218     v4rhosigma3[4] = 0.0e0;
7219 
7220   if(v4rho4 != NULL && (p->info->flags & XC_FLAGS_HAVE_LXC))
7221     v4rhosigma3[5] = 0.0e0;
7222 
7223   if(v4rho4 != NULL && (p->info->flags & XC_FLAGS_HAVE_LXC))
7224     v4rhosigma3[6] = 0.0e0;
7225 
7226   if(v4rho4 != NULL && (p->info->flags & XC_FLAGS_HAVE_LXC))
7227     v4rhosigma3[7] = 0.0e0;
7228 
7229   if(v4rho4 != NULL && (p->info->flags & XC_FLAGS_HAVE_LXC))
7230     v4rhosigma3[8] = 0.0e0;
7231 
7232   t12299 = t2206 * t4279;
7233   if(v4rho4 != NULL && (p->info->flags & XC_FLAGS_HAVE_LXC))
7234     v4rhosigma3[9] = -t262 * t736 * t4278 * t191 / 0.2e1 - t12299 / 0.2e1;
7235 
7236   if(v4rho4 != NULL && (p->info->flags & XC_FLAGS_HAVE_LXC))
7237     v4rhosigma3[10] = -t262 * t678 * t4209 * t203 / 0.2e1 - t12118 / 0.2e1;
7238 
7239   if(v4rho4 != NULL && (p->info->flags & XC_FLAGS_HAVE_LXC))
7240     v4rhosigma3[11] = 0.0e0;
7241 
7242   if(v4rho4 != NULL && (p->info->flags & XC_FLAGS_HAVE_LXC))
7243     v4rhosigma3[12] = 0.0e0;
7244 
7245   if(v4rho4 != NULL && (p->info->flags & XC_FLAGS_HAVE_LXC))
7246     v4rhosigma3[13] = 0.0e0;
7247 
7248   if(v4rho4 != NULL && (p->info->flags & XC_FLAGS_HAVE_LXC))
7249     v4rhosigma3[14] = 0.0e0;
7250 
7251   if(v4rho4 != NULL && (p->info->flags & XC_FLAGS_HAVE_LXC))
7252     v4rhosigma3[15] = 0.0e0;
7253 
7254   if(v4rho4 != NULL && (p->info->flags & XC_FLAGS_HAVE_LXC))
7255     v4rhosigma3[16] = 0.0e0;
7256 
7257   if(v4rho4 != NULL && (p->info->flags & XC_FLAGS_HAVE_LXC))
7258     v4rhosigma3[17] = 0.0e0;
7259 
7260   if(v4rho4 != NULL && (p->info->flags & XC_FLAGS_HAVE_LXC))
7261     v4rhosigma3[18] = 0.0e0;
7262 
7263   t12319 = t4213 * rho[1];
7264   t12320 = 0.1e1 / t12319;
7265   t12323 = t7486 * t39;
7266   t12336 = 0.10372043043679588041e-4 * t6763 * t4214 * t224 - 0.25113094921099209164e-4 * t6769 * t4214 * t224 - 0.60271427810638101994e-4 * t1908 * t12320 + 0.54841825331504343852e-3 * t12323 * t42 * t4214 * t1542 + 0.78972228477366255146e-2 * t1912 * t12320 * t1542 + 0.40536374808075944542e-4 * t616 * t12320 * t98 + 0.28150260283386072598e-5 * t4220 * t224;
7267   t12423 = t242 * t763;
7268   t12430 = -0.37384865155641509919e1 * t2318 * t4400 * t763 - 0.10622921833547194700e0 * t772 * t2323 * t1060 - 0.10622921833547194700e0 * t772 * t773 * t3035 + 0.49846486874188679892e1 * t777 * t3295 * t1060 + 0.49846486874188679892e1 * t777 * t1157 * t3035 - 0.15243447427901234237e2 * t1967 * t4253 * t230 - 0.35409739445157315668e-1 * t772 * t110 * t4223 * t230 + 0.16615495624729559964e1 * t777 * t778 * t4223 - 0.22865171141851851356e2 * t659 * t1084 * t763 - 0.13278652291933993376e0 * t7507 * t110 * t4239 * t230 + 0.15934382750320792051e0 * t2314 * t3059 * t763 + 0.24923243437094339947e1 * t7523 * t778 * t4239 + 0.31465570642866950052e3 * t1984 * t3097 * t12423 + 0.31465570642866950052e3 * t1984 * t4267 * t790;
7269   t12432 = t6876 * t230;
7270   t12436 = t292 * t1060;
7271   t12446 = t4223 * t661;
7272   t12462 = t1060 * t230;
7273   t12479 = -0.24056046973484009303e4 * t6871 * t4239 * t6874 * t12432 - 0.37384865155641509919e1 * t2318 * t778 * t12436 - 0.34297756712777777034e2 * t1967 * t1084 * t3093 + 0.20977047095244633367e3 * t6892 * t4267 * t3098 - 0.76217237139506171188e1 * t659 * t12446 * t790 - 0.22865171141851851357e2 * t659 * t9277 * t1168 - 0.22865171141851851357e2 * t659 * t3089 * t3281 - 0.22865171141851851357e2 * t659 * t3089 * t3093 + 0.11432585570925925678e2 * t6904 * t4253 * t790 + 0.15934382750320792050e0 * t2314 * t773 * t12462 + 0.16615495624729559964e1 * t240 * t61 * t12336 * t247 + 0.70819478890314631335e-1 * t54 * t236 * t12336 + 0.31465570642866950052e3 * t1983 * t1617 * t1060 * t3330 - 0.34297756712777777034e2 * t3300 * t3090;
7274   t12483 = -0.3e1 * t293 * t3106 - 0.6e1 * t231 * t4233 + 0.24e2 * t104 * t6818 * t4232 * t251 - 0.18e2 * t104 * t3047 * t794 + 0.6e1 * t231 * t4236 - 0.18e2 * t3265 * t302 * t1088 * t251 + 0.6e1 * t104 * t2307 * t1088 + 0.6e1 * t104 * t768 * t3105 - t231 * t4276 + 0.2e1 * t104 * t634 * t4275 * t251 - t104 * t234 * (t12430 + t12479);
7275   if(v4rho4 != NULL && (p->info->flags & XC_FLAGS_HAVE_LXC))
7276     v4rhosigma3[19] = -t12299 / 0.2e1 - t262 * t736 * t4278 * t208 / 0.2e1 - 0.3e1 / 0.8e1 * t262 * t286 * (t25 * t12336 * t115 + 0.6e1 * t1061 * t769 - 0.3e1 * t1061 * t795 + 0.6e1 * t764 * t1066 - 0.3e1 * t764 * t1089 - t4224 * t252 - 0.18e2 * t293 * t3048 + 0.12e2 * t293 * t3051 + 0.6e1 * t293 * t3056 - 0.3e1 * t3036 * t303 + t12483);
7277 
7278   t12488 = t2206 * t4362;
7279   t12504 = t462 * t4358;
7280   t12536 = -0.6e1 * t52 * t7798 * t1020 + 0.2e1 * t52 * t12504 * t183 + 0.4e1 * t52 * t9582 * t279 + 0.2e1 * t52 * t821 * t2993 + 0.4e1 * t52 * t3156 * t727 + 0.2e1 * t1016 * t822 + 0.4e1 * t1105 * t702 + 0.4e1 * t697 * t1109 - 0.6e1 * t157 * t4305 + 0.4e1 * t157 * t4308 + 0.2e1 * t157 * t4311 + 0.4e1 * t270 * t3149 + 0.4e1 * t270 * t3152 + 0.4e1 * t270 * t3157 - 0.2e1 * t270 * t3219 - 0.6e1 * t315 * t2936 + 0.4e1 * t315 * t2939 + 0.2e1 * t315 * t2944;
7281   t12556 = t2923 * t179;
7282   t12575 = t66 * t4292;
7283   t12588 = -0.35409739445157315668e-1 * t705 * t825 * t2923 + 0.16615495624729559964e1 * t710 * t12556 * t314 - 0.12461621718547169973e1 * t2137 * t4317 * t816 - 0.70819478890314631336e-1 * t705 * t9405 * t269 - 0.70819478890314631336e-1 * t705 * t3185 * t696 + 0.53114609167735973502e-1 * t2133 * t2437 * t1024 - 0.76217237139506171188e1 * t490 * t2460 * t1024 - 0.35409739445157315668e-1 * t705 * t12575 * t156 + 0.16615495624729559964e1 * t710 * t711 * t4292 + 0.16615495624729559964e1 * t710 * t4327 * t816 + 0.33230991249459119928e1 * t710 * t3174 * t1104;
7284   t12598 = t1104 * t269;
7285   t12605 = t314 * t1015;
7286   t12615 = t1024 * t156;
7287   t12622 = t314 * t1024;
7288   t12626 = 0.33230991249459119928e1 * t710 * t1115 * t3130 - 0.35409739445157315668e-1 * t705 * t2437 * t1015 + 0.10622921833547194700e0 * t2133 * t3185 * t3160 - 0.24923243437094339946e1 * t2137 * t711 * t12598 + 0.53114609167735973502e-1 * t2133 * t825 * t12265 - 0.12461621718547169973e1 * t2137 * t711 * t12605 - 0.11432585570925925678e2 * t1597 * t1039 * t3628 - 0.15243447427901234237e2 * t1597 * t1039 * t3788 - 0.13278652291933993376e0 * t7124 * t825 * t12615 + 0.10622921833547194700e0 * t2133 * t825 * t8968 + 0.24923243437094339947e1 * t7106 * t711 * t12622;
7289   t12637 = t62 * t2923;
7290   t12641 = t4292 * t492;
7291   t12661 = t5814 * t4283 * t150;
7292   t12664 = t5820 * t4283 * t150;
7293   t12669 = t12134 * t42 * t4283 * t1542;
7294   t12673 = t4289 * t150;
7295   t12675 = 0.20744086087359176081e-4 * t12661 - 0.50226189842198418326e-4 * t12664 - 0.10547499866861667849e-3 * t4146 + 0.10968365066300868770e-2 * t12669 + 0.13820139983539094650e-1 * t4149 + 0.70938655914132902945e-4 * t4152 + 0.56300520566772145194e-5 * t12673;
7296   t12679 = -0.24923243437094339946e1 * t2137 * t1115 * t9493 - 0.76217237139506171188e1 * t490 * t2460 * t4354 - 0.76217237139506171188e1 * t490 * t839 * t12265 - 0.76217237139506171188e1 * t490 * t839 * t12637 - 0.76217237139506171188e1 * t490 * t12641 * t723 - 0.15243447427901234238e2 * t490 * t9512 * t1126 - 0.15243447427901234238e2 * t490 * t3199 * t3160 - 0.15243447427901234238e2 * t490 * t3199 * t2981 + 0.10488523547622316684e3 * t1618 * t7776 * t4347 - 0.15243447427901234238e2 * t490 * t839 * t8968 + 0.70819478890314631335e-1 * t54 * t162 * t12675;
7297   t12684 = t9568 * t12615;
7298   t12688 = t5939 * t489 * t1024;
7299   t12692 = t1596 * t489 * t1015;
7300   t12698 = t5914 * t1617 * t1024;
7301   t12703 = t3208 * t12265;
7302   t12710 = t9553 * t12615;
7303   t12713 = t3208 * t8968;
7304   t12716 = 0.16615495624729559964e1 * t167 * t61 * t12675 * t179 - 0.24056046973484009303e4 * t9567 * t12684 + 0.11432585570925925678e2 * t12688 * t840 - 0.11432585570925925678e2 * t12692 * t840 - 0.22865171141851851356e2 * t3179 * t3215 + 0.20977047095244633367e3 * t12698 * t3834 - 0.22865171141851851357e2 * t3179 * t3200 + 0.10488523547622316684e3 * t3207 * t12703 + 0.20977047095244633368e3 * t1615 * t1617 * t1104 * t3209 + 0.31465570642866950052e3 * t3207 * t12710 + 0.20977047095244633368e3 * t3207 * t12713;
7305   t12724 = t270 * t1567;
7306   t12742 = 0.2e1 * t52 * t2424 * t1043 - t2924 * t325 - 0.2e1 * t3131 * t280 - t4293 * t184 + 0.2e1 * t817 * t1021 - 0.2e1 * t697 * t1131 - t1016 * t844 - t157 * t4359 - 0.2e1 * t1105 * t728 - t315 * t2994 - t52 * t160 * (t12588 + t12626 + t12679 + t12716) - t817 * t1044 + t25 * t12675 * t71 - 0.12e2 * t12724 * t3146 - 0.12e2 * t3144 * t3145 * t727 + 0.24e2 * t9638 * t324 * t1020 * t183 - 0.12e2 * t3144 * t1130 * t279 * t183 - 0.6e1 * t3144 * t324 * t1043 * t183;
7307   if(v4rho4 != NULL && (p->info->flags & XC_FLAGS_NEEDS_LAPLACIAN) && (p->info->flags & XC_FLAGS_HAVE_LXC))
7308     v4rhosigma2lapl[0] = -t12488 / 0.2e1 - t262 * t678 * t4361 * t128 / 0.2e1 - 0.3e1 / 0.8e1 * t262 * t263 * (t12536 + t12742);
7309 
7310   if(v4rho4 != NULL && (p->info->flags & XC_FLAGS_NEEDS_LAPLACIAN) && (p->info->flags & XC_FLAGS_HAVE_LXC))
7311     v4rhosigma2lapl[1] = 0.0e0;
7312 
7313   if(v4rho4 != NULL && (p->info->flags & XC_FLAGS_NEEDS_LAPLACIAN) && (p->info->flags & XC_FLAGS_HAVE_LXC))
7314     v4rhosigma2lapl[2] = 0.0e0;
7315 
7316   if(v4rho4 != NULL && (p->info->flags & XC_FLAGS_NEEDS_LAPLACIAN) && (p->info->flags & XC_FLAGS_HAVE_LXC))
7317     v4rhosigma2lapl[3] = 0.0e0;
7318 
7319   if(v4rho4 != NULL && (p->info->flags & XC_FLAGS_NEEDS_LAPLACIAN) && (p->info->flags & XC_FLAGS_HAVE_LXC))
7320     v4rhosigma2lapl[4] = 0.0e0;
7321 
7322   if(v4rho4 != NULL && (p->info->flags & XC_FLAGS_NEEDS_LAPLACIAN) && (p->info->flags & XC_FLAGS_HAVE_LXC))
7323     v4rhosigma2lapl[5] = 0.0e0;
7324 
7325   if(v4rho4 != NULL && (p->info->flags & XC_FLAGS_NEEDS_LAPLACIAN) && (p->info->flags & XC_FLAGS_HAVE_LXC))
7326     v4rhosigma2lapl[6] = 0.0e0;
7327 
7328   if(v4rho4 != NULL && (p->info->flags & XC_FLAGS_NEEDS_LAPLACIAN) && (p->info->flags & XC_FLAGS_HAVE_LXC))
7329     v4rhosigma2lapl[7] = 0.0e0;
7330 
7331   if(v4rho4 != NULL && (p->info->flags & XC_FLAGS_NEEDS_LAPLACIAN) && (p->info->flags & XC_FLAGS_HAVE_LXC))
7332     v4rhosigma2lapl[8] = 0.0e0;
7333 
7334   if(v4rho4 != NULL && (p->info->flags & XC_FLAGS_NEEDS_LAPLACIAN) && (p->info->flags & XC_FLAGS_HAVE_LXC))
7335     v4rhosigma2lapl[9] = 0.0e0;
7336 
7337   if(v4rho4 != NULL && (p->info->flags & XC_FLAGS_NEEDS_LAPLACIAN) && (p->info->flags & XC_FLAGS_HAVE_LXC))
7338     v4rhosigma2lapl[10] = 0.0e0;
7339 
7340   t12747 = t2206 * t4445;
7341   if(v4rho4 != NULL && (p->info->flags & XC_FLAGS_NEEDS_LAPLACIAN) && (p->info->flags & XC_FLAGS_HAVE_LXC))
7342     v4rhosigma2lapl[11] = -t262 * t736 * t4444 * t191 / 0.2e1 - t12747 / 0.2e1;
7343 
7344   if(v4rho4 != NULL && (p->info->flags & XC_FLAGS_NEEDS_LAPLACIAN) && (p->info->flags & XC_FLAGS_HAVE_LXC))
7345     v4rhosigma2lapl[12] = -t262 * t678 * t4361 * t203 / 0.2e1 - t12488 / 0.2e1;
7346 
7347   if(v4rho4 != NULL && (p->info->flags & XC_FLAGS_NEEDS_LAPLACIAN) && (p->info->flags & XC_FLAGS_HAVE_LXC))
7348     v4rhosigma2lapl[13] = 0.0e0;
7349 
7350   if(v4rho4 != NULL && (p->info->flags & XC_FLAGS_NEEDS_LAPLACIAN) && (p->info->flags & XC_FLAGS_HAVE_LXC))
7351     v4rhosigma2lapl[14] = 0.0e0;
7352 
7353   if(v4rho4 != NULL && (p->info->flags & XC_FLAGS_NEEDS_LAPLACIAN) && (p->info->flags & XC_FLAGS_HAVE_LXC))
7354     v4rhosigma2lapl[15] = 0.0e0;
7355 
7356   if(v4rho4 != NULL && (p->info->flags & XC_FLAGS_NEEDS_LAPLACIAN) && (p->info->flags & XC_FLAGS_HAVE_LXC))
7357     v4rhosigma2lapl[16] = 0.0e0;
7358 
7359   if(v4rho4 != NULL && (p->info->flags & XC_FLAGS_NEEDS_LAPLACIAN) && (p->info->flags & XC_FLAGS_HAVE_LXC))
7360     v4rhosigma2lapl[17] = 0.0e0;
7361 
7362   if(v4rho4 != NULL && (p->info->flags & XC_FLAGS_NEEDS_LAPLACIAN) && (p->info->flags & XC_FLAGS_HAVE_LXC))
7363     v4rhosigma2lapl[18] = 0.0e0;
7364 
7365   if(v4rho4 != NULL && (p->info->flags & XC_FLAGS_NEEDS_LAPLACIAN) && (p->info->flags & XC_FLAGS_HAVE_LXC))
7366     v4rhosigma2lapl[19] = 0.0e0;
7367 
7368   if(v4rho4 != NULL && (p->info->flags & XC_FLAGS_NEEDS_LAPLACIAN) && (p->info->flags & XC_FLAGS_HAVE_LXC))
7369     v4rhosigma2lapl[20] = 0.0e0;
7370 
7371   if(v4rho4 != NULL && (p->info->flags & XC_FLAGS_NEEDS_LAPLACIAN) && (p->info->flags & XC_FLAGS_HAVE_LXC))
7372     v4rhosigma2lapl[21] = 0.0e0;
7373 
7374   if(v4rho4 != NULL && (p->info->flags & XC_FLAGS_NEEDS_LAPLACIAN) && (p->info->flags & XC_FLAGS_HAVE_LXC))
7375     v4rhosigma2lapl[22] = 0.0e0;
7376 
7377   t12764 = t6763 * t4366 * t224;
7378   t12767 = t6769 * t4366 * t224;
7379   t12772 = t12323 * t42 * t4366 * t1542;
7380   t12776 = t4372 * t224;
7381   t12778 = 0.20744086087359176081e-4 * t12764 - 0.50226189842198418326e-4 * t12767 - 0.10547499866861667849e-3 * t4215 + 0.10968365066300868770e-2 * t12772 + 0.13820139983539094650e-1 * t4218 + 0.70938655914132902945e-4 * t4221 + 0.56300520566772145194e-5 * t12776;
7382   t12814 = -0.6e1 * t104 * t8199 * t1065 + 0.4e1 * t104 * t9945 * t302 + 0.4e1 * t104 * t3277 * t794 + t25 * t12778 * t115 + 0.2e1 * t1061 * t879 - t1061 * t901 + 0.4e1 * t1147 * t769 + 0.4e1 * t764 * t1151 - 0.2e1 * t764 * t1173 - 0.6e1 * t231 * t4388 + 0.4e1 * t231 * t4391 + 0.4e1 * t293 * t3270 + 0.4e1 * t293 * t3273 + 0.4e1 * t293 * t3278 - t3036 * t347 - 0.6e1 * t337 * t3048 + 0.4e1 * t337 * t3051 + 0.2e1 * t337 * t3056;
7383   t12834 = t634 * t4441;
7384   t12857 = t336 * t1069;
7385   t12867 = t1146 * t292;
7386   t12874 = t336 * t1060;
7387   t12884 = 0.70819478890314631335e-1 * t54 * t236 * t12778 + 0.16615495624729559964e1 * t240 * t61 * t12778 * t247 + 0.10622921833547194700e0 * t2314 * t882 * t9297 + 0.24923243437094339947e1 * t7523 * t778 * t12857 - 0.24923243437094339946e1 * t2318 * t1157 * t9806 + 0.10622921833547194700e0 * t2314 * t3306 * t3281 - 0.24923243437094339946e1 * t2318 * t778 * t12867 + 0.53114609167735973502e-1 * t2314 * t882 * t12462 - 0.12461621718547169973e1 * t2318 * t778 * t12874 - 0.15243447427901234238e2 * t659 * t896 * t9297 - 0.76217237139506171188e1 * t659 * t2620 * t4437;
7388   t12888 = t106 * t3035;
7389   t12898 = t4375 * t661;
7390   t12914 = t1069 * t230;
7391   t12921 = -0.76217237139506171188e1 * t659 * t896 * t12462 - 0.76217237139506171188e1 * t659 * t896 * t12888 - 0.11432585570925925678e2 * t1967 * t1084 * t3730 - 0.15243447427901234237e2 * t1967 * t1084 * t3898 - 0.76217237139506171188e1 * t659 * t12898 * t790 - 0.15243447427901234238e2 * t659 * t9813 * t1168 - 0.15243447427901234238e2 * t659 * t3320 * t3281 - 0.15243447427901234238e2 * t659 * t3320 * t3093 + 0.10488523547622316684e3 * t1984 * t8120 * t4430 - 0.13278652291933993376e0 * t7507 * t882 * t12914 - 0.76217237139506171188e1 * t659 * t2620 * t1069;
7392   t12923 = t110 * t4375;
7393   t12930 = t3035 * t247;
7394   t12944 = t6903 * t489 * t1069;
7395   t12947 = t9909 * t12914;
7396   t12950 = t3329 * t9297;
7397   t12953 = t9890 * t12914;
7398   t12956 = t3329 * t12462;
7399   t12959 = -0.35409739445157315668e-1 * t772 * t12923 * t230 + 0.16615495624729559964e1 * t777 * t778 * t4375 + 0.16615495624729559964e1 * t777 * t12930 * t336 - 0.12461621718547169973e1 * t2318 * t4400 * t873 - 0.70819478890314631336e-1 * t772 * t9777 * t292 + 0.53114609167735973502e-1 * t2314 * t2597 * t1069 + 0.11432585570925925678e2 * t12944 * t897 + 0.31465570642866950052e3 * t3328 * t12947 + 0.20977047095244633368e3 * t3328 * t12950 - 0.24056046973484009303e4 * t9889 * t12953 + 0.10488523547622316684e3 * t3328 * t12956;
7400   t12961 = t1966 * t489 * t1060;
7401   t12967 = t6891 * t1617 * t1069;
7402   t12994 = -0.11432585570925925678e2 * t12961 * t897 - 0.22865171141851851356e2 * t3300 * t3336 + 0.20977047095244633367e3 * t12967 * t3944 - 0.22865171141851851357e2 * t3300 * t3321 + 0.20977047095244633368e3 * t1983 * t1617 * t1146 * t3330 + 0.16615495624729559964e1 * t777 * t4410 * t873 + 0.33230991249459119928e1 * t777 * t3295 * t1146 + 0.33230991249459119928e1 * t777 * t1157 * t3251 - 0.70819478890314631336e-1 * t772 * t3306 * t763 - 0.35409739445157315668e-1 * t772 * t2597 * t1060 - 0.35409739445157315668e-1 * t772 * t882 * t3035;
7403   t12999 = t293 * t1937;
7404   t13009 = -0.6e1 * t3265 * t346 * t1088 * t251 - 0.12e2 * t3265 * t3266 * t794 - 0.12e2 * t3265 * t1172 * t302 * t251 + 0.2e1 * t104 * t2584 * t1088 + 0.2e1 * t231 * t4394 + 0.2e1 * t104 * t878 * t3105 + 0.2e1 * t104 * t12834 * t251 - t231 * t4442 - t337 * t3106 - t4376 * t252 - 0.2e1 * t1147 * t795 - 0.2e1 * t3252 * t303 + 0.2e1 * t874 * t1066 - t104 * t234 * (t12884 + t12921 + t12959 + t12994) - 0.12e2 * t12999 * t3267 + 0.24e2 * t9939 * t346 * t1065 * t251 - 0.2e1 * t293 * t3340 - t874 * t1089;
7405   if(v4rho4 != NULL && (p->info->flags & XC_FLAGS_NEEDS_LAPLACIAN) && (p->info->flags & XC_FLAGS_HAVE_LXC))
7406     v4rhosigma2lapl[23] = -t12747 / 0.2e1 - t262 * t736 * t4444 * t208 / 0.2e1 - 0.3e1 / 0.8e1 * t262 * t286 * (t12814 + t13009);
7407 
7408   t13014 = t2206 * t4517;
7409   t13058 = -0.6e1 * t52 * t8379 * t1020 + 0.4e1 * t52 * t10217 * t279 + 0.4e1 * t52 * t3382 * t727 + 0.2e1 * t1016 * t924 - t919 * t1044 + 0.4e1 * t1182 * t702 + 0.4e1 * t697 * t1186 - 0.2e1 * t697 * t1206 - 0.6e1 * t157 * t4464 + 0.4e1 * t157 * t4467 + 0.2e1 * t157 * t4470 + 0.4e1 * t270 * t3375 + 0.4e1 * t270 * t3378 + 0.4e1 * t270 * t3383 - 0.2e1 * t270 * t3439 - 0.6e1 * t356 * t2936 + 0.4e1 * t356 * t2939 + 0.2e1 * t356 * t2944;
7410   t13065 = t462 * t4513;
7411   t13076 = -0.82976344349436704324e-4 * t12661 + 0.20090475936879367331e-3 * t12664 + 0.42189999467446671394e-3 * t4146 - 0.43873460265203475080e-2 * t12669 - 0.55280559934156378601e-1 * t4149 - 0.28375462365653161179e-3 * t4152 - 0.22520208226708858078e-4 * t12673;
7412   t13104 = t355 * t1015;
7413   t13111 = t355 * t156;
7414   t13115 = -0.15243447427901234238e2 * t490 * t10078 * t1126 - 0.15243447427901234238e2 * t490 * t3421 * t3160 - 0.15243447427901234238e2 * t490 * t3421 * t2981 + 0.10488523547622316684e3 * t1618 * t8264 * t4347 - 0.15243447427901234238e2 * t490 * t941 * t8968 - 0.76217237139506171188e1 * t490 * t2723 * t4354 - 0.76217237139506171188e1 * t490 * t941 * t12265 - 0.76217237139506171188e1 * t490 * t941 * t12637 - 0.12461621718547169973e1 * t2137 * t711 * t13104 - 0.11432585570925925678e2 * t1597 * t1039 * t4030 - 0.15243447427901234237e2 * t1597 * t1039 * t13111;
7415   t13122 = t355 * t1024;
7416   t13132 = t1181 * t269;
7417   t13148 = t2727 * t2986;
7418   t13151 = -0.13278652291933993376e0 * t7124 * t927 * t12615 + 0.10622921833547194700e0 * t2133 * t927 * t8968 + 0.24923243437094339947e1 * t7106 * t711 * t13122 - 0.24923243437094339946e1 * t2137 * t1115 * t10056 + 0.10622921833547194700e0 * t2133 * t3407 * t3160 - 0.24923243437094339946e1 * t2137 * t711 * t13132 + 0.53114609167735973502e-1 * t2133 * t927 * t12265 + 0.16615495624729559964e1 * t167 * t61 * t13076 * t179 + 0.70819478890314631335e-1 * t54 * t162 * t13076 - 0.22865171141851851356e2 * t3179 * t3435 + 0.20977047095244633367e3 * t12698 * t13148;
7419   t13156 = t1615 * t1617 * t1181;
7420   t13180 = -0.22865171141851851357e2 * t3179 * t3422 + 0.20977047095244633368e3 * t13156 * t3209 + 0.31465570642866950052e3 * t3429 * t12710 + 0.20977047095244633368e3 * t3429 * t12713 - 0.24056046973484009303e4 * t10132 * t12684 + 0.10488523547622316684e3 * t3429 * t12703 + 0.11432585570925925678e2 * t12688 * t942 - 0.11432585570925925678e2 * t12692 * t942 - 0.70819478890314631336e-1 * t705 * t10033 * t269 - 0.70819478890314631336e-1 * t705 * t3407 * t696 + 0.53114609167735973502e-1 * t2133 * t2699 * t1024;
7421   t13184 = t66 * t4451;
7422   t13212 = t4451 * t492;
7423   t13216 = 0.33230991249459119928e1 * t710 * t1115 * t3357 - 0.35409739445157315668e-1 * t705 * t13184 * t156 + 0.16615495624729559964e1 * t710 * t711 * t4451 + 0.16615495624729559964e1 * t710 * t4327 * t918 + 0.33230991249459119928e1 * t710 * t3174 * t1181 - 0.35409739445157315668e-1 * t705 * t2699 * t1015 - 0.35409739445157315668e-1 * t705 * t927 * t2923 + 0.16615495624729559964e1 * t710 * t12556 * t355 - 0.12461621718547169973e1 * t2137 * t4317 * t918 - 0.76217237139506171188e1 * t490 * t2723 * t1024 - 0.76217237139506171188e1 * t490 * t13212 * t723;
7424   t13248 = 0.2e1 * t52 * t2686 * t1043 + 0.2e1 * t52 * t923 * t2993 + 0.2e1 * t52 * t13065 * t183 + t25 * t13076 * t71 - t157 * t4514 - t52 * t160 * (t13115 + t13151 + t13180 + t13216) - 0.12e2 * t3144 * t1205 * t279 * t183 - 0.12e2 * t3144 * t3371 * t727 - t2924 * t366 + 0.24e2 * t9638 * t365 * t1020 * t183 - 0.12e2 * t12724 * t3372 - 0.2e1 * t1182 * t728 - t4452 * t184 - 0.2e1 * t3358 * t280 - t356 * t2994 + 0.2e1 * t919 * t1021 - t1016 * t946 - 0.6e1 * t3144 * t365 * t1043 * t183;
7425   if(v4rho4 != NULL && (p->info->flags & XC_FLAGS_HAVE_LXC))
7426     v4rhosigma2tau[0] = -t13014 / 0.2e1 - t262 * t678 * t4516 * t128 / 0.2e1 - 0.3e1 / 0.8e1 * t262 * t263 * (t13058 + t13248);
7427 
7428   if(v4rho4 != NULL && (p->info->flags & XC_FLAGS_HAVE_LXC))
7429     v4rhosigma2tau[1] = 0.0e0;
7430 
7431   if(v4rho4 != NULL && (p->info->flags & XC_FLAGS_HAVE_LXC))
7432     v4rhosigma2tau[2] = 0.0e0;
7433 
7434   if(v4rho4 != NULL && (p->info->flags & XC_FLAGS_HAVE_LXC))
7435     v4rhosigma2tau[3] = 0.0e0;
7436 
7437   if(v4rho4 != NULL && (p->info->flags & XC_FLAGS_HAVE_LXC))
7438     v4rhosigma2tau[4] = 0.0e0;
7439 
7440   if(v4rho4 != NULL && (p->info->flags & XC_FLAGS_HAVE_LXC))
7441     v4rhosigma2tau[5] = 0.0e0;
7442 
7443   if(v4rho4 != NULL && (p->info->flags & XC_FLAGS_HAVE_LXC))
7444     v4rhosigma2tau[6] = 0.0e0;
7445 
7446   if(v4rho4 != NULL && (p->info->flags & XC_FLAGS_HAVE_LXC))
7447     v4rhosigma2tau[7] = 0.0e0;
7448 
7449   if(v4rho4 != NULL && (p->info->flags & XC_FLAGS_HAVE_LXC))
7450     v4rhosigma2tau[8] = 0.0e0;
7451 
7452   if(v4rho4 != NULL && (p->info->flags & XC_FLAGS_HAVE_LXC))
7453     v4rhosigma2tau[9] = 0.0e0;
7454 
7455   if(v4rho4 != NULL && (p->info->flags & XC_FLAGS_HAVE_LXC))
7456     v4rhosigma2tau[10] = 0.0e0;
7457 
7458   t13253 = t2206 * t4589;
7459   if(v4rho4 != NULL && (p->info->flags & XC_FLAGS_HAVE_LXC))
7460     v4rhosigma2tau[11] = -t262 * t736 * t4588 * t191 / 0.2e1 - t13253 / 0.2e1;
7461 
7462   if(v4rho4 != NULL && (p->info->flags & XC_FLAGS_HAVE_LXC))
7463     v4rhosigma2tau[12] = -t262 * t678 * t4516 * t203 / 0.2e1 - t13014 / 0.2e1;
7464 
7465   if(v4rho4 != NULL && (p->info->flags & XC_FLAGS_HAVE_LXC))
7466     v4rhosigma2tau[13] = 0.0e0;
7467 
7468   if(v4rho4 != NULL && (p->info->flags & XC_FLAGS_HAVE_LXC))
7469     v4rhosigma2tau[14] = 0.0e0;
7470 
7471   if(v4rho4 != NULL && (p->info->flags & XC_FLAGS_HAVE_LXC))
7472     v4rhosigma2tau[15] = 0.0e0;
7473 
7474   if(v4rho4 != NULL && (p->info->flags & XC_FLAGS_HAVE_LXC))
7475     v4rhosigma2tau[16] = 0.0e0;
7476 
7477   if(v4rho4 != NULL && (p->info->flags & XC_FLAGS_HAVE_LXC))
7478     v4rhosigma2tau[17] = 0.0e0;
7479 
7480   if(v4rho4 != NULL && (p->info->flags & XC_FLAGS_HAVE_LXC))
7481     v4rhosigma2tau[18] = 0.0e0;
7482 
7483   if(v4rho4 != NULL && (p->info->flags & XC_FLAGS_HAVE_LXC))
7484     v4rhosigma2tau[19] = 0.0e0;
7485 
7486   if(v4rho4 != NULL && (p->info->flags & XC_FLAGS_HAVE_LXC))
7487     v4rhosigma2tau[20] = 0.0e0;
7488 
7489   if(v4rho4 != NULL && (p->info->flags & XC_FLAGS_HAVE_LXC))
7490     v4rhosigma2tau[21] = 0.0e0;
7491 
7492   if(v4rho4 != NULL && (p->info->flags & XC_FLAGS_HAVE_LXC))
7493     v4rhosigma2tau[22] = 0.0e0;
7494 
7495   t13274 = -0.82976344349436704324e-4 * t12764 + 0.20090475936879367331e-3 * t12767 + 0.42189999467446671394e-3 * t4215 - 0.43873460265203475080e-2 * t12772 - 0.55280559934156378601e-1 * t4218 - 0.28375462365653161179e-3 * t4221 - 0.22520208226708858078e-4 * t12776;
7496   t13316 = t25 * t13274 * t115 + 0.4e1 * t375 * t3051 + 0.4e1 * t1215 * t769 + 0.2e1 * t1061 * t977 + 0.2e1 * t375 * t3056 - 0.6e1 * t375 * t3048 + 0.4e1 * t293 * t3485 + 0.4e1 * t293 * t3482 + 0.4e1 * t764 * t1219 + 0.4e1 * t293 * t3490 - 0.6e1 * t231 * t4536 - 0.6e1 * t104 * t8636 * t1065 + 0.4e1 * t104 * t10495 * t302 + 0.4e1 * t231 * t4539 + 0.4e1 * t104 * t3489 * t794 + 0.2e1 * t104 * t2838 * t1088 + 0.2e1 * t104 * t976 * t3105 + 0.2e1 * t231 * t4542;
7497   t13317 = t634 * t4585;
7498   t13349 = t2879 * t3098;
7499   t13355 = t1983 * t1617 * t1214;
7500   t13364 = 0.70819478890314631335e-1 * t54 * t236 * t13274 + 0.16615495624729559964e1 * t240 * t61 * t13274 * t247 + 0.11432585570925925678e2 * t12944 * t995 - 0.11432585570925925678e2 * t12961 * t995 - 0.22865171141851851356e2 * t3300 * t3542 + 0.20977047095244633367e3 * t12967 * t13349 - 0.22865171141851851357e2 * t3300 * t3529 + 0.20977047095244633368e3 * t13355 * t3330 + 0.31465570642866950052e3 * t3536 * t12947 + 0.20977047095244633368e3 * t3536 * t12950 - 0.24056046973484009303e4 * t10460 * t12953;
7501   t13379 = t110 * t4523;
7502   t13398 = 0.10488523547622316684e3 * t3536 * t12956 - 0.12461621718547169973e1 * t2318 * t4400 * t971 - 0.70819478890314631336e-1 * t772 * t10472 * t292 - 0.70819478890314631336e-1 * t772 * t3514 * t763 + 0.53114609167735973502e-1 * t2314 * t2851 * t1069 - 0.35409739445157315668e-1 * t772 * t13379 * t230 + 0.16615495624729559964e1 * t777 * t778 * t4523 + 0.33230991249459119928e1 * t777 * t3295 * t1214 + 0.33230991249459119928e1 * t777 * t1157 * t3464 - 0.35409739445157315668e-1 * t772 * t2851 * t1060 - 0.35409739445157315668e-1 * t772 * t980 * t3035;
7503   t13418 = t4523 * t661;
7504   t13431 = t1214 * t292;
7505   t13435 = 0.16615495624729559964e1 * t777 * t12930 * t374 + 0.16615495624729559964e1 * t777 * t4410 * t971 - 0.76217237139506171188e1 * t659 * t2875 * t1069 - 0.76217237139506171188e1 * t659 * t2875 * t4437 - 0.76217237139506171188e1 * t659 * t994 * t12462 - 0.76217237139506171188e1 * t659 * t994 * t12888 - 0.76217237139506171188e1 * t659 * t13418 * t790 - 0.15243447427901234238e2 * t659 * t10366 * t1168 - 0.15243447427901234238e2 * t659 * t3528 * t3281 - 0.15243447427901234238e2 * t659 * t3528 * t3093 - 0.24923243437094339946e1 * t2318 * t778 * t13431;
7506   t13439 = t374 * t1060;
7507   t13446 = t374 * t230;
7508   t13456 = t374 * t1069;
7509   t13472 = 0.53114609167735973502e-1 * t2314 * t980 * t12462 - 0.12461621718547169973e1 * t2318 * t778 * t13439 - 0.11432585570925925678e2 * t1967 * t1084 * t4126 - 0.15243447427901234237e2 * t1967 * t1084 * t13446 - 0.13278652291933993376e0 * t7507 * t980 * t12914 + 0.10622921833547194700e0 * t2314 * t980 * t9297 + 0.24923243437094339947e1 * t7523 * t778 * t13456 - 0.24923243437094339946e1 * t2318 * t1157 * t10390 + 0.10622921833547194700e0 * t2314 * t3514 * t3281 + 0.10488523547622316684e3 * t1984 * t8675 * t4430 - 0.15243447427901234238e2 * t659 * t994 * t9297;
7510   t13495 = 0.2e1 * t104 * t13317 * t251 - 0.2e1 * t3465 * t303 - t4524 * t252 - 0.2e1 * t1215 * t795 + 0.2e1 * t972 * t1066 - t375 * t3106 - t972 * t1089 - t3036 * t385 - t1061 * t999 - 0.2e1 * t764 * t1239 - 0.2e1 * t293 * t3546 - t104 * t234 * (t13364 + t13398 + t13435 + t13472) - 0.12e2 * t3265 * t3478 * t794 - 0.12e2 * t12999 * t3479 + 0.24e2 * t9939 * t384 * t1065 * t251 - t231 * t4586 - 0.6e1 * t3265 * t384 * t1088 * t251 - 0.12e2 * t3265 * t1238 * t302 * t251;
7511   if(v4rho4 != NULL && (p->info->flags & XC_FLAGS_HAVE_LXC))
7512     v4rhosigma2tau[23] = -t13253 / 0.2e1 - t262 * t736 * t4588 * t208 / 0.2e1 - 0.3e1 / 0.8e1 * t262 * t286 * (t13316 + t13495);
7513 
7514   t13500 = t2206 * t4669;
7515   t13507 = t5814 * t4592 * t150;
7516   t13510 = t5820 * t4592 * t150;
7517   t13515 = t12134 * t42 * t4592 * t1542;
7518   t13519 = t4598 * t150;
7519   t13521 = 0.41488172174718352162e-4 * t13507 - 0.10045237968439683665e-3 * t13510 - 0.18081428343191430598e-3 * t4284 + 0.21936730132601737540e-2 * t13515 + 0.23691668543209876543e-1 * t4287 + 0.12160912442422783363e-3 * t4290 + 0.11260104113354429039e-4 * t13519;
7520   t13536 = t315 * t1567;
7521   t13554 = t462 * t4665;
7522   t13564 = t25 * t13521 * t71 - 0.2e1 * t1105 * t844 - t4602 * t184 - t1255 * t728 - 0.2e1 * t3131 * t325 - 0.2e1 * t315 * t3219 - t157 * t4666 - 0.12e2 * t3144 * t3145 * t843 - 0.12e2 * t13536 * t3146 - 0.12e2 * t3144 * t324 * t1130 * t183 + 0.24e2 * t9638 * t1259 * t279 * t183 - 0.6e1 * t3144 * t1282 * t279 * t183 - t3571 * t280 + 0.2e1 * t157 * t4620 + 0.2e1 * t52 * t13554 * t183 + 0.2e1 * t52 * t3590 * t727 - 0.2e1 * t817 * t1131 - t270 * t3640;
7523   t13586 = t66 * t4601;
7524   t13599 = 0.33230991249459119928e1 * t710 * t3802 * t1104 + 0.33230991249459119928e1 * t710 * t1346 * t3130 - 0.70819478890314631336e-1 * t705 * t2437 * t1104 - 0.70819478890314631336e-1 * t705 * t825 * t3130 + 0.53114609167735973502e-1 * t2133 * t3594 * t696 - 0.12461621718547169973e1 * t2137 * t3174 * t1263 - 0.76217237139506171188e1 * t490 * t1278 * t696 - 0.35409739445157315668e-1 * t705 * t13586 * t156 + 0.16615495624729559964e1 * t710 * t711 * t4601 - 0.35409739445157315668e-1 * t705 * t10693 * t269 - 0.35409739445157315668e-1 * t705 * t3610 * t696;
7525   t13606 = t1104 * t156;
7526   t13607 = t3208 * t13606;
7527   t13610 = t3208 * t9489;
7528   t13613 = t1617 * t1263;
7529   t13615 = t9553 * t3160;
7530   t13620 = t9568 * t3160;
7531   t13623 = t5914 * t13613;
7532   t13629 = t1615 * t1617 * t1254;
7533   t13636 = 0.16615495624729559964e1 * t710 * t3174 * t1254 + 0.16615495624729559964e1 * t710 * t1115 * t3570 + 0.20977047095244633368e3 * t3207 * t13607 + 0.20977047095244633368e3 * t3207 * t13610 + 0.31465570642866950052e3 * t1615 * t13613 * t13615 - 0.24056046973484009303e4 * t5903 * t5904 * t1263 * t13620 + 0.20977047095244633367e3 * t13623 * t3209 - 0.11432585570925925678e2 * t3179 * t3625 + 0.10488523547622316684e3 * t13629 * t3209 - 0.22865171141851851357e2 * t3807 * t3200 - 0.22865171141851851356e2 * t3807 * t3203;
7534   t13638 = t5939 * t3178;
7535   t13653 = t1263 * t269;
7536   t13669 = t62 * t3130;
7537   t13673 = 0.11432585570925925678e2 * t13638 * t3607 - 0.11432585570925925678e2 * t1597 * t1278 * t2981 + 0.53114609167735973502e-1 * t2133 * t3610 * t3160 - 0.13278652291933993376e0 * t7124 * t3594 * t3160 + 0.10622921833547194700e0 * t2133 * t825 * t9489 + 0.24923243437094339947e1 * t7106 * t711 * t13653 - 0.76217237139506171188e1 * t490 * t3624 * t3160 - 0.76217237139506171188e1 * t490 * t3624 * t2981 - 0.15243447427901234238e2 * t490 * t2460 * t4654 - 0.15243447427901234238e2 * t490 * t839 * t13606 - 0.15243447427901234238e2 * t490 * t839 * t13669;
7538   t13680 = t1254 * t269;
7539   t13684 = t4601 * t492;
7540   t13697 = t314 * t1104;
7541   t13711 = 0.10488523547622316684e3 * t1618 * t3632 * t12273 - 0.15243447427901234238e2 * t490 * t839 * t9489 - 0.12461621718547169973e1 * t2137 * t711 * t13680 - 0.76217237139506171188e1 * t490 * t13684 * t723 - 0.76217237139506171188e1 * t490 * t10570 * t1126 - 0.24923243437094339946e1 * t2137 * t1115 * t10595 + 0.10622921833547194700e0 * t2133 * t825 * t13606 - 0.24923243437094339946e1 * t2137 * t711 * t13697 - 0.15243447427901234237e2 * t1597 * t1278 * t3160 + 0.70819478890314631335e-1 * t54 * t162 * t13521 + 0.16615495624729559964e1 * t167 * t61 * t13521 * t179;
7542   t13753 = -t52 * t160 * (t13599 + t13636 + t13673 + t13711) + 0.4e1 * t315 * t3149 + 0.4e1 * t1105 * t822 + 0.2e1 * t1255 * t702 + 0.4e1 * t315 * t3152 + 0.4e1 * t817 * t1109 + 0.4e1 * t270 * t3586 + 0.4e1 * t315 * t3157 + 0.4e1 * t157 * t4616 - 0.6e1 * t52 * t3582 * t727 - 0.6e1 * t157 * t4613 - 0.6e1 * t270 * t3583 + 0.4e1 * t52 * t2424 * t1130 + 0.4e1 * t52 * t821 * t3218 + 0.2e1 * t52 * t10748 * t279 + 0.2e1 * t270 * t3591 - t697 * t1283 + 0.2e1 * t697 * t1260;
7543   if(v4rho4 != NULL && (p->info->flags & XC_FLAGS_NEEDS_LAPLACIAN) && (p->info->flags & XC_FLAGS_HAVE_LXC))
7544     v4rhosigmalapl2[0] = -t13500 / 0.2e1 - t262 * t678 * t4668 * t128 / 0.2e1 - 0.3e1 / 0.8e1 * t262 * t263 * (t13564 + t13753);
7545 
7546   if(v4rho4 != NULL && (p->info->flags & XC_FLAGS_NEEDS_LAPLACIAN) && (p->info->flags & XC_FLAGS_HAVE_LXC))
7547     v4rhosigmalapl2[1] = 0.0e0;
7548 
7549   if(v4rho4 != NULL && (p->info->flags & XC_FLAGS_NEEDS_LAPLACIAN) && (p->info->flags & XC_FLAGS_HAVE_LXC))
7550     v4rhosigmalapl2[2] = 0.0e0;
7551 
7552   if(v4rho4 != NULL && (p->info->flags & XC_FLAGS_NEEDS_LAPLACIAN) && (p->info->flags & XC_FLAGS_HAVE_LXC))
7553     v4rhosigmalapl2[3] = 0.0e0;
7554 
7555   if(v4rho4 != NULL && (p->info->flags & XC_FLAGS_NEEDS_LAPLACIAN) && (p->info->flags & XC_FLAGS_HAVE_LXC))
7556     v4rhosigmalapl2[4] = 0.0e0;
7557 
7558   if(v4rho4 != NULL && (p->info->flags & XC_FLAGS_NEEDS_LAPLACIAN) && (p->info->flags & XC_FLAGS_HAVE_LXC))
7559     v4rhosigmalapl2[5] = 0.0e0;
7560 
7561   if(v4rho4 != NULL && (p->info->flags & XC_FLAGS_NEEDS_LAPLACIAN) && (p->info->flags & XC_FLAGS_HAVE_LXC))
7562     v4rhosigmalapl2[6] = 0.0e0;
7563 
7564   if(v4rho4 != NULL && (p->info->flags & XC_FLAGS_NEEDS_LAPLACIAN) && (p->info->flags & XC_FLAGS_HAVE_LXC))
7565     v4rhosigmalapl2[7] = 0.0e0;
7566 
7567   t13758 = t2206 * t4749;
7568   if(v4rho4 != NULL && (p->info->flags & XC_FLAGS_NEEDS_LAPLACIAN) && (p->info->flags & XC_FLAGS_HAVE_LXC))
7569     v4rhosigmalapl2[8] = -t262 * t736 * t4748 * t191 / 0.2e1 - t13758 / 0.2e1;
7570 
7571   if(v4rho4 != NULL && (p->info->flags & XC_FLAGS_NEEDS_LAPLACIAN) && (p->info->flags & XC_FLAGS_HAVE_LXC))
7572     v4rhosigmalapl2[9] = -t262 * t678 * t4668 * t203 / 0.2e1 - t13500 / 0.2e1;
7573 
7574   if(v4rho4 != NULL && (p->info->flags & XC_FLAGS_NEEDS_LAPLACIAN) && (p->info->flags & XC_FLAGS_HAVE_LXC))
7575     v4rhosigmalapl2[10] = 0.0e0;
7576 
7577   if(v4rho4 != NULL && (p->info->flags & XC_FLAGS_NEEDS_LAPLACIAN) && (p->info->flags & XC_FLAGS_HAVE_LXC))
7578     v4rhosigmalapl2[11] = 0.0e0;
7579 
7580   if(v4rho4 != NULL && (p->info->flags & XC_FLAGS_NEEDS_LAPLACIAN) && (p->info->flags & XC_FLAGS_HAVE_LXC))
7581     v4rhosigmalapl2[12] = 0.0e0;
7582 
7583   if(v4rho4 != NULL && (p->info->flags & XC_FLAGS_NEEDS_LAPLACIAN) && (p->info->flags & XC_FLAGS_HAVE_LXC))
7584     v4rhosigmalapl2[13] = 0.0e0;
7585 
7586   if(v4rho4 != NULL && (p->info->flags & XC_FLAGS_NEEDS_LAPLACIAN) && (p->info->flags & XC_FLAGS_HAVE_LXC))
7587     v4rhosigmalapl2[14] = 0.0e0;
7588 
7589   if(v4rho4 != NULL && (p->info->flags & XC_FLAGS_NEEDS_LAPLACIAN) && (p->info->flags & XC_FLAGS_HAVE_LXC))
7590     v4rhosigmalapl2[15] = 0.0e0;
7591 
7592   if(v4rho4 != NULL && (p->info->flags & XC_FLAGS_NEEDS_LAPLACIAN) && (p->info->flags & XC_FLAGS_HAVE_LXC))
7593     v4rhosigmalapl2[16] = 0.0e0;
7594 
7595   t13815 = -0.6e1 * t3265 * t1326 * t302 * t251 + 0.2e1 * t231 * t4700 + 0.4e1 * t1147 * t879 + 0.2e1 * t1299 * t769 + 0.4e1 * t337 * t3270 + 0.4e1 * t337 * t3278 + 0.4e1 * t337 * t3273 + 0.4e1 * t874 * t1151 - 0.6e1 * t293 * t3685 + 0.4e1 * t293 * t3688 + 0.4e1 * t104 * t2584 * t1172 - 0.6e1 * t104 * t3684 * t794 - 0.6e1 * t231 * t4693 + 0.4e1 * t104 * t878 * t3339 + 0.4e1 * t231 * t4696 + 0.2e1 * t104 * t11037 * t302 + 0.2e1 * t104 * t3692 * t794 - 0.2e1 * t337 * t3340;
7596   t13816 = t634 * t4745;
7597   t13837 = t110 * t4681;
7598   t13865 = 0.16615495624729559964e1 * t777 * t3295 * t1298 + 0.16615495624729559964e1 * t777 * t1157 * t3672 - 0.35409739445157315668e-1 * t772 * t13837 * t230 - 0.35409739445157315668e-1 * t772 * t10901 * t292 - 0.70819478890314631336e-1 * t772 * t2597 * t1146 - 0.70819478890314631336e-1 * t772 * t882 * t3251 + 0.33230991249459119928e1 * t777 * t3912 * t1146 + 0.33230991249459119928e1 * t777 * t1381 * t3251 + 0.53114609167735973502e-1 * t2314 * t3696 * t763 - 0.76217237139506171188e1 * t659 * t1322 * t763 + 0.16615495624729559964e1 * t777 * t778 * t4681;
7599   t13876 = t3329 * t9844;
7600   t13879 = t1617 * t1307;
7601   t13881 = t9909 * t3281;
7602   t13886 = t9890 * t3281;
7603   t13889 = t6891 * t13879;
7604   t13895 = t1983 * t1617 * t1298;
7605   t13898 = t1146 * t230;
7606   t13899 = t3329 * t13898;
7607   t13902 = -0.35409739445157315668e-1 * t772 * t3712 * t763 - 0.12461621718547169973e1 * t2318 * t3295 * t1307 - 0.22865171141851851357e2 * t3917 * t3321 - 0.22865171141851851356e2 * t3917 * t3324 + 0.20977047095244633368e3 * t3328 * t13876 + 0.31465570642866950052e3 * t1983 * t13879 * t13881 - 0.24056046973484009303e4 * t6870 * t5904 * t1307 * t13886 + 0.20977047095244633367e3 * t13889 * t3330 - 0.11432585570925925678e2 * t3300 * t3727 + 0.10488523547622316684e3 * t13895 * t3330 + 0.20977047095244633368e3 * t3328 * t13899;
7608   t13904 = t6903 * t3299;
7609   t13913 = t336 * t1146;
7610   t13920 = t4681 * t661;
7611   t13939 = 0.11432585570925925678e2 * t13904 * t3709 - 0.24923243437094339946e1 * t2318 * t1157 * t10929 + 0.10622921833547194700e0 * t2314 * t882 * t13898 - 0.24923243437094339946e1 * t2318 * t778 * t13913 - 0.15243447427901234238e2 * t659 * t896 * t9844 - 0.76217237139506171188e1 * t659 * t13920 * t790 - 0.76217237139506171188e1 * t659 * t10937 * t1168 - 0.76217237139506171188e1 * t659 * t3726 * t3281 - 0.76217237139506171188e1 * t659 * t3726 * t3093 - 0.15243447427901234238e2 * t659 * t2620 * t4734 - 0.15243447427901234238e2 * t659 * t896 * t13898;
7612   t13940 = t106 * t3251;
7613   t13956 = t1298 * t292;
7614   t13966 = t1307 * t292;
7615   t13971 = t6763 * t4672 * t224;
7616   t13974 = t6769 * t4672 * t224;
7617   t13979 = t12323 * t42 * t4672 * t1542;
7618   t13983 = t4678 * t224;
7619   t13985 = 0.41488172174718352162e-4 * t13971 - 0.10045237968439683665e-3 * t13974 - 0.18081428343191430598e-3 * t4367 + 0.21936730132601737540e-2 * t13979 + 0.23691668543209876543e-1 * t4370 + 0.12160912442422783363e-3 * t4373 + 0.11260104113354429039e-4 * t13983;
7620   t13993 = -0.15243447427901234238e2 * t659 * t896 * t13940 + 0.10488523547622316684e3 * t1984 * t3734 * t12423 - 0.15243447427901234237e2 * t1967 * t1322 * t3281 - 0.11432585570925925678e2 * t1967 * t1322 * t3093 + 0.53114609167735973502e-1 * t2314 * t3712 * t3281 - 0.12461621718547169973e1 * t2318 * t778 * t13956 - 0.13278652291933993376e0 * t7507 * t3696 * t3281 + 0.10622921833547194700e0 * t2314 * t882 * t9844 + 0.24923243437094339947e1 * t7523 * t778 * t13966 + 0.16615495624729559964e1 * t240 * t61 * t13985 * t247 + 0.70819478890314631335e-1 * t54 * t236 * t13985;
7621   t14001 = t337 * t1937;
7622   t14019 = 0.2e1 * t104 * t13816 * t251 - t1299 * t795 - t3673 * t303 - 0.2e1 * t3252 * t347 - t4682 * t252 - 0.2e1 * t1147 * t901 + 0.2e1 * t764 * t1304 - 0.2e1 * t874 * t1173 - t104 * t234 * (t13865 + t13902 + t13939 + t13993) - 0.12e2 * t3265 * t3266 * t900 - 0.12e2 * t14001 * t3267 - t231 * t4746 - t293 * t3742 - t764 * t1327 - 0.12e2 * t3265 * t346 * t1172 * t251 + 0.24e2 * t9939 * t1303 * t302 * t251 + 0.2e1 * t293 * t3693 + t25 * t13985 * t115;
7623   if(v4rho4 != NULL && (p->info->flags & XC_FLAGS_NEEDS_LAPLACIAN) && (p->info->flags & XC_FLAGS_HAVE_LXC))
7624     v4rhosigmalapl2[17] = -t13758 / 0.2e1 - t262 * t736 * t4748 * t208 / 0.2e1 - 0.3e1 / 0.8e1 * t262 * t286 * (t13815 + t14019);
7625 
7626   t14024 = t2206 * t4835;
7627   t14037 = -0.16595268869887340864e-3 * t13507 + 0.40180951873758734660e-3 * t13510 + 0.72325713372765722388e-3 * t4284 - 0.87746920530406950156e-2 * t13515 - 0.94766674172839506168e-1 * t4287 - 0.48643649769691133449e-3 * t4290 - 0.45040416453417716157e-4 * t13519;
7628   t14056 = t1615 * t1617 * t1335;
7629   t14069 = t1596 * t489 * t1104;
7630   t14091 = 0.10488523547622316684e3 * t3429 * t13607 + 0.10488523547622316684e3 * t14056 * t3209 + 0.10488523547622316684e3 * t13156 * t3834 + 0.10488523547622316684e3 * t10124 * t4822 + 0.10488523547622316684e3 * t3429 * t13610 + 0.10488523547622316684e3 * t3429 * t3208 * t9493 - 0.11432585570925925678e2 * t14069 * t942 - 0.11432585570925925678e2 * t11190 * t1202 - 0.11432585570925925678e2 * t3807 * t3425 - 0.15243447427901234237e2 * t3807 * t3432 - 0.11432585570925925678e2 * t3807 * t3435 - 0.11432585570925925678e2 * t3807 * t3422 - 0.11432585570925925678e2 * t3179 * t3828 - 0.13278652291933993376e0 * t54 * t5954 * t3792 * t3160 + 0.24923243437094339947e1 * t5894 * t168 * t4785;
7631   t14101 = t1181 * t314;
7632   t14129 = t1335 * t269;
7633   t14133 = t4755 * t492;
7634   t14140 = 0.70819478890314631335e-1 * t54 * t162 * t14037 - 0.12461621718547169973e1 * t2137 * t1115 * t11124 + 0.53114609167735973502e-1 * t2133 * t3407 * t3788 - 0.12461621718547169973e1 * t2137 * t711 * t14101 + 0.53114609167735973502e-1 * t2133 * t2699 * t3164 + 0.53114609167735973502e-1 * t2133 * t927 * t9489 + 0.53114609167735973502e-1 * t2133 * t927 * t9493 - 0.76217237139506171188e1 * t490 * t2723 * t3164 - 0.76217237139506171188e1 * t490 * t941 * t9493 - 0.76217237139506171188e1 * t490 * t941 * t9489 - 0.76217237139506171188e1 * t490 * t2723 * t4654 + 0.53114609167735973502e-1 * t2133 * t3813 * t3160 - 0.12461621718547169973e1 * t2137 * t711 * t14129 - 0.76217237139506171188e1 * t490 * t14133 * t723 - 0.76217237139506171188e1 * t490 * t11157 * t1126;
7635   t14151 = t355 * t1104;
7636   t14188 = -0.76217237139506171188e1 * t490 * t3827 * t3160 - 0.76217237139506171188e1 * t490 * t3827 * t2981 + 0.53114609167735973502e-1 * t2133 * t927 * t13606 - 0.12461621718547169973e1 * t2137 * t711 * t14151 - 0.12461621718547169973e1 * t2137 * t3174 * t3792 - 0.12461621718547169973e1 * t2137 * t1115 * t11144 - 0.76217237139506171188e1 * t490 * t941 * t13606 - 0.76217237139506171188e1 * t490 * t941 * t13669 - 0.76217237139506171188e1 * t490 * t10078 * t1357 - 0.76217237139506171188e1 * t490 * t3421 * t3788 - 0.76217237139506171188e1 * t490 * t3421 * t3628 + 0.16615495624729559964e1 * t710 * t4794 * t918 - 0.35409739445157315668e-1 * t705 * t3407 * t816 - 0.35409739445157315668e-1 * t705 * t2699 * t1104 - 0.35409739445157315668e-1 * t705 * t927 * t3130;
7637   t14201 = t3164 * t156;
7638   t14214 = t66 * t4755;
7639   t14240 = 0.16615495624729559964e1 * t710 * t3130 * t179 * t355 + 0.20977047095244633367e3 * t11197 * t2727 * t4658 * t156 + 0.11432585570925925678e2 * t13638 * t941 * t1357 * t156 + 0.31465570642866950052e3 * t3429 * t9553 * t14201 - 0.24056046973484009303e4 * t10132 * t9568 * t14201 + 0.16615495624729559964e1 * t710 * t3174 * t1335 + 0.16615495624729559964e1 * t710 * t1115 * t3759 - 0.35409739445157315668e-1 * t705 * t14214 * t156 + 0.16615495624729559964e1 * t710 * t3802 * t1181 + 0.16615495624729559964e1 * t710 * t1346 * t3357 - 0.35409739445157315668e-1 * t705 * t11234 * t269 - 0.35409739445157315668e-1 * t705 * t3813 * t696 + 0.16615495624729559964e1 * t167 * t61 * t14037 * t179 - 0.35409739445157315668e-1 * t705 * t10033 * t314 + 0.16615495624729559964e1 * t710 * t711 * t4755;
7640   t14246 = t25 * t14037 * t71 - t356 * t3219 - t3358 * t325 + 0.2e1 * t52 * t923 * t3218 + 0.2e1 * t157 * t4775 - t4756 * t184 - t1182 * t844 - t697 * t1362 - t1336 * t728 - t1105 * t946 - t3131 * t366 - t52 * t160 * (t14091 + t14140 + t14188 + t14240) - t157 * t4832;
7641   t14272 = -0.6e1 * t3144 * t11298 * t279 - 0.6e1 * t3144 * t11302 * t279 + 0.24e2 * t9638 * t3773 * t7156 - t919 * t1131 + 0.2e1 * t817 * t1186 - t817 * t1206 - 0.6e1 * t12724 * t3774 + 0.2e1 * t270 * t3777 + 0.2e1 * t270 * t3780 - t270 * t3844 - t3760 * t280 + 0.2e1 * t315 * t3375 + 0.2e1 * t315 * t3378;
7642   t14287 = t1205 * t324;
7643   t14302 = t462 * t4831;
7644   t14306 = t356 * t1567;
7645   t14309 = -0.6e1 * t3144 * t1361 * t279 * t183 + 0.2e1 * t52 * t10217 * t324 - 0.6e1 * t3144 * t14287 * t183 + 0.2e1 * t52 * t14302 * t183 + 0.2e1 * t52 * t3784 * t727 + 0.2e1 * t1105 * t924 + 0.2e1 * t919 * t1109 + 0.2e1 * t1182 * t822 + 0.2e1 * t697 * t1340 - 0.6e1 * t14306 * t3146 + 0.2e1 * t356 * t3149 + 0.2e1 * t315 * t3383 + 0.2e1 * t356 * t3152;
7646   t14327 = t365 * t1130;
7647   t14341 = 0.2e1 * t52 * t11284 * t279 + 0.2e1 * t52 * t2686 * t1130 - 0.6e1 * t3144 * t14327 * t183 - 0.6e1 * t3144 * t3773 * t727 + 0.2e1 * t52 * t3382 * t843 + 0.2e1 * t1336 * t702 - 0.6e1 * t13536 * t3372 + 0.2e1 * t157 * t4772 + 0.2e1 * t157 * t4779 + 0.2e1 * t270 * t3785 - t315 * t3439 + 0.2e1 * t356 * t3157 - 0.6e1 * t9628 * t4769;
7648   if(v4rho4 != NULL && (p->info->flags & XC_FLAGS_NEEDS_LAPLACIAN) && (p->info->flags & XC_FLAGS_HAVE_LXC))
7649     v4rhosigmalapltau[0] = -t14024 / 0.2e1 - t262 * t678 * t4834 * t128 / 0.2e1 - 0.3e1 / 0.8e1 * t262 * t263 * (t14246 + t14272 + t14309 + t14341);
7650 
7651   if(v4rho4 != NULL && (p->info->flags & XC_FLAGS_NEEDS_LAPLACIAN) && (p->info->flags & XC_FLAGS_HAVE_LXC))
7652     v4rhosigmalapltau[1] = 0.0e0;
7653 
7654   if(v4rho4 != NULL && (p->info->flags & XC_FLAGS_NEEDS_LAPLACIAN) && (p->info->flags & XC_FLAGS_HAVE_LXC))
7655     v4rhosigmalapltau[2] = 0.0e0;
7656 
7657   if(v4rho4 != NULL && (p->info->flags & XC_FLAGS_NEEDS_LAPLACIAN) && (p->info->flags & XC_FLAGS_HAVE_LXC))
7658     v4rhosigmalapltau[3] = 0.0e0;
7659 
7660   if(v4rho4 != NULL && (p->info->flags & XC_FLAGS_NEEDS_LAPLACIAN) && (p->info->flags & XC_FLAGS_HAVE_LXC))
7661     v4rhosigmalapltau[4] = 0.0e0;
7662 
7663   if(v4rho4 != NULL && (p->info->flags & XC_FLAGS_NEEDS_LAPLACIAN) && (p->info->flags & XC_FLAGS_HAVE_LXC))
7664     v4rhosigmalapltau[5] = 0.0e0;
7665 
7666   if(v4rho4 != NULL && (p->info->flags & XC_FLAGS_NEEDS_LAPLACIAN) && (p->info->flags & XC_FLAGS_HAVE_LXC))
7667     v4rhosigmalapltau[6] = 0.0e0;
7668 
7669   if(v4rho4 != NULL && (p->info->flags & XC_FLAGS_NEEDS_LAPLACIAN) && (p->info->flags & XC_FLAGS_HAVE_LXC))
7670     v4rhosigmalapltau[7] = 0.0e0;
7671 
7672   if(v4rho4 != NULL && (p->info->flags & XC_FLAGS_NEEDS_LAPLACIAN) && (p->info->flags & XC_FLAGS_HAVE_LXC))
7673     v4rhosigmalapltau[8] = 0.0e0;
7674 
7675   if(v4rho4 != NULL && (p->info->flags & XC_FLAGS_NEEDS_LAPLACIAN) && (p->info->flags & XC_FLAGS_HAVE_LXC))
7676     v4rhosigmalapltau[9] = 0.0e0;
7677 
7678   if(v4rho4 != NULL && (p->info->flags & XC_FLAGS_NEEDS_LAPLACIAN) && (p->info->flags & XC_FLAGS_HAVE_LXC))
7679     v4rhosigmalapltau[10] = 0.0e0;
7680 
7681   t14347 = t2206 * t4921;
7682   if(v4rho4 != NULL && (p->info->flags & XC_FLAGS_NEEDS_LAPLACIAN) && (p->info->flags & XC_FLAGS_HAVE_LXC))
7683     v4rhosigmalapltau[11] = -t262 * t736 * t4920 * t191 / 0.2e1 - t14347 / 0.2e1;
7684 
7685   if(v4rho4 != NULL && (p->info->flags & XC_FLAGS_NEEDS_LAPLACIAN) && (p->info->flags & XC_FLAGS_HAVE_LXC))
7686     v4rhosigmalapltau[12] = -t262 * t678 * t4834 * t203 / 0.2e1 - t14024 / 0.2e1;
7687 
7688   if(v4rho4 != NULL && (p->info->flags & XC_FLAGS_NEEDS_LAPLACIAN) && (p->info->flags & XC_FLAGS_HAVE_LXC))
7689     v4rhosigmalapltau[13] = 0.0e0;
7690 
7691   if(v4rho4 != NULL && (p->info->flags & XC_FLAGS_NEEDS_LAPLACIAN) && (p->info->flags & XC_FLAGS_HAVE_LXC))
7692     v4rhosigmalapltau[14] = 0.0e0;
7693 
7694   if(v4rho4 != NULL && (p->info->flags & XC_FLAGS_NEEDS_LAPLACIAN) && (p->info->flags & XC_FLAGS_HAVE_LXC))
7695     v4rhosigmalapltau[15] = 0.0e0;
7696 
7697   if(v4rho4 != NULL && (p->info->flags & XC_FLAGS_NEEDS_LAPLACIAN) && (p->info->flags & XC_FLAGS_HAVE_LXC))
7698     v4rhosigmalapltau[16] = 0.0e0;
7699 
7700   if(v4rho4 != NULL && (p->info->flags & XC_FLAGS_NEEDS_LAPLACIAN) && (p->info->flags & XC_FLAGS_HAVE_LXC))
7701     v4rhosigmalapltau[17] = 0.0e0;
7702 
7703   if(v4rho4 != NULL && (p->info->flags & XC_FLAGS_NEEDS_LAPLACIAN) && (p->info->flags & XC_FLAGS_HAVE_LXC))
7704     v4rhosigmalapltau[18] = 0.0e0;
7705 
7706   if(v4rho4 != NULL && (p->info->flags & XC_FLAGS_NEEDS_LAPLACIAN) && (p->info->flags & XC_FLAGS_HAVE_LXC))
7707     v4rhosigmalapltau[19] = 0.0e0;
7708 
7709   if(v4rho4 != NULL && (p->info->flags & XC_FLAGS_NEEDS_LAPLACIAN) && (p->info->flags & XC_FLAGS_HAVE_LXC))
7710     v4rhosigmalapltau[20] = 0.0e0;
7711 
7712   if(v4rho4 != NULL && (p->info->flags & XC_FLAGS_NEEDS_LAPLACIAN) && (p->info->flags & XC_FLAGS_HAVE_LXC))
7713     v4rhosigmalapltau[21] = 0.0e0;
7714 
7715   if(v4rho4 != NULL && (p->info->flags & XC_FLAGS_NEEDS_LAPLACIAN) && (p->info->flags & XC_FLAGS_HAVE_LXC))
7716     v4rhosigmalapltau[22] = 0.0e0;
7717 
7718   t14368 = -0.16595268869887340864e-3 * t13971 + 0.40180951873758734660e-3 * t13974 + 0.72325713372765722388e-3 * t4367 - 0.87746920530406950156e-2 * t13979 - 0.94766674172839506168e-1 * t4370 - 0.48643649769691133449e-3 * t4373 - 0.45040416453417716157e-4 * t13983;
7719   t14391 = 0.2e1 * t104 * t976 * t3339 + t25 * t14368 * t115 - t874 * t1239 + 0.2e1 * t764 * t1375 - t764 * t1397 - 0.6e1 * t14001 * t3479 - t231 * t4918 + 0.2e1 * t293 * t3887 + 0.2e1 * t293 * t3895 - t293 * t3954 + 0.2e1 * t375 * t3273 + 0.2e1 * t375 * t3278 - t337 * t3546;
7720   t14404 = t110 * t4841;
7721   t14440 = 0.16615495624729559964e1 * t777 * t4880 * t971 - 0.35409739445157315668e-1 * t772 * t3923 * t763 + 0.16615495624729559964e1 * t777 * t3295 * t1370 + 0.16615495624729559964e1 * t777 * t1157 * t3869 - 0.35409739445157315668e-1 * t772 * t14404 * t230 + 0.16615495624729559964e1 * t777 * t3912 * t1214 + 0.16615495624729559964e1 * t777 * t1381 * t3464 - 0.35409739445157315668e-1 * t772 * t11437 * t292 + 0.16615495624729559964e1 * t777 * t3251 * t247 * t374 - 0.35409739445157315668e-1 * t772 * t10472 * t336 - 0.35409739445157315668e-1 * t772 * t3514 * t873 - 0.35409739445157315668e-1 * t772 * t2851 * t1146 - 0.35409739445157315668e-1 * t772 * t980 * t3251 + 0.16615495624729559964e1 * t777 * t778 * t4841 + 0.16615495624729559964e1 * t240 * t61 * t14368 * t247;
7722   t14441 = t374 * t1146;
7723   t14475 = t1370 * t292;
7724   t14479 = t4841 * t661;
7725   t14489 = -0.12461621718547169973e1 * t2318 * t778 * t14441 + 0.53114609167735973502e-1 * t2314 * t2851 * t3285 + 0.53114609167735973502e-1 * t2314 * t980 * t9844 + 0.53114609167735973502e-1 * t2314 * t980 * t9806 - 0.12461621718547169973e1 * t2318 * t3295 * t3902 - 0.12461621718547169973e1 * t2318 * t1157 * t11496 - 0.12461621718547169973e1 * t2318 * t1157 * t11500 - 0.76217237139506171188e1 * t659 * t3528 * t3730 - 0.76217237139506171188e1 * t659 * t2875 * t3285 - 0.76217237139506171188e1 * t659 * t994 * t9806 - 0.76217237139506171188e1 * t659 * t994 * t9844 - 0.12461621718547169973e1 * t2318 * t778 * t14475 - 0.76217237139506171188e1 * t659 * t14479 * t790 - 0.76217237139506171188e1 * t659 * t11516 * t1168 - 0.76217237139506171188e1 * t659 * t3937 * t3281;
7726   t14500 = t1214 * t336;
7727   t14525 = t3285 * t230;
7728   t14540 = -0.76217237139506171188e1 * t659 * t3937 * t3093 + 0.53114609167735973502e-1 * t2314 * t3923 * t3281 + 0.53114609167735973502e-1 * t2314 * t3514 * t3898 - 0.12461621718547169973e1 * t2318 * t778 * t14500 + 0.53114609167735973502e-1 * t2314 * t980 * t13898 - 0.76217237139506171188e1 * t659 * t2875 * t4734 - 0.76217237139506171188e1 * t659 * t994 * t13898 - 0.76217237139506171188e1 * t659 * t994 * t13940 - 0.76217237139506171188e1 * t659 * t10366 * t1392 - 0.76217237139506171188e1 * t659 * t3528 * t3898 + 0.70819478890314631335e-1 * t54 * t236 * t14368 + 0.31465570642866950052e3 * t3536 * t9909 * t14525 - 0.24056046973484009303e4 * t10460 * t9890 * t14525 + 0.11432585570925925678e2 * t13904 * t994 * t1392 * t230 + 0.20977047095244633367e3 * t11405 * t2879 * t4738 * t230;
7729   t14542 = t1966 * t489 * t1146;
7730   t14567 = t1983 * t1617 * t1370;
7731   t14579 = -0.11432585570925925678e2 * t14542 * t995 - 0.11432585570925925678e2 * t11398 * t1235 - 0.11432585570925925678e2 * t3917 * t3532 - 0.15243447427901234237e2 * t3917 * t3539 - 0.11432585570925925678e2 * t3917 * t3542 - 0.11432585570925925678e2 * t3917 * t3529 - 0.11432585570925925678e2 * t3300 * t3938 - 0.13278652291933993376e0 * t54 * t6918 * t3902 * t3281 + 0.24923243437094339947e1 * t6865 * t241 * t4871 + 0.10488523547622316684e3 * t3536 * t13899 + 0.10488523547622316684e3 * t14567 * t3330 + 0.10488523547622316684e3 * t13355 * t3944 + 0.10488523547622316684e3 * t10452 * t4908 + 0.10488523547622316684e3 * t3536 * t13876 + 0.10488523547622316684e3 * t3536 * t3329 * t9806;
7732   t14590 = t375 * t1937;
7733   t14604 = t1238 * t346;
7734   t14608 = t384 * t1172;
7735   t14616 = -t104 * t234 * (t14440 + t14489 + t14540 + t14579) + 0.2e1 * t1215 * t879 + 0.2e1 * t1147 * t977 - 0.6e1 * t12999 * t3884 - 0.6e1 * t14590 * t3267 - 0.6e1 * t9918 * t4855 - 0.6e1 * t3265 * t11384 * t302 - 0.6e1 * t3265 * t11560 * t302 - 0.6e1 * t3265 * t3883 * t794 - 0.6e1 * t3265 * t14604 * t251 - 0.6e1 * t3265 * t14608 * t251 + 0.2e1 * t337 * t3485 + 0.2e1 * t874 * t1219;
7736   t14644 = -0.6e1 * t3265 * t1396 * t302 * t251 + 0.2e1 * t104 * t2838 * t1172 + 0.24e2 * t9939 * t3883 * t7577 - t1147 * t999 + 0.2e1 * t972 * t1151 - t972 * t1173 + 0.2e1 * t231 * t4861 + 0.2e1 * t293 * t3890 - t3252 * t385 + 0.2e1 * t375 * t3270 - t375 * t3340 + 0.2e1 * t337 * t3482 + 0.2e1 * t337 * t3490;
7737   t14668 = t634 * t4917;
7738   t14672 = 0.2e1 * t104 * t10495 * t346 + 0.2e1 * t104 * t11605 * t302 + 0.2e1 * t104 * t14668 * t251 + 0.2e1 * t104 * t3489 * t900 + 0.2e1 * t104 * t3894 * t794 - t1215 * t901 + 0.2e1 * t1371 * t769 - t1371 * t795 + 0.2e1 * t231 * t4858 + 0.2e1 * t231 * t4865 - t4842 * t252 - t3870 * t303 - t3465 * t347;
7739   if(v4rho4 != NULL && (p->info->flags & XC_FLAGS_NEEDS_LAPLACIAN) && (p->info->flags & XC_FLAGS_HAVE_LXC))
7740     v4rhosigmalapltau[23] = -t14347 / 0.2e1 - t262 * t736 * t4920 * t208 / 0.2e1 - 0.3e1 / 0.8e1 * t262 * t286 * (t14391 + t14616 + t14644 + t14672);
7741 
7742   t14678 = t2206 * t4994;
7743   t14726 = -0.12e2 * t14306 * t3372 - 0.12e2 * t3144 * t3371 * t945 - 0.12e2 * t3144 * t365 * t1205 * t183 + 0.24e2 * t9638 * t1410 * t279 * t183 - 0.6e1 * t3144 * t1433 * t279 * t183 - 0.2e1 * t1182 * t946 - t3972 * t280 - 0.2e1 * t3358 * t366 - t157 * t4991 - 0.2e1 * t356 * t3439 - t4928 * t184 - t1406 * t728 + 0.4e1 * t52 * t2686 * t1205 + 0.4e1 * t157 * t4942 + 0.4e1 * t52 * t923 * t3438 + 0.2e1 * t52 * t11802 * t279 + 0.2e1 * t157 * t4946 - 0.6e1 * t157 * t4939;
7744   t14735 = t66 * t4927;
7745   t14754 = t918 * t179;
7746   t14767 = 0.16615495624729559964e1 * t710 * t1115 * t3971 - 0.35409739445157315668e-1 * t705 * t14735 * t156 + 0.16615495624729559964e1 * t710 * t711 * t4927 - 0.35409739445157315668e-1 * t705 * t11776 * t269 - 0.35409739445157315668e-1 * t705 * t4012 * t696 + 0.16615495624729559964e1 * t710 * t3174 * t1405 - 0.70819478890314631336e-1 * t705 * t927 * t3357 + 0.33230991249459119928e1 * t710 * t14754 * t1181 + 0.33230991249459119928e1 * t710 * t4005 * t3357 - 0.76217237139506171188e1 * t490 * t1429 * t696 + 0.53114609167735973502e-1 * t2133 * t3995 * t696;
7747   t14789 = t156 * t1181;
7748   t14803 = -0.12461621718547169973e1 * t2137 * t3174 * t1414 - 0.70819478890314631336e-1 * t705 * t2699 * t1181 - 0.11432585570925925678e2 * t1597 * t1429 * t2981 + 0.53114609167735973502e-1 * t2133 * t4012 * t3160 - 0.76217237139506171188e1 * t490 * t4026 * t3160 - 0.76217237139506171188e1 * t490 * t4026 * t2981 - 0.15243447427901234238e2 * t490 * t2723 * t4980 - 0.15243447427901234238e2 * t490 * t941 * t14789 - 0.15243447427901234238e2 * t490 * t941 * t62 * t3357 + 0.10488523547622316684e3 * t1618 * t4034 * t12273 - 0.15243447427901234238e2 * t490 * t941 * t10106;
7749   t14805 = t1405 * t269;
7750   t14809 = t4927 * t492;
7751   t14822 = t355 * t1181;
7752   t14846 = 0.66381075479549363457e-3 * t13507 - 0.16072380749503493864e-2 * t13510 - 0.28930285349106288955e-2 * t4284 + 0.35098768212162780063e-1 * t13515 + 0.37906669669135802468e0 * t4287 + 0.19457459907876453379e-2 * t4290 + 0.18016166581367086462e-3 * t13519;
7753   t14851 = -0.12461621718547169973e1 * t2137 * t711 * t14805 - 0.76217237139506171188e1 * t490 * t14809 * t723 - 0.76217237139506171188e1 * t490 * t11732 * t1126 - 0.24923243437094339946e1 * t2137 * t1115 * t11703 + 0.10622921833547194700e0 * t2133 * t927 * t14789 - 0.24923243437094339946e1 * t2137 * t711 * t14822 - 0.15243447427901234237e2 * t1597 * t1429 * t3160 - 0.13278652291933993376e0 * t7124 * t3995 * t3160 + 0.10622921833547194700e0 * t2133 * t927 * t10106 + 0.24923243437094339947e1 * t7106 * t711 * t1414 * t269 + 0.16615495624729559964e1 * t167 * t61 * t14846 * t179;
7754   t14856 = t1615 * t1617 * t1405;
7755   t14865 = t1617 * t1414;
7756   t14866 = t1615 * t14865;
7757   t14870 = t5903 * t5904 * t1414;
7758   t14877 = t5914 * t14865;
7759   t14884 = 0.70819478890314631335e-1 * t54 * t162 * t14846 + 0.10488523547622316684e3 * t14856 * t3209 + 0.20977047095244633368e3 * t3429 * t3208 * t14789 + 0.20977047095244633368e3 * t3429 * t3208 * t10106 + 0.31465570642866950052e3 * t14866 * t13615 - 0.24056046973484009303e4 * t14870 * t13620 - 0.22865171141851851357e2 * t11658 * t3422 - 0.22865171141851851356e2 * t11658 * t3425 + 0.20977047095244633367e3 * t14877 * t3209 - 0.11432585570925925678e2 * t3179 * t4027 + 0.11432585570925925678e2 * t13638 * t4009;
7760   t14900 = t462 * t4990;
7761   t14920 = 0.2e1 * t270 * t3992 - 0.6e1 * t52 * t3983 * t727 - t52 * t160 * (t14767 + t14803 + t14851 + t14884) + 0.2e1 * t1406 * t702 - 0.2e1 * t919 * t1206 - 0.6e1 * t270 * t3984 + 0.4e1 * t270 * t3987 + 0.2e1 * t52 * t3991 * t727 + 0.2e1 * t52 * t14900 * t183 + 0.2e1 * t697 * t1411 - t270 * t4042 - t697 * t1434 + 0.4e1 * t919 * t1186 + 0.4e1 * t356 * t3375 + 0.4e1 * t1182 * t924 + 0.4e1 * t356 * t3383 + 0.4e1 * t356 * t3378 + t25 * t14846 * t71;
7762   if(v4rho4 != NULL && (p->info->flags & XC_FLAGS_HAVE_LXC))
7763     v4rhosigmatau2[0] = -t14678 / 0.2e1 - t262 * t678 * t4993 * t128 / 0.2e1 - 0.3e1 / 0.8e1 * t262 * t263 * (t14726 + t14920);
7764 
7765   if(v4rho4 != NULL && (p->info->flags & XC_FLAGS_HAVE_LXC))
7766     v4rhosigmatau2[1] = 0.0e0;
7767 
7768   if(v4rho4 != NULL && (p->info->flags & XC_FLAGS_HAVE_LXC))
7769     v4rhosigmatau2[2] = 0.0e0;
7770 
7771   if(v4rho4 != NULL && (p->info->flags & XC_FLAGS_HAVE_LXC))
7772     v4rhosigmatau2[3] = 0.0e0;
7773 
7774   if(v4rho4 != NULL && (p->info->flags & XC_FLAGS_HAVE_LXC))
7775     v4rhosigmatau2[4] = 0.0e0;
7776 
7777   if(v4rho4 != NULL && (p->info->flags & XC_FLAGS_HAVE_LXC))
7778     v4rhosigmatau2[5] = 0.0e0;
7779 
7780   if(v4rho4 != NULL && (p->info->flags & XC_FLAGS_HAVE_LXC))
7781     v4rhosigmatau2[6] = 0.0e0;
7782 
7783   if(v4rho4 != NULL && (p->info->flags & XC_FLAGS_HAVE_LXC))
7784     v4rhosigmatau2[7] = 0.0e0;
7785 
7786   t14925 = t2206 * t5067;
7787   if(v4rho4 != NULL && (p->info->flags & XC_FLAGS_HAVE_LXC))
7788     v4rhosigmatau2[8] = -t262 * t736 * t5066 * t191 / 0.2e1 - t14925 / 0.2e1;
7789 
7790   if(v4rho4 != NULL && (p->info->flags & XC_FLAGS_HAVE_LXC))
7791     v4rhosigmatau2[9] = -t262 * t678 * t4993 * t203 / 0.2e1 - t14678 / 0.2e1;
7792 
7793   if(v4rho4 != NULL && (p->info->flags & XC_FLAGS_HAVE_LXC))
7794     v4rhosigmatau2[10] = 0.0e0;
7795 
7796   if(v4rho4 != NULL && (p->info->flags & XC_FLAGS_HAVE_LXC))
7797     v4rhosigmatau2[11] = 0.0e0;
7798 
7799   if(v4rho4 != NULL && (p->info->flags & XC_FLAGS_HAVE_LXC))
7800     v4rhosigmatau2[12] = 0.0e0;
7801 
7802   if(v4rho4 != NULL && (p->info->flags & XC_FLAGS_HAVE_LXC))
7803     v4rhosigmatau2[13] = 0.0e0;
7804 
7805   if(v4rho4 != NULL && (p->info->flags & XC_FLAGS_HAVE_LXC))
7806     v4rhosigmatau2[14] = 0.0e0;
7807 
7808   if(v4rho4 != NULL && (p->info->flags & XC_FLAGS_HAVE_LXC))
7809     v4rhosigmatau2[15] = 0.0e0;
7810 
7811   if(v4rho4 != NULL && (p->info->flags & XC_FLAGS_HAVE_LXC))
7812     v4rhosigmatau2[16] = 0.0e0;
7813 
7814   t14980 = -0.12e2 * t3265 * t3478 * t998 - 0.12e2 * t3265 * t384 * t1238 * t251 + 0.24e2 * t9939 * t1447 * t302 * t251 - t293 * t4138 + 0.2e1 * t764 * t1448 - t764 * t1471 + 0.4e1 * t375 * t3482 + 0.4e1 * t375 * t3485 + 0.4e1 * t375 * t3490 - 0.2e1 * t1215 * t999 + 0.4e1 * t972 * t1219 + 0.4e1 * t1215 * t977 + 0.2e1 * t1443 * t769 - 0.2e1 * t3465 * t385 - 0.2e1 * t375 * t3546 + 0.4e1 * t104 * t2838 * t1238 + 0.4e1 * t104 * t976 * t3545 + 0.4e1 * t293 * t4083;
7815   t14995 = 0.66381075479549363457e-3 * t13971 - 0.16072380749503493864e-2 * t13974 - 0.28930285349106288955e-2 * t4367 + 0.35098768212162780063e-1 * t13979 + 0.37906669669135802468e0 * t4370 + 0.19457459907876453379e-2 * t4373 + 0.18016166581367086462e-3 * t13983;
7816   t15000 = t1214 * t230;
7817   t15004 = t374 * t1214;
7818   t15036 = 0.10622921833547194700e0 * t2314 * t980 * t15000 - 0.24923243437094339946e1 * t2318 * t778 * t15004 - 0.76217237139506171188e1 * t659 * t4122 * t3281 - 0.76217237139506171188e1 * t659 * t4122 * t3093 - 0.15243447427901234238e2 * t659 * t2875 * t5053 - 0.15243447427901234238e2 * t659 * t994 * t15000 - 0.15243447427901234238e2 * t659 * t994 * t106 * t3464 + 0.10488523547622316684e3 * t1984 * t4130 * t12423 - 0.15243447427901234237e2 * t1967 * t1466 * t3281 - 0.11432585570925925678e2 * t1967 * t1466 * t3093 + 0.53114609167735973502e-1 * t2314 * t4108 * t3281;
7819   t15037 = t1442 * t292;
7820   t15060 = t5000 * t661;
7821   t15067 = t110 * t5000;
7822   t15074 = -0.12461621718547169973e1 * t2318 * t778 * t15037 + 0.10622921833547194700e0 * t2314 * t980 * t10386 + 0.24923243437094339947e1 * t7523 * t778 * t1451 * t292 - 0.24923243437094339946e1 * t2318 * t1157 * t12006 - 0.12461621718547169973e1 * t2318 * t3295 * t1451 - 0.13278652291933993376e0 * t7507 * t4091 * t3281 - 0.15243447427901234238e2 * t659 * t994 * t10386 - 0.76217237139506171188e1 * t659 * t15060 * t790 - 0.76217237139506171188e1 * t659 * t11974 * t1168 - 0.35409739445157315668e-1 * t772 * t15067 * t230 + 0.33230991249459119928e1 * t777 * t4101 * t3464;
7823   t15085 = t971 * t247;
7824   t15111 = -0.35409739445157315668e-1 * t772 * t11951 * t292 - 0.70819478890314631336e-1 * t772 * t2851 * t1214 - 0.70819478890314631336e-1 * t772 * t980 * t3464 + 0.33230991249459119928e1 * t777 * t15085 * t1214 + 0.53114609167735973502e-1 * t2314 * t4091 * t763 - 0.76217237139506171188e1 * t659 * t1466 * t763 + 0.16615495624729559964e1 * t777 * t778 * t5000 - 0.35409739445157315668e-1 * t772 * t4108 * t763 + 0.16615495624729559964e1 * t777 * t3295 * t1442 + 0.16615495624729559964e1 * t777 * t1157 * t4067 + 0.16615495624729559964e1 * t240 * t61 * t14995 * t247;
7825   t15116 = t1983 * t1617 * t1442;
7826   t15125 = t1617 * t1451;
7827   t15126 = t1983 * t15125;
7828   t15130 = t6870 * t5904 * t1451;
7829   t15139 = t6891 * t15125;
7830   t15144 = 0.70819478890314631335e-1 * t54 * t236 * t14995 + 0.10488523547622316684e3 * t15116 * t3330 + 0.20977047095244633368e3 * t3536 * t3329 * t15000 + 0.20977047095244633368e3 * t3536 * t3329 * t10386 + 0.31465570642866950052e3 * t15126 * t13881 - 0.24056046973484009303e4 * t15130 * t13886 + 0.11432585570925925678e2 * t13904 * t4105 - 0.22865171141851851357e2 * t12045 * t3529 - 0.22865171141851851356e2 * t12045 * t3532 + 0.20977047095244633367e3 * t15139 * t3330 - 0.11432585570925925678e2 * t3300 * t4123;
7831   t15165 = t634 * t5063;
7832   t15175 = -0.6e1 * t104 * t4079 * t794 - 0.6e1 * t231 * t5012 - 0.6e1 * t293 * t4080 + t25 * t14995 * t115 - 0.2e1 * t972 * t1239 - t104 * t234 * (t15036 + t15074 + t15111 + t15144) - t231 * t5064 - t1443 * t795 - t4068 * t303 - t5001 * t252 + 0.4e1 * t231 * t5015 + 0.2e1 * t104 * t12094 * t302 + 0.2e1 * t293 * t4088 + 0.2e1 * t231 * t5019 + 0.2e1 * t104 * t4087 * t794 + 0.2e1 * t104 * t15165 * t251 - 0.12e2 * t14590 * t3479 - 0.6e1 * t3265 * t1470 * t302 * t251;
7833   if(v4rho4 != NULL && (p->info->flags & XC_FLAGS_HAVE_LXC))
7834     v4rhosigmatau2[17] = -t14925 / 0.2e1 - t262 * t736 * t5066 * t208 / 0.2e1 - 0.3e1 / 0.8e1 * t262 * t286 * (t14980 + t15175);
7835 
7836   t15180 = t2206 * t5135;
7837   t15187 = t5814 * t5070 * t150;
7838   t15190 = t5820 * t5070 * t150;
7839   t15195 = t12134 * t42 * t5070 * t1542;
7840   t15199 = t5076 * t150;
7841   t15201 = 0.82976344349436704320e-4 * t15187 - 0.20090475936879367330e-3 * t15190 - 0.30135713905319050994e-3 * t4593 + 0.43873460265203475079e-2 * t15195 + 0.39486114238683127572e-1 * t4596 + 0.20268187404037972270e-3 * t4599 + 0.22520208226708858078e-4 * t15199;
7842   t15226 = t5871 * t5088;
7843   t15235 = t324 * t1282;
7844   t15246 = t462 * t5131;
7845   t15250 = t174 * t816;
7846   t15257 = t5095 * t5908;
7847   t15267 = t5079 * t492;
7848   t15283 = t1254 * t156;
7849   t15287 = t314 * t1254;
7850   t15294 = t66 * t5079;
7851   t15298 = 0.31465570642866950052e3 * t1618 * t3632 * t15250 + 0.31465570642866950052e3 * t1618 * t5123 * t723 - 0.24056046973484009303e4 * t5905 * t15257 * t12238 - 0.34297756712777777034e2 * t1597 * t1278 * t3628 + 0.20977047095244633367e3 * t5915 * t5123 * t2986 - 0.76217237139506171188e1 * t490 * t15267 * t723 - 0.22865171141851851357e2 * t490 * t10570 * t1357 - 0.22865171141851851357e2 * t490 * t3624 * t3788 - 0.22865171141851851357e2 * t490 * t3624 * t3628 + 0.11432585570925925678e2 * t5940 * t5109 * t723 + 0.15934382750320792050e0 * t2133 * t825 * t15283 - 0.37384865155641509919e1 * t2137 * t711 * t15287 - 0.22865171141851851356e2 * t490 * t1278 * t816 - 0.35409739445157315668e-1 * t705 * t15294 * t156;
7852   t15320 = t66 * t5095;
7853   t15341 = 0.16615495624729559964e1 * t710 * t711 * t5079 - 0.37384865155641509919e1 * t2137 * t5234 * t816 - 0.10622921833547194700e0 * t705 * t2437 * t1254 - 0.10622921833547194700e0 * t705 * t825 * t3570 + 0.49846486874188679892e1 * t710 * t3802 * t1254 + 0.49846486874188679892e1 * t710 * t1346 * t3570 - 0.15243447427901234237e2 * t1597 * t5109 * t156 - 0.13278652291933993376e0 * t7124 * t15320 * t156 + 0.15934382750320792051e0 * t2133 * t3594 * t816 + 0.24923243437094339947e1 * t7106 * t711 * t5095 + 0.16615495624729559964e1 * t167 * t61 * t15201 * t179 + 0.70819478890314631335e-1 * t54 * t162 * t15201 + 0.31465570642866950052e3 * t13629 * t3834 - 0.34297756712777777034e2 * t3807 * t3625;
7854   t15345 = -0.3e1 * t315 * t3640 - 0.6e1 * t157 * t5089 + 0.24e2 * t52 * t15226 * t183 - 0.18e2 * t52 * t3582 * t843 + 0.6e1 * t157 * t5092 - 0.18e2 * t3144 * t15235 * t183 + 0.6e1 * t52 * t2424 * t1282 + 0.6e1 * t52 * t821 * t3639 - t157 * t5132 + 0.2e1 * t52 * t15246 * t183 - t52 * t160 * (t15298 + t15341);
7855   if(v4rho4 != NULL && (p->info->flags & XC_FLAGS_NEEDS_LAPLACIAN) && (p->info->flags & XC_FLAGS_HAVE_LXC))
7856     v4rholapl3[0] = -t15180 / 0.2e1 - t262 * t678 * t5134 * t128 / 0.2e1 - 0.3e1 / 0.8e1 * t262 * t263 * (t25 * t15201 * t71 + 0.6e1 * t1255 * t822 - 0.3e1 * t1255 * t844 + 0.6e1 * t817 * t1260 - 0.3e1 * t817 * t1283 - t5080 * t184 - 0.18e2 * t315 * t3583 + 0.12e2 * t315 * t3586 + 0.6e1 * t315 * t3591 - 0.3e1 * t3571 * t325 + t15345);
7857 
7858   if(v4rho4 != NULL && (p->info->flags & XC_FLAGS_NEEDS_LAPLACIAN) && (p->info->flags & XC_FLAGS_HAVE_LXC))
7859     v4rholapl3[1] = 0.0e0;
7860 
7861   if(v4rho4 != NULL && (p->info->flags & XC_FLAGS_NEEDS_LAPLACIAN) && (p->info->flags & XC_FLAGS_HAVE_LXC))
7862     v4rholapl3[2] = 0.0e0;
7863 
7864   t15350 = t2206 * t5203;
7865   if(v4rho4 != NULL && (p->info->flags & XC_FLAGS_NEEDS_LAPLACIAN) && (p->info->flags & XC_FLAGS_HAVE_LXC))
7866     v4rholapl3[3] = -t262 * t736 * t5202 * t191 / 0.2e1 - t15350 / 0.2e1;
7867 
7868   if(v4rho4 != NULL && (p->info->flags & XC_FLAGS_NEEDS_LAPLACIAN) && (p->info->flags & XC_FLAGS_HAVE_LXC))
7869     v4rholapl3[4] = -t262 * t678 * t5134 * t203 / 0.2e1 - t15180 / 0.2e1;
7870 
7871   if(v4rho4 != NULL && (p->info->flags & XC_FLAGS_NEEDS_LAPLACIAN) && (p->info->flags & XC_FLAGS_HAVE_LXC))
7872     v4rholapl3[5] = 0.0e0;
7873 
7874   if(v4rho4 != NULL && (p->info->flags & XC_FLAGS_NEEDS_LAPLACIAN) && (p->info->flags & XC_FLAGS_HAVE_LXC))
7875     v4rholapl3[6] = 0.0e0;
7876 
7877   t15365 = t6763 * t5138 * t224;
7878   t15368 = t6769 * t5138 * t224;
7879   t15373 = t12323 * t42 * t5138 * t1542;
7880   t15377 = t5144 * t224;
7881   t15379 = 0.82976344349436704320e-4 * t15365 - 0.20090475936879367330e-3 * t15368 - 0.30135713905319050994e-3 * t4673 + 0.43873460265203475079e-2 * t15373 + 0.39486114238683127572e-1 * t4676 + 0.20268187404037972270e-3 * t4679 + 0.22520208226708858078e-4 * t15377;
7882   t15404 = t6818 * t5156;
7883   t15413 = t346 * t1326;
7884   t15424 = t634 * t5199;
7885   t15451 = t110 * t5147;
7886   t15464 = t110 * t5163;
7887   t15471 = 0.70819478890314631335e-1 * t54 * t236 * t15379 + 0.16615495624729559964e1 * t240 * t61 * t15379 * t247 - 0.34297756712777777034e2 * t3917 * t3727 + 0.31465570642866950052e3 * t13895 * t3944 + 0.49846486874188679892e1 * t777 * t3912 * t1298 + 0.49846486874188679892e1 * t777 * t1381 * t3672 - 0.22865171141851851356e2 * t659 * t1322 * t873 - 0.15243447427901234237e2 * t1967 * t5177 * t230 - 0.35409739445157315668e-1 * t772 * t15451 * t230 + 0.16615495624729559964e1 * t777 * t778 * t5147 - 0.10622921833547194700e0 * t772 * t2597 * t1298 - 0.10622921833547194700e0 * t772 * t882 * t3672 - 0.13278652291933993376e0 * t7507 * t15464 * t230 + 0.15934382750320792051e0 * t2314 * t3696 * t873;
7888   t15478 = t242 * t873;
7889   t15485 = t5163 * t6874;
7890   t15489 = t336 * t1298;
7891   t15502 = t1298 * t230;
7892   t15506 = t5147 * t661;
7893   t15519 = 0.24923243437094339947e1 * t7523 * t778 * t5163 - 0.37384865155641509919e1 * t2318 * t5310 * t873 + 0.31465570642866950052e3 * t1984 * t3734 * t15478 + 0.31465570642866950052e3 * t1984 * t5191 * t790 - 0.24056046973484009303e4 * t6871 * t15485 * t12432 - 0.37384865155641509919e1 * t2318 * t778 * t15489 - 0.34297756712777777034e2 * t1967 * t1322 * t3730 + 0.20977047095244633367e3 * t6892 * t5191 * t3098 + 0.11432585570925925678e2 * t6904 * t5177 * t790 + 0.15934382750320792050e0 * t2314 * t882 * t15502 - 0.76217237139506171188e1 * t659 * t15506 * t790 - 0.22865171141851851357e2 * t659 * t10937 * t1392 - 0.22865171141851851357e2 * t659 * t3726 * t3898 - 0.22865171141851851357e2 * t659 * t3726 * t3730;
7894   t15523 = -0.3e1 * t337 * t3742 - 0.6e1 * t231 * t5157 + 0.24e2 * t104 * t15404 * t251 - 0.18e2 * t104 * t3684 * t900 + 0.6e1 * t231 * t5160 - 0.18e2 * t3265 * t15413 * t251 + 0.6e1 * t104 * t2584 * t1326 + 0.6e1 * t104 * t878 * t3741 - t231 * t5200 + 0.2e1 * t104 * t15424 * t251 - t104 * t234 * (t15471 + t15519);
7895   if(v4rho4 != NULL && (p->info->flags & XC_FLAGS_NEEDS_LAPLACIAN) && (p->info->flags & XC_FLAGS_HAVE_LXC))
7896     v4rholapl3[7] = -t15350 / 0.2e1 - t262 * t736 * t5202 * t208 / 0.2e1 - 0.3e1 / 0.8e1 * t262 * t286 * (t25 * t15379 * t115 + 0.6e1 * t1299 * t879 - 0.3e1 * t1299 * t901 + 0.6e1 * t874 * t1304 - 0.3e1 * t874 * t1327 - t5148 * t252 - 0.18e2 * t337 * t3685 + 0.12e2 * t337 * t3688 + 0.6e1 * t337 * t3693 - 0.3e1 * t3673 * t347 + t15523);
7897 
7898   t15528 = t2206 * t5279;
7899   t15550 = t365 * t1259;
7900   t15559 = t462 * t5275;
7901   t15566 = t365 * t1282;
7902   t15573 = t1361 * t324;
7903   t15577 = 0.4e1 * t315 * t3785 + 0.4e1 * t315 * t3780 - 0.2e1 * t3760 * t325 + 0.2e1 * t919 * t1260 + 0.4e1 * t315 * t3777 + 0.4e1 * t817 * t1340 + 0.2e1 * t1255 * t924 - t356 * t3640 - t919 * t1283 + 0.24e2 * t9638 * t15550 * t183 - 0.12e2 * t13536 * t3774 + 0.2e1 * t52 * t923 * t3639 + 0.2e1 * t52 * t15559 * t183 - t5210 * t184 - 0.2e1 * t1336 * t844 - 0.6e1 * t3144 * t15566 * t183 - 0.12e2 * t3144 * t3773 * t843 - 0.12e2 * t3144 * t15573 * t183;
7904   t15579 = t1263 * t156;
7905   t15586 = t355 * t1263;
7906   t15609 = t5209 * t492;
7907   t15616 = -0.13278652291933993376e0 * t7124 * t927 * t15579 + 0.10622921833547194700e0 * t2133 * t927 * t10595 + 0.24923243437094339947e1 * t7106 * t711 * t15586 - 0.24923243437094339946e1 * t2137 * t1346 * t11124 - 0.15243447427901234238e2 * t490 * t941 * t10595 - 0.76217237139506171188e1 * t490 * t2723 * t5271 - 0.76217237139506171188e1 * t490 * t941 * t15283 - 0.76217237139506171188e1 * t490 * t941 * t62 * t3570 - 0.15243447427901234237e2 * t1597 * t1278 * t13111 - 0.76217237139506171188e1 * t490 * t15609 * t723 - 0.15243447427901234238e2 * t490 * t11157 * t1357;
7908   t15629 = t1335 * t314;
7909   t15636 = t355 * t1254;
7910   t15646 = t66 * t5209;
7911   t15653 = -0.15243447427901234238e2 * t490 * t3827 * t3788 - 0.15243447427901234238e2 * t490 * t3827 * t3628 + 0.10488523547622316684e3 * t1618 * t8264 * t5264 + 0.10622921833547194700e0 * t2133 * t3813 * t3788 - 0.24923243437094339946e1 * t2137 * t711 * t15629 + 0.53114609167735973502e-1 * t2133 * t927 * t15283 - 0.12461621718547169973e1 * t2137 * t711 * t15636 - 0.11432585570925925678e2 * t1597 * t1278 * t4030 + 0.33230991249459119928e1 * t710 * t1346 * t3759 - 0.35409739445157315668e-1 * t705 * t15646 * t156 - 0.12461621718547169973e1 * t2137 * t5234 * t918;
7912   t15677 = t5939 * t489 * t1263;
7913   t15689 = -0.70819478890314631336e-1 * t705 * t11234 * t314 - 0.70819478890314631336e-1 * t705 * t3813 * t816 - 0.35409739445157315668e-1 * t705 * t2699 * t1254 + 0.53114609167735973502e-1 * t2133 * t2699 * t1263 - 0.76217237139506171188e1 * t490 * t2723 * t1263 + 0.16615495624729559964e1 * t710 * t711 * t5209 + 0.33230991249459119928e1 * t710 * t3802 * t1335 + 0.11432585570925925678e2 * t15677 * t942 + 0.31465570642866950052e3 * t3429 * t9553 * t15579 + 0.20977047095244633368e3 * t3429 * t3208 * t10595 - 0.24056046973484009303e4 * t10132 * t9568 * t15579;
7914   t15694 = t1596 * t489 * t1254;
7915   t15722 = -0.33190537739774681727e-3 * t15187 + 0.80361903747517469318e-3 * t15190 + 0.12054285562127620398e-2 * t4593 - 0.17549384106081390032e-1 * t15195 - 0.15794445695473251028e0 * t4596 - 0.81072749616151889080e-3 * t4599 - 0.90080832906835432311e-4 * t15199;
7916   t15730 = 0.10488523547622316684e3 * t3429 * t3208 * t15283 - 0.11432585570925925678e2 * t15694 * t942 - 0.22865171141851851356e2 * t3807 * t3840 + 0.20977047095244633367e3 * t13623 * t13148 - 0.22865171141851851357e2 * t3807 * t3828 + 0.20977047095244633368e3 * t14056 * t3834 - 0.35409739445157315668e-1 * t705 * t927 * t3570 + 0.16615495624729559964e1 * t710 * t3570 * t179 * t355 + 0.16615495624729559964e1 * t710 * t5244 * t918 + 0.70819478890314631335e-1 * t54 * t162 * t15722 + 0.16615495624729559964e1 * t167 * t61 * t15722 * t179;
7917   t15769 = -t1255 * t946 - t52 * t160 * (t15616 + t15653 + t15689 + t15730) - t3571 * t366 - 0.2e1 * t315 * t3844 + t25 * t15722 * t71 + 0.2e1 * t157 * t5228 + 0.4e1 * t52 * t3784 * t843 + 0.4e1 * t1336 * t822 + 0.2e1 * t52 * t2686 * t1282 + 0.2e1 * t356 * t3591 + 0.4e1 * t356 * t3586 - 0.6e1 * t356 * t3583 - 0.2e1 * t817 * t1362 - 0.6e1 * t52 * t8379 * t1259 + 0.4e1 * t52 * t11284 * t324 + 0.4e1 * t157 * t5225 - 0.6e1 * t157 * t5222 - t157 * t5276;
7918   if(v4rho4 != NULL && (p->info->flags & XC_FLAGS_NEEDS_LAPLACIAN) && (p->info->flags & XC_FLAGS_HAVE_LXC))
7919     v4rholapl2tau[0] = -t15528 / 0.2e1 - t262 * t678 * t5278 * t128 / 0.2e1 - 0.3e1 / 0.8e1 * t262 * t263 * (t15577 + t15769);
7920 
7921   if(v4rho4 != NULL && (p->info->flags & XC_FLAGS_NEEDS_LAPLACIAN) && (p->info->flags & XC_FLAGS_HAVE_LXC))
7922     v4rholapl2tau[1] = 0.0e0;
7923 
7924   if(v4rho4 != NULL && (p->info->flags & XC_FLAGS_NEEDS_LAPLACIAN) && (p->info->flags & XC_FLAGS_HAVE_LXC))
7925     v4rholapl2tau[2] = 0.0e0;
7926 
7927   if(v4rho4 != NULL && (p->info->flags & XC_FLAGS_NEEDS_LAPLACIAN) && (p->info->flags & XC_FLAGS_HAVE_LXC))
7928     v4rholapl2tau[3] = 0.0e0;
7929 
7930   if(v4rho4 != NULL && (p->info->flags & XC_FLAGS_NEEDS_LAPLACIAN) && (p->info->flags & XC_FLAGS_HAVE_LXC))
7931     v4rholapl2tau[4] = 0.0e0;
7932 
7933   t15774 = t2206 * t5355;
7934   if(v4rho4 != NULL && (p->info->flags & XC_FLAGS_NEEDS_LAPLACIAN) && (p->info->flags & XC_FLAGS_HAVE_LXC))
7935     v4rholapl2tau[5] = -t262 * t736 * t5354 * t191 / 0.2e1 - t15774 / 0.2e1;
7936 
7937   if(v4rho4 != NULL && (p->info->flags & XC_FLAGS_NEEDS_LAPLACIAN) && (p->info->flags & XC_FLAGS_HAVE_LXC))
7938     v4rholapl2tau[6] = -t262 * t678 * t5278 * t203 / 0.2e1 - t15528 / 0.2e1;
7939 
7940   if(v4rho4 != NULL && (p->info->flags & XC_FLAGS_NEEDS_LAPLACIAN) && (p->info->flags & XC_FLAGS_HAVE_LXC))
7941     v4rholapl2tau[7] = 0.0e0;
7942 
7943   if(v4rho4 != NULL && (p->info->flags & XC_FLAGS_NEEDS_LAPLACIAN) && (p->info->flags & XC_FLAGS_HAVE_LXC))
7944     v4rholapl2tau[8] = 0.0e0;
7945 
7946   if(v4rho4 != NULL && (p->info->flags & XC_FLAGS_NEEDS_LAPLACIAN) && (p->info->flags & XC_FLAGS_HAVE_LXC))
7947     v4rholapl2tau[9] = 0.0e0;
7948 
7949   if(v4rho4 != NULL && (p->info->flags & XC_FLAGS_NEEDS_LAPLACIAN) && (p->info->flags & XC_FLAGS_HAVE_LXC))
7950     v4rholapl2tau[10] = 0.0e0;
7951 
7952   t15793 = t634 * t5351;
7953   t15807 = -0.33190537739774681727e-3 * t15365 + 0.80361903747517469318e-3 * t15368 + 0.12054285562127620398e-2 * t4673 - 0.17549384106081390032e-1 * t15373 - 0.15794445695473251028e0 * t4676 - 0.81072749616151889080e-3 * t4679 - 0.90080832906835432311e-4 * t15377;
7954   t15839 = -0.76217237139506171188e1 * t659 * t2875 * t1307 + 0.16615495624729559964e1 * t240 * t61 * t15807 * t247 + 0.70819478890314631335e-1 * t54 * t236 * t15807 + 0.33230991249459119928e1 * t777 * t3912 * t1370 - 0.70819478890314631336e-1 * t772 * t3923 * t873 - 0.35409739445157315668e-1 * t772 * t2851 * t1298 - 0.35409739445157315668e-1 * t772 * t980 * t3672 + 0.16615495624729559964e1 * t777 * t3672 * t247 * t374 + 0.53114609167735973502e-1 * t2314 * t2851 * t1307 - 0.12461621718547169973e1 * t2318 * t5310 * t971 + 0.20977047095244633367e3 * t13889 * t13349;
7955   t15842 = t1307 * t230;
7956   t15858 = t6903 * t489 * t1307;
7957   t15862 = t1966 * t489 * t1298;
7958   t15870 = t110 * t5285;
7959   t15874 = -0.22865171141851851357e2 * t3917 * t3938 + 0.31465570642866950052e3 * t3536 * t9909 * t15842 + 0.20977047095244633368e3 * t3536 * t3329 * t10929 - 0.24056046973484009303e4 * t10460 * t9890 * t15842 + 0.10488523547622316684e3 * t3536 * t3329 * t15502 + 0.20977047095244633368e3 * t14567 * t3944 + 0.11432585570925925678e2 * t15858 * t995 - 0.11432585570925925678e2 * t15862 * t995 - 0.22865171141851851356e2 * t3917 * t3950 + 0.33230991249459119928e1 * t777 * t1381 * t3869 - 0.35409739445157315668e-1 * t772 * t15870 * t230;
7960   t15894 = t374 * t1307;
7961   t15911 = 0.16615495624729559964e1 * t777 * t778 * t5285 + 0.16615495624729559964e1 * t777 * t5320 * t971 - 0.11432585570925925678e2 * t1967 * t1322 * t4126 - 0.15243447427901234237e2 * t1967 * t1322 * t13446 - 0.13278652291933993376e0 * t7507 * t980 * t15842 + 0.10622921833547194700e0 * t2314 * t980 * t10929 + 0.24923243437094339947e1 * t7523 * t778 * t15894 - 0.24923243437094339946e1 * t2318 * t1381 * t11500 - 0.76217237139506171188e1 * t659 * t2875 * t5347 - 0.76217237139506171188e1 * t659 * t994 * t15502 - 0.76217237139506171188e1 * t659 * t994 * t106 * t3672;
7962   t15912 = t5285 * t661;
7963   t15931 = t1370 * t336;
7964   t15938 = t374 * t1298;
7965   t15948 = -0.76217237139506171188e1 * t659 * t15912 * t790 - 0.15243447427901234238e2 * t659 * t11516 * t1392 - 0.15243447427901234238e2 * t659 * t3937 * t3898 - 0.15243447427901234238e2 * t659 * t3937 * t3730 + 0.10488523547622316684e3 * t1984 * t8675 * t5340 + 0.10622921833547194700e0 * t2314 * t3923 * t3898 - 0.24923243437094339946e1 * t2318 * t778 * t15931 + 0.53114609167735973502e-1 * t2314 * t980 * t15502 - 0.12461621718547169973e1 * t2318 * t778 * t15938 - 0.15243447427901234238e2 * t659 * t994 * t10929 - 0.70819478890314631336e-1 * t772 * t11437 * t336;
7966   t15962 = t384 * t1303;
7967   t15971 = t1396 * t346;
7968   t15986 = 0.2e1 * t104 * t976 * t3741 + 0.2e1 * t231 * t5304 + 0.2e1 * t104 * t15793 * t251 - t104 * t234 * (t15839 + t15874 + t15911 + t15948) + 0.4e1 * t337 * t3895 + 0.4e1 * t231 * t5301 - 0.6e1 * t104 * t8636 * t1303 - 0.6e1 * t231 * t5298 + 0.24e2 * t9939 * t15962 * t251 - 0.12e2 * t14001 * t3884 - 0.12e2 * t3265 * t3883 * t900 - 0.12e2 * t3265 * t15971 * t251 + 0.4e1 * t104 * t3894 * t900 - t231 * t5352 - t5286 * t252 - 0.2e1 * t3870 * t347 + 0.2e1 * t972 * t1304 - 0.2e1 * t1371 * t901;
7969   t15988 = t384 * t1326;
7970   t16023 = -t375 * t3742 - 0.6e1 * t3265 * t15988 * t251 + 0.4e1 * t375 * t3688 + 0.4e1 * t1371 * t879 - t972 * t1327 - t1299 * t999 - t3673 * t385 - 0.2e1 * t337 * t3954 - 0.2e1 * t874 * t1397 + 0.4e1 * t337 * t3890 + 0.4e1 * t337 * t3887 + 0.4e1 * t104 * t11605 * t346 + 0.2e1 * t375 * t3693 + 0.4e1 * t874 * t1375 + 0.2e1 * t1299 * t977 - 0.6e1 * t375 * t3685 + t25 * t15807 * t115 + 0.2e1 * t104 * t2838 * t1326;
7971   if(v4rho4 != NULL && (p->info->flags & XC_FLAGS_NEEDS_LAPLACIAN) && (p->info->flags & XC_FLAGS_HAVE_LXC))
7972     v4rholapl2tau[11] = -t15774 / 0.2e1 - t262 * t736 * t5354 * t208 / 0.2e1 - 0.3e1 / 0.8e1 * t262 * t286 * (t15986 + t16023);
7973 
7974   t16028 = t2206 * t5429;
7975   t16041 = 0.13276215095909872691e-2 * t15187 - 0.32144761499006987728e-2 * t15190 - 0.48217142248510481591e-2 * t4593 + 0.70197536424325560128e-1 * t15195 + 0.63177782781893004115e0 * t4596 + 0.32429099846460755632e-2 * t4599 + 0.36032333162734172925e-3 * t15199;
7976   t16044 = t365 * t1361;
7977   t16063 = t1433 * t324;
7978   t16072 = t462 * t5425;
7979   t16081 = t25 * t16041 * t71 - 0.12e2 * t3144 * t16044 * t183 + 0.2e1 * t817 * t1411 + 0.4e1 * t356 * t3780 + 0.4e1 * t919 * t1340 - 0.2e1 * t356 * t3844 - t5362 * t184 - t1406 * t844 - t3972 * t325 - 0.2e1 * t1336 * t946 - 0.2e1 * t3760 * t366 - 0.6e1 * t3144 * t16063 * t183 - 0.12e2 * t14306 * t3774 - 0.2e1 * t919 * t1362 - t315 * t4042 + 0.2e1 * t52 * t16072 * t183 + 0.2e1 * t52 * t3991 * t843 + 0.4e1 * t356 * t3785;
7980   t16091 = t1410 * t324;
7981   t16130 = t66 * t5361;
7982   t16149 = t5361 * t492;
7983   t16156 = -0.76217237139506171188e1 * t490 * t1429 * t816 + 0.16615495624729559964e1 * t710 * t3802 * t1405 + 0.16615495624729559964e1 * t710 * t1346 * t3971 - 0.35409739445157315668e-1 * t705 * t16130 * t156 + 0.16615495624729559964e1 * t710 * t711 * t5361 - 0.35409739445157315668e-1 * t705 * t11776 * t314 - 0.35409739445157315668e-1 * t705 * t4012 * t816 - 0.70819478890314631336e-1 * t705 * t2699 * t1335 - 0.70819478890314631336e-1 * t705 * t927 * t3759 - 0.76217237139506171188e1 * t490 * t16149 * t723 - 0.76217237139506171188e1 * t490 * t11732 * t1357;
7984   t16166 = t156 * t1335;
7985   t16189 = t1405 * t314;
7986   t16193 = -0.76217237139506171188e1 * t490 * t4026 * t3788 - 0.76217237139506171188e1 * t490 * t4026 * t3628 - 0.15243447427901234238e2 * t490 * t2723 * t5414 - 0.15243447427901234238e2 * t490 * t941 * t16166 - 0.15243447427901234238e2 * t490 * t941 * t62 * t3759 + 0.10488523547622316684e3 * t1618 * t4034 * t15250 - 0.15243447427901234238e2 * t490 * t941 * t11144 - 0.15243447427901234237e2 * t1597 * t1429 * t3788 - 0.11432585570925925678e2 * t1597 * t1429 * t3628 + 0.53114609167735973502e-1 * t2133 * t4012 * t3788 - 0.12461621718547169973e1 * t2137 * t711 * t16189;
7987   t16198 = t5939 * t3806;
7988   t16223 = -0.13278652291933993376e0 * t7124 * t3995 * t3788 + 0.11432585570925925678e2 * t16198 * t4009 + 0.10488523547622316684e3 * t14856 * t3834 + 0.20977047095244633368e3 * t3429 * t3208 * t16166 + 0.20977047095244633368e3 * t3429 * t3208 * t11144 + 0.31465570642866950052e3 * t14866 * t9553 * t3788 - 0.24056046973484009303e4 * t14870 * t9568 * t3788 - 0.22865171141851851357e2 * t11658 * t3828 - 0.22865171141851851356e2 * t11658 * t3831 + 0.20977047095244633367e3 * t14877 * t3834 - 0.11432585570925925678e2 * t3807 * t4027;
7989   t16234 = t1414 * t314;
7990   t16244 = t355 * t1335;
7991   t16260 = 0.70819478890314631335e-1 * t54 * t162 * t16041 + 0.16615495624729559964e1 * t167 * t61 * t16041 * t179 + 0.10622921833547194700e0 * t2133 * t927 * t11144 + 0.24923243437094339947e1 * t7106 * t711 * t16234 - 0.24923243437094339946e1 * t2137 * t1346 * t11703 + 0.10622921833547194700e0 * t2133 * t927 * t16166 - 0.24923243437094339946e1 * t2137 * t711 * t16244 + 0.33230991249459119928e1 * t710 * t14754 * t1335 + 0.33230991249459119928e1 * t710 * t4005 * t3759 + 0.53114609167735973502e-1 * t2133 * t3995 * t816 - 0.12461621718547169973e1 * t2137 * t3802 * t1414;
7992   t16265 = 0.2e1 * t52 * t11802 * t324 + 0.2e1 * t157 * t5380 - t157 * t5426 - 0.12e2 * t3144 * t3773 * t945 + 0.24e2 * t9638 * t16091 * t183 + 0.4e1 * t315 * t3987 - 0.6e1 * t315 * t3984 - t817 * t1434 + 0.4e1 * t356 * t3777 + 0.4e1 * t1336 * t924 + 0.2e1 * t1406 * t822 + 0.4e1 * t157 * t5376 - 0.6e1 * t52 * t3983 * t843 - 0.6e1 * t157 * t5373 + 0.4e1 * t52 * t923 * t3843 + 0.4e1 * t52 * t2686 * t1361 + 0.2e1 * t315 * t3992 - t52 * t160 * (t16156 + t16193 + t16223 + t16260);
7993   if(v4rho4 != NULL && (p->info->flags & XC_FLAGS_NEEDS_LAPLACIAN) && (p->info->flags & XC_FLAGS_HAVE_LXC))
7994     v4rholapltau2[0] = -t16028 / 0.2e1 - t262 * t678 * t5428 * t128 / 0.2e1 - 0.3e1 / 0.8e1 * t262 * t263 * (t16081 + t16265);
7995 
7996   if(v4rho4 != NULL && (p->info->flags & XC_FLAGS_NEEDS_LAPLACIAN) && (p->info->flags & XC_FLAGS_HAVE_LXC))
7997     v4rholapltau2[1] = 0.0e0;
7998 
7999   if(v4rho4 != NULL && (p->info->flags & XC_FLAGS_NEEDS_LAPLACIAN) && (p->info->flags & XC_FLAGS_HAVE_LXC))
8000     v4rholapltau2[2] = 0.0e0;
8001 
8002   if(v4rho4 != NULL && (p->info->flags & XC_FLAGS_NEEDS_LAPLACIAN) && (p->info->flags & XC_FLAGS_HAVE_LXC))
8003     v4rholapltau2[3] = 0.0e0;
8004 
8005   if(v4rho4 != NULL && (p->info->flags & XC_FLAGS_NEEDS_LAPLACIAN) && (p->info->flags & XC_FLAGS_HAVE_LXC))
8006     v4rholapltau2[4] = 0.0e0;
8007 
8008   t16270 = t2206 * t5503;
8009   if(v4rho4 != NULL && (p->info->flags & XC_FLAGS_NEEDS_LAPLACIAN) && (p->info->flags & XC_FLAGS_HAVE_LXC))
8010     v4rholapltau2[5] = -t262 * t736 * t5502 * t191 / 0.2e1 - t16270 / 0.2e1;
8011 
8012   if(v4rho4 != NULL && (p->info->flags & XC_FLAGS_NEEDS_LAPLACIAN) && (p->info->flags & XC_FLAGS_HAVE_LXC))
8013     v4rholapltau2[6] = -t262 * t678 * t5428 * t203 / 0.2e1 - t16028 / 0.2e1;
8014 
8015   if(v4rho4 != NULL && (p->info->flags & XC_FLAGS_NEEDS_LAPLACIAN) && (p->info->flags & XC_FLAGS_HAVE_LXC))
8016     v4rholapltau2[7] = 0.0e0;
8017 
8018   if(v4rho4 != NULL && (p->info->flags & XC_FLAGS_NEEDS_LAPLACIAN) && (p->info->flags & XC_FLAGS_HAVE_LXC))
8019     v4rholapltau2[8] = 0.0e0;
8020 
8021   if(v4rho4 != NULL && (p->info->flags & XC_FLAGS_NEEDS_LAPLACIAN) && (p->info->flags & XC_FLAGS_HAVE_LXC))
8022     v4rholapltau2[9] = 0.0e0;
8023 
8024   if(v4rho4 != NULL && (p->info->flags & XC_FLAGS_NEEDS_LAPLACIAN) && (p->info->flags & XC_FLAGS_HAVE_LXC))
8025     v4rholapltau2[10] = 0.0e0;
8026 
8027   t16316 = -0.12e2 * t3265 * t3883 * t998 + 0.4e1 * t1371 * t977 - 0.2e1 * t1371 * t999 + 0.4e1 * t972 * t1375 - 0.2e1 * t972 * t1397 + 0.2e1 * t1443 * t879 - t1443 * t901 + 0.2e1 * t874 * t1448 - 0.12e2 * t14590 * t3884 - t874 * t1471 - t231 * t5500 - t5436 * t252 - t4068 * t347 + 0.4e1 * t375 * t3887 + 0.4e1 * t375 * t3890 + 0.4e1 * t375 * t3895 - 0.2e1 * t375 * t3954 - 0.2e1 * t3870 * t385;
8028   t16322 = t1470 * t346;
8029   t16342 = t110 * t5435;
8030   t16371 = 0.13276215095909872691e-2 * t15365 - 0.32144761499006987728e-2 * t15368 - 0.48217142248510481591e-2 * t4673 + 0.70197536424325560128e-1 * t15373 + 0.63177782781893004115e0 * t4676 + 0.32429099846460755632e-2 * t4679 + 0.36032333162734172925e-3 * t15377;
8031   t16379 = 0.16615495624729559964e1 * t777 * t3912 * t1442 + 0.16615495624729559964e1 * t777 * t1381 * t4067 - 0.35409739445157315668e-1 * t772 * t16342 * t230 - 0.35409739445157315668e-1 * t772 * t11951 * t336 - 0.35409739445157315668e-1 * t772 * t4108 * t873 - 0.70819478890314631336e-1 * t772 * t2851 * t1370 - 0.70819478890314631336e-1 * t772 * t980 * t3869 + 0.33230991249459119928e1 * t777 * t15085 * t1370 + 0.33230991249459119928e1 * t777 * t4101 * t3869 + 0.16615495624729559964e1 * t240 * t61 * t16371 * t247 + 0.70819478890314631335e-1 * t54 * t236 * t16371;
8032   t16394 = t1370 * t230;
8033   t16407 = t6903 * t3916;
8034   t16410 = -0.76217237139506171188e1 * t659 * t1466 * t873 + 0.16615495624729559964e1 * t777 * t778 * t5435 - 0.22865171141851851356e2 * t12045 * t3941 + 0.20977047095244633367e3 * t15139 * t3944 - 0.11432585570925925678e2 * t3917 * t4123 + 0.10488523547622316684e3 * t15116 * t3944 + 0.20977047095244633368e3 * t3536 * t3329 * t16394 + 0.20977047095244633368e3 * t3536 * t3329 * t11496 + 0.31465570642866950052e3 * t15126 * t9909 * t3898 - 0.24056046973484009303e4 * t15130 * t9890 * t3898 + 0.11432585570925925678e2 * t16407 * t4105;
8035   t16414 = t5435 * t661;
8036   t16430 = t1442 * t336;
8037   t16434 = t1451 * t336;
8038   t16444 = t374 * t1370;
8039   t16448 = -0.22865171141851851357e2 * t12045 * t3938 - 0.76217237139506171188e1 * t659 * t16414 * t790 - 0.76217237139506171188e1 * t659 * t11974 * t1392 - 0.15243447427901234237e2 * t1967 * t1466 * t3898 - 0.11432585570925925678e2 * t1967 * t1466 * t3730 + 0.53114609167735973502e-1 * t2314 * t4108 * t3898 - 0.12461621718547169973e1 * t2318 * t778 * t16430 + 0.24923243437094339947e1 * t7523 * t778 * t16434 - 0.24923243437094339946e1 * t2318 * t1381 * t12006 + 0.10622921833547194700e0 * t2314 * t980 * t16394 - 0.24923243437094339946e1 * t2318 * t778 * t16444;
8040   t16483 = -0.13278652291933993376e0 * t7507 * t4091 * t3898 + 0.10622921833547194700e0 * t2314 * t980 * t11496 - 0.15243447427901234238e2 * t659 * t994 * t16394 - 0.15243447427901234238e2 * t659 * t994 * t106 * t3869 + 0.10488523547622316684e3 * t1984 * t4130 * t15478 - 0.15243447427901234238e2 * t659 * t994 * t11496 - 0.76217237139506171188e1 * t659 * t4122 * t3898 - 0.76217237139506171188e1 * t659 * t4122 * t3730 - 0.15243447427901234238e2 * t659 * t2875 * t5488 + 0.53114609167735973502e-1 * t2314 * t4091 * t873 - 0.12461621718547169973e1 * t2318 * t3912 * t1451;
8041   t16498 = t384 * t1396;
8042   t16502 = t1447 * t346;
8043   t16506 = t634 * t5499;
8044   t16515 = 0.4e1 * t337 * t4083 - 0.6e1 * t337 * t4080 - t337 * t4138 - 0.6e1 * t3265 * t16322 * t251 + 0.4e1 * t231 * t5450 - 0.6e1 * t104 * t4079 * t900 - 0.6e1 * t231 * t5447 + 0.4e1 * t104 * t2838 * t1396 - t104 * t234 * (t16379 + t16410 + t16448 + t16483) + t25 * t16371 * t115 + 0.4e1 * t104 * t976 * t3953 + 0.2e1 * t104 * t12094 * t346 + 0.2e1 * t337 * t4088 - 0.12e2 * t3265 * t16498 * t251 + 0.24e2 * t9939 * t16502 * t251 + 0.2e1 * t104 * t16506 * t251 + 0.2e1 * t104 * t4087 * t900 + 0.2e1 * t231 * t5454;
8045   if(v4rho4 != NULL && (p->info->flags & XC_FLAGS_NEEDS_LAPLACIAN) && (p->info->flags & XC_FLAGS_HAVE_LXC))
8046     v4rholapltau2[11] = -t16270 / 0.2e1 - t262 * t736 * t5502 * t208 / 0.2e1 - 0.3e1 / 0.8e1 * t262 * t286 * (t16316 + t16515);
8047 
8048   t16520 = t2206 * t5565;
8049   t16533 = -0.53104860383639490765e-2 * t15187 + 0.12857904599602795091e-1 * t15190 + 0.19286856899404192636e-1 * t4593 - 0.28079014569730224051e0 * t15195 - 0.25271113112757201646e1 * t4596 - 0.12971639938584302253e-1 * t4599 - 0.14412933265093669170e-2 * t15199;
8050   t16558 = t5871 * t5518;
8051   t16567 = t365 * t1433;
8052   t16578 = t462 * t5561;
8053   t16586 = t355 * t1405;
8054   t16590 = t66 * t5525;
8055   t16603 = t66 * t5509;
8056   t16610 = t1414 * t179;
8057   t16628 = 0.15934382750320792050e0 * t2133 * t927 * t1405 * t156 - 0.37384865155641509919e1 * t2137 * t711 * t16586 - 0.13278652291933993376e0 * t7124 * t16590 * t156 + 0.15934382750320792051e0 * t2133 * t3995 * t918 + 0.49846486874188679892e1 * t710 * t4005 * t3971 - 0.15243447427901234237e2 * t1597 * t5539 * t156 - 0.35409739445157315668e-1 * t705 * t16603 * t156 + 0.24923243437094339947e1 * t7106 * t711 * t5525 - 0.37384865155641509919e1 * t2137 * t16610 * t918 - 0.10622921833547194700e0 * t705 * t2699 * t1405 - 0.10622921833547194700e0 * t705 * t927 * t3971 - 0.34297756712777777034e2 * t11658 * t4027 + 0.31465570642866950052e3 * t14856 * t13148 + 0.31465570642866950052e3 * t1618 * t4034 * t174 * t918;
8058   t16632 = t5525 * t5908;
8059   t16642 = t5509 * t492;
8060   t16674 = 0.31465570642866950052e3 * t1618 * t5553 * t723 - 0.24056046973484009303e4 * t5905 * t16632 * t12238 - 0.34297756712777777034e2 * t1597 * t1429 * t4030 + 0.20977047095244633367e3 * t5915 * t5553 * t2986 - 0.76217237139506171188e1 * t490 * t16642 * t723 - 0.22865171141851851357e2 * t490 * t11732 * t2709 - 0.22865171141851851357e2 * t490 * t4026 * t13111 - 0.22865171141851851357e2 * t490 * t4026 * t4030 + 0.11432585570925925678e2 * t5940 * t5539 * t723 + 0.16615495624729559964e1 * t167 * t61 * t16533 * t179 + 0.70819478890314631335e-1 * t54 * t162 * t16533 - 0.22865171141851851356e2 * t490 * t1429 * t918 + 0.16615495624729559964e1 * t710 * t711 * t5509 + 0.49846486874188679892e1 * t710 * t14754 * t1405;
8061   t16678 = -0.3e1 * t356 * t4042 - 0.6e1 * t157 * t5519 + 0.24e2 * t52 * t16558 * t183 - 0.18e2 * t52 * t3983 * t945 + 0.6e1 * t157 * t5522 - 0.18e2 * t3144 * t16567 * t183 + 0.6e1 * t52 * t2686 * t1433 + 0.6e1 * t52 * t923 * t4041 - t157 * t5562 + 0.2e1 * t52 * t16578 * t183 - t52 * t160 * (t16628 + t16674);
8062   if(v4rho4 != NULL && (p->info->flags & XC_FLAGS_HAVE_LXC))
8063     v4rhotau3[0] = -t16520 / 0.2e1 - t262 * t678 * t5564 * t128 / 0.2e1 - 0.3e1 / 0.8e1 * t262 * t263 * (t25 * t16533 * t71 + 0.6e1 * t1406 * t924 - 0.3e1 * t1406 * t946 + 0.6e1 * t919 * t1411 - 0.3e1 * t919 * t1434 - t5510 * t184 - 0.18e2 * t356 * t3984 + 0.12e2 * t356 * t3987 + 0.6e1 * t356 * t3992 - 0.3e1 * t3972 * t366 + t16678);
8064 
8065   if(v4rho4 != NULL && (p->info->flags & XC_FLAGS_HAVE_LXC))
8066     v4rhotau3[1] = 0.0e0;
8067 
8068   if(v4rho4 != NULL && (p->info->flags & XC_FLAGS_HAVE_LXC))
8069     v4rhotau3[2] = 0.0e0;
8070 
8071   t16683 = t2206 * t5627;
8072   if(v4rho4 != NULL && (p->info->flags & XC_FLAGS_HAVE_LXC))
8073     v4rhotau3[3] = -t262 * t736 * t5626 * t191 / 0.2e1 - t16683 / 0.2e1;
8074 
8075   if(v4rho4 != NULL && (p->info->flags & XC_FLAGS_HAVE_LXC))
8076     v4rhotau3[4] = -t262 * t678 * t5564 * t203 / 0.2e1 - t16520 / 0.2e1;
8077 
8078   if(v4rho4 != NULL && (p->info->flags & XC_FLAGS_HAVE_LXC))
8079     v4rhotau3[5] = 0.0e0;
8080 
8081   if(v4rho4 != NULL && (p->info->flags & XC_FLAGS_HAVE_LXC))
8082     v4rhotau3[6] = 0.0e0;
8083 
8084   t16704 = -0.53104860383639490765e-2 * t15365 + 0.12857904599602795091e-1 * t15368 + 0.19286856899404192636e-1 * t4673 - 0.28079014569730224051e0 * t15373 - 0.25271113112757201646e1 * t4676 - 0.12971639938584302253e-1 * t4679 - 0.14412933265093669170e-2 * t15377;
8085   t16729 = t6818 * t5580;
8086   t16738 = t384 * t1470;
8087   t16749 = t634 * t5623;
8088   t16757 = t374 * t1442;
8089   t16768 = t5587 * t6874;
8090   t16778 = t5571 * t661;
8091   t16798 = -0.34297756712777777034e2 * t12045 * t4123 + 0.31465570642866950052e3 * t15116 * t13349 - 0.37384865155641509919e1 * t2318 * t778 * t16757 + 0.31465570642866950052e3 * t1984 * t4130 * t242 * t971 + 0.31465570642866950052e3 * t1984 * t5615 * t790 - 0.24056046973484009303e4 * t6871 * t16768 * t12432 - 0.34297756712777777034e2 * t1967 * t1466 * t4126 + 0.20977047095244633367e3 * t6892 * t5615 * t3098 - 0.76217237139506171188e1 * t659 * t16778 * t790 - 0.22865171141851851357e2 * t659 * t11974 * t2861 - 0.22865171141851851357e2 * t659 * t4122 * t13446 - 0.22865171141851851357e2 * t659 * t4122 * t4126 + 0.11432585570925925678e2 * t6904 * t5601 * t790 + 0.15934382750320792050e0 * t2314 * t980 * t1442 * t230;
8092   t16818 = t110 * t5587;
8093   t16828 = t1451 * t247;
8094   t16838 = t110 * t5571;
8095   t16845 = 0.70819478890314631335e-1 * t54 * t236 * t16704 + 0.16615495624729559964e1 * t240 * t61 * t16704 * t247 - 0.10622921833547194700e0 * t772 * t2851 * t1442 - 0.10622921833547194700e0 * t772 * t980 * t4067 + 0.49846486874188679892e1 * t777 * t15085 * t1442 + 0.49846486874188679892e1 * t777 * t4101 * t4067 - 0.13278652291933993376e0 * t7507 * t16818 * t230 + 0.15934382750320792051e0 * t2314 * t4091 * t971 + 0.24923243437094339947e1 * t7523 * t778 * t5587 - 0.37384865155641509919e1 * t2318 * t16828 * t971 - 0.22865171141851851356e2 * t659 * t1466 * t971 - 0.15243447427901234237e2 * t1967 * t5601 * t230 - 0.35409739445157315668e-1 * t772 * t16838 * t230 + 0.16615495624729559964e1 * t777 * t778 * t5571;
8096   t16849 = -0.3e1 * t375 * t4138 - 0.6e1 * t231 * t5581 + 0.24e2 * t104 * t16729 * t251 - 0.18e2 * t104 * t4079 * t998 + 0.6e1 * t231 * t5584 - 0.18e2 * t3265 * t16738 * t251 + 0.6e1 * t104 * t2838 * t1470 + 0.6e1 * t104 * t976 * t4137 - t231 * t5624 + 0.2e1 * t104 * t16749 * t251 - t104 * t234 * (t16798 + t16845);
8097   if(v4rho4 != NULL && (p->info->flags & XC_FLAGS_HAVE_LXC))
8098     v4rhotau3[7] = -t16683 / 0.2e1 - t262 * t736 * t5626 * t208 / 0.2e1 - 0.3e1 / 0.8e1 * t262 * t286 * (t25 * t16704 * t115 + 0.6e1 * t1443 * t977 - 0.3e1 * t1443 * t999 + 0.6e1 * t972 * t1448 - 0.3e1 * t972 * t1471 - t5572 * t252 - 0.18e2 * t375 * t4080 + 0.12e2 * t375 * t4083 + 0.6e1 * t375 * t4088 - 0.3e1 * t4068 * t385 + t16849);
8099 
8100   t16856 = 0.1e1 / t27 / t4144 / t31;
8101   t16858 = t16856 * t39 * t42;
8102   t16863 = t440 * t16856;
8103   t16868 = -0.12965053804599485051e-5 * t5814 * t16858 + 0.31391368651374011455e-5 * t5820 * t16858 - 0.68552281664380429815e-4 * t16863 * t5828 - 0.35187825354232590748e-6 * t16863 * t5827;
8104   t16883 = t1020 * t1020;
8105   t16890 = t1043 * t1043;
8106   t16904 = t1024 * t1024;
8107   t16913 = t1015 * t1015;
8108   t16925 = t16904 * t1621;
8109   t16967 = 0.70819478890314631335e-1 * t54 * t162 * t16868 + 0.16615495624729559964e1 * t167 * t61 * t16868 * t179 + 0.24923243437094339947e1 * t5894 * t61 * t16904 * t179 - 0.24056046973484009303e4 * t5905 * t16904 * t5908 * t5910 + 0.49846486874188679892e1 * t474 * t61 * t16913 * t179 + 0.66461982498918239856e1 * t710 * t1115 * t4154 - 0.15243447427901234237e2 * t1596 * t489 * t16904 * t492 + 0.20977047095244633367e3 * t5915 * t16925 * t174 - 0.74769730311283019838e1 * t2137 * t4317 * t1015 + 0.11432585570925925678e2 * t5940 * t16904 * t492 * t62 - 0.10622921833547194700e0 * t54 * t469 * t16913 - 0.14163895778062926267e0 * t705 * t706 * t4154 - 0.13278652291933993376e0 * t54 * t5954 * t16904 + 0.31868765500641584101e0 * t2133 * t2947 * t1015 - 0.45730342283703702713e2 * t490 * t2977 * t1024 - 0.22865171141851851357e2 * t490 * t16913 * t492 * t62 + 0.62931141285733900104e3 * t1618 * t9013 * t4347 + 0.31465570642866950052e3 * t1618 * t16925 * t62 - 0.68595513425555554068e2 * t1597 * t1039 * t4354 - 0.30486894855802468476e2 * t490 * t12249 * t1126;
8110   t16970 = -0.36e2 * t52 * t2935 * t1043 - t52 * t160 * t16967 + t25 * t16868 * t71 + 0.24e2 * t52 * t5871 * t16883 + 0.6e1 * t52 * t462 * t16890 + 0.8e1 * t52 * t701 * t4206 + 0.12e2 * t1016 * t1021 - 0.6e1 * t1016 * t1044 - 0.24e2 * t270 * t4164 + 0.24e2 * t270 * t4167 - 0.4e1 * t270 * t4207 - 0.4e1 * t4155 * t280;
8111   if(v4rho4 != NULL && (p->info->flags & XC_FLAGS_HAVE_LXC))
8112     v4sigma4[0] = -0.3e1 / 0.8e1 * t262 * t263 * t16970;
8113 
8114   if(v4rho4 != NULL && (p->info->flags & XC_FLAGS_HAVE_LXC))
8115     v4sigma4[1] = 0.0e0;
8116 
8117   if(v4rho4 != NULL && (p->info->flags & XC_FLAGS_HAVE_LXC))
8118     v4sigma4[2] = 0.0e0;
8119 
8120   if(v4rho4 != NULL && (p->info->flags & XC_FLAGS_HAVE_LXC))
8121     v4sigma4[3] = 0.0e0;
8122 
8123   if(v4rho4 != NULL && (p->info->flags & XC_FLAGS_HAVE_LXC))
8124     v4sigma4[4] = 0.0e0;
8125 
8126   if(v4rho4 != NULL && (p->info->flags & XC_FLAGS_HAVE_LXC))
8127     v4sigma4[5] = 0.0e0;
8128 
8129   if(v4rho4 != NULL && (p->info->flags & XC_FLAGS_HAVE_LXC))
8130     v4sigma4[6] = 0.0e0;
8131 
8132   if(v4rho4 != NULL && (p->info->flags & XC_FLAGS_HAVE_LXC))
8133     v4sigma4[7] = 0.0e0;
8134 
8135   if(v4rho4 != NULL && (p->info->flags & XC_FLAGS_HAVE_LXC))
8136     v4sigma4[8] = 0.0e0;
8137 
8138   if(v4rho4 != NULL && (p->info->flags & XC_FLAGS_HAVE_LXC))
8139     v4sigma4[9] = 0.0e0;
8140 
8141   if(v4rho4 != NULL && (p->info->flags & XC_FLAGS_HAVE_LXC))
8142     v4sigma4[10] = 0.0e0;
8143 
8144   if(v4rho4 != NULL && (p->info->flags & XC_FLAGS_HAVE_LXC))
8145     v4sigma4[11] = 0.0e0;
8146 
8147   if(v4rho4 != NULL && (p->info->flags & XC_FLAGS_HAVE_LXC))
8148     v4sigma4[12] = 0.0e0;
8149 
8150   if(v4rho4 != NULL && (p->info->flags & XC_FLAGS_HAVE_LXC))
8151     v4sigma4[13] = 0.0e0;
8152 
8153   t16976 = 0.1e1 / t82 / t4213 / t86;
8154   t16978 = t16976 * t39 * t42;
8155   t16983 = t616 * t16976;
8156   t16988 = -0.12965053804599485051e-5 * t6763 * t16978 + 0.31391368651374011455e-5 * t6769 * t16978 - 0.68552281664380429815e-4 * t16983 * t5828 - 0.35187825354232590748e-6 * t16983 * t5827;
8157   t17003 = t1065 * t1065;
8158   t17010 = t1088 * t1088;
8159   t17024 = t1069 * t1069;
8160   t17033 = t17024 * t1987;
8161   t17037 = t1060 * t1060;
8162   t17087 = 0.16615495624729559964e1 * t240 * t61 * t16988 * t247 + 0.70819478890314631335e-1 * t54 * t236 * t16988 + 0.24923243437094339947e1 * t6865 * t61 * t17024 * t247 - 0.24056046973484009303e4 * t6871 * t17024 * t6874 * t6876 + 0.20977047095244633367e3 * t6892 * t17033 * t242 + 0.49846486874188679892e1 * t646 * t61 * t17037 * t247 + 0.66461982498918239856e1 * t777 * t1157 * t4223 - 0.15243447427901234237e2 * t1966 * t489 * t17024 * t661 + 0.31868765500641584101e0 * t2314 * t3059 * t1060 - 0.74769730311283019838e1 * t2318 * t4400 * t1060 + 0.11432585570925925678e2 * t6904 * t17024 * t661 * t106 - 0.10622921833547194700e0 * t54 * t641 * t17037 - 0.14163895778062926267e0 * t772 * t773 * t4223 - 0.13278652291933993376e0 * t54 * t6918 * t17024 - 0.30486894855802468476e2 * t659 * t12446 * t1168 - 0.45730342283703702713e2 * t659 * t3089 * t1069 - 0.22865171141851851357e2 * t659 * t17037 * t661 * t106 + 0.62931141285733900104e3 * t1984 * t9284 * t4430 + 0.31465570642866950052e3 * t1984 * t17033 * t106 - 0.68595513425555554068e2 * t1967 * t1084 * t4437;
8163   t17090 = -0.36e2 * t104 * t3047 * t1088 + 0.24e2 * t104 * t6818 * t17003 + 0.6e1 * t104 * t634 * t17010 - t104 * t234 * t17087 + 0.8e1 * t104 * t768 * t4275 + t25 * t16988 * t115 + 0.12e2 * t1061 * t1066 - 0.6e1 * t1061 * t1089 - 0.24e2 * t293 * t4233 + 0.24e2 * t293 * t4236 - 0.4e1 * t293 * t4276 - 0.4e1 * t4224 * t303;
8164   if(v4rho4 != NULL && (p->info->flags & XC_FLAGS_HAVE_LXC))
8165     v4sigma4[14] = -0.3e1 / 0.8e1 * t262 * t286 * t17090;
8166 
8167   t17130 = t3208 * t12269;
8168   t17134 = 0.1e1 / t27 / t12130;
8169   t17136 = t17134 * t39 * t42;
8170   t17137 = t5814 * t17136;
8171   t17139 = t5820 * t17136;
8172   t17141 = t440 * t17134;
8173   t17142 = t17141 * t5828;
8174   t17144 = t17141 * t5827;
8175   t17146 = -0.25930107609198970102e-5 * t17137 + 0.62782737302748022908e-5 * t17139 - 0.13710456332876085962e-3 * t17142 - 0.70375650708465181493e-6 * t17144;
8176   t17154 = t4170 * t179;
8177   t17185 = -0.34297756712777777034e2 * t12692 * t1127 + 0.31465570642866950052e3 * t3207 * t17130 + 0.70819478890314631335e-1 * t54 * t162 * t17146 + 0.16615495624729559964e1 * t167 * t61 * t17146 * t179 + 0.24923243437094339947e1 * t7106 * t17154 * t314 - 0.37384865155641509919e1 * t2137 * t4317 * t1104 - 0.10622921833547194700e0 * t705 * t12575 * t269 - 0.10622921833547194700e0 * t705 * t3185 * t1015 + 0.15934382750320792050e0 * t2133 * t3185 * t1024 - 0.15243447427901234237e2 * t1597 * t4184 * t314 - 0.13278652291933993376e0 * t7124 * t825 * t4170 + 0.49846486874188679892e1 * t710 * t4327 * t1104 + 0.49846486874188679892e1 * t710 * t1115 * t4292 - 0.35409739445157315668e-1 * t705 * t825 * t4154;
8178   t17186 = t4154 * t179;
8179   t17196 = t62 * t4154;
8180   t17209 = t5910 * t4170;
8181   t17228 = t62 * t4170;
8182   t17232 = 0.16615495624729559964e1 * t710 * t17186 * t314 - 0.22865171141851851357e2 * t490 * t3199 * t1024 - 0.22865171141851851357e2 * t490 * t839 * t12269 - 0.76217237139506171188e1 * t490 * t839 * t17196 - 0.22865171141851851357e2 * t490 * t12641 * t1126 - 0.22865171141851851357e2 * t490 * t3199 * t4354 + 0.31465570642866950052e3 * t1618 * t9519 * t4347 - 0.24056046973484009303e4 * t5905 * t7780 * t17209 - 0.34297756712777777035e2 * t1597 * t1039 * t4654 + 0.20977047095244633367e3 * t5915 * t4198 * t5418 - 0.37384865155641509919e1 * t2137 * t1115 * t12605 + 0.11432585570925925678e2 * t5940 * t4184 * t1357 + 0.15934382750320792050e0 * t2133 * t825 * t12269 + 0.31465570642866950052e3 * t1618 * t2464 * t17228;
8183   t17247 = 0.6e1 * t52 * t3156 * t1043 + 0.6e1 * t52 * t12504 * t279 - 0.18e2 * t52 * t9594 * t1020 + 0.6e1 * t270 * t4311 - t52 * t160 * (t17185 + t17232) + t25 * t17146 * t71 - t4155 * t325 - 0.3e1 * t1016 * t1131 - 0.6e1 * t315 * t4164 + 0.6e1 * t315 * t4167 + 0.6e1 * t1105 * t1021;
8184   if(v4rho4 != NULL && (p->info->flags & XC_FLAGS_NEEDS_LAPLACIAN) && (p->info->flags & XC_FLAGS_HAVE_LXC))
8185     v4sigma3lapl[0] = -0.3e1 / 0.8e1 * t262 * t263 * (-0.18e2 * t3144 * t3145 * t1043 + 0.24e2 * t52 * t7651 * t4163 + 0.2e1 * t52 * t821 * t4206 + 0.6e1 * t1016 * t1109 - 0.3e1 * t1105 * t1044 - 0.18e2 * t270 * t4305 + 0.12e2 * t270 * t4308 - 0.3e1 * t270 * t4359 - 0.3e1 * t4293 * t280 - t315 * t4207 + t17247);
8186 
8187   if(v4rho4 != NULL && (p->info->flags & XC_FLAGS_NEEDS_LAPLACIAN) && (p->info->flags & XC_FLAGS_HAVE_LXC))
8188     v4sigma3lapl[1] = 0.0e0;
8189 
8190   if(v4rho4 != NULL && (p->info->flags & XC_FLAGS_NEEDS_LAPLACIAN) && (p->info->flags & XC_FLAGS_HAVE_LXC))
8191     v4sigma3lapl[2] = 0.0e0;
8192 
8193   if(v4rho4 != NULL && (p->info->flags & XC_FLAGS_NEEDS_LAPLACIAN) && (p->info->flags & XC_FLAGS_HAVE_LXC))
8194     v4sigma3lapl[3] = 0.0e0;
8195 
8196   if(v4rho4 != NULL && (p->info->flags & XC_FLAGS_NEEDS_LAPLACIAN) && (p->info->flags & XC_FLAGS_HAVE_LXC))
8197     v4sigma3lapl[4] = 0.0e0;
8198 
8199   if(v4rho4 != NULL && (p->info->flags & XC_FLAGS_NEEDS_LAPLACIAN) && (p->info->flags & XC_FLAGS_HAVE_LXC))
8200     v4sigma3lapl[5] = 0.0e0;
8201 
8202   if(v4rho4 != NULL && (p->info->flags & XC_FLAGS_NEEDS_LAPLACIAN) && (p->info->flags & XC_FLAGS_HAVE_LXC))
8203     v4sigma3lapl[6] = 0.0e0;
8204 
8205   if(v4rho4 != NULL && (p->info->flags & XC_FLAGS_NEEDS_LAPLACIAN) && (p->info->flags & XC_FLAGS_HAVE_LXC))
8206     v4sigma3lapl[7] = 0.0e0;
8207 
8208   if(v4rho4 != NULL && (p->info->flags & XC_FLAGS_NEEDS_LAPLACIAN) && (p->info->flags & XC_FLAGS_HAVE_LXC))
8209     v4sigma3lapl[8] = 0.0e0;
8210 
8211   if(v4rho4 != NULL && (p->info->flags & XC_FLAGS_NEEDS_LAPLACIAN) && (p->info->flags & XC_FLAGS_HAVE_LXC))
8212     v4sigma3lapl[9] = 0.0e0;
8213 
8214   if(v4rho4 != NULL && (p->info->flags & XC_FLAGS_NEEDS_LAPLACIAN) && (p->info->flags & XC_FLAGS_HAVE_LXC))
8215     v4sigma3lapl[10] = 0.0e0;
8216 
8217   if(v4rho4 != NULL && (p->info->flags & XC_FLAGS_NEEDS_LAPLACIAN) && (p->info->flags & XC_FLAGS_HAVE_LXC))
8218     v4sigma3lapl[11] = 0.0e0;
8219 
8220   if(v4rho4 != NULL && (p->info->flags & XC_FLAGS_NEEDS_LAPLACIAN) && (p->info->flags & XC_FLAGS_HAVE_LXC))
8221     v4sigma3lapl[12] = 0.0e0;
8222 
8223   if(v4rho4 != NULL && (p->info->flags & XC_FLAGS_NEEDS_LAPLACIAN) && (p->info->flags & XC_FLAGS_HAVE_LXC))
8224     v4sigma3lapl[13] = 0.0e0;
8225 
8226   if(v4rho4 != NULL && (p->info->flags & XC_FLAGS_NEEDS_LAPLACIAN) && (p->info->flags & XC_FLAGS_HAVE_LXC))
8227     v4sigma3lapl[14] = 0.0e0;
8228 
8229   if(v4rho4 != NULL && (p->info->flags & XC_FLAGS_NEEDS_LAPLACIAN) && (p->info->flags & XC_FLAGS_HAVE_LXC))
8230     v4sigma3lapl[15] = 0.0e0;
8231 
8232   if(v4rho4 != NULL && (p->info->flags & XC_FLAGS_NEEDS_LAPLACIAN) && (p->info->flags & XC_FLAGS_HAVE_LXC))
8233     v4sigma3lapl[16] = 0.0e0;
8234 
8235   if(v4rho4 != NULL && (p->info->flags & XC_FLAGS_NEEDS_LAPLACIAN) && (p->info->flags & XC_FLAGS_HAVE_LXC))
8236     v4sigma3lapl[17] = 0.0e0;
8237 
8238   if(v4rho4 != NULL && (p->info->flags & XC_FLAGS_NEEDS_LAPLACIAN) && (p->info->flags & XC_FLAGS_HAVE_LXC))
8239     v4sigma3lapl[18] = 0.0e0;
8240 
8241   t17260 = 0.1e1 / t82 / t12319;
8242   t17262 = t17260 * t39 * t42;
8243   t17263 = t6763 * t17262;
8244   t17265 = t6769 * t17262;
8245   t17267 = t616 * t17260;
8246   t17268 = t17267 * t5828;
8247   t17270 = t17267 * t5827;
8248   t17272 = -0.25930107609198970102e-5 * t17263 + 0.62782737302748022908e-5 * t17265 - 0.13710456332876085962e-3 * t17268 - 0.70375650708465181493e-6 * t17270;
8249   t17278 = t3329 * t12436;
8250   t17302 = t4239 * t247;
8251   t17321 = 0.31465570642866950052e3 * t3328 * t17278 - 0.34297756712777777034e2 * t12961 * t1169 + 0.16615495624729559964e1 * t240 * t61 * t17272 * t247 + 0.70819478890314631335e-1 * t54 * t236 * t17272 - 0.10622921833547194700e0 * t772 * t12923 * t292 - 0.10622921833547194700e0 * t772 * t3306 * t1060 - 0.35409739445157315668e-1 * t772 * t882 * t4223 + 0.15934382750320792050e0 * t2314 * t3306 * t1069 + 0.24923243437094339947e1 * t7523 * t17302 * t336 - 0.37384865155641509919e1 * t2318 * t4400 * t1146 + 0.49846486874188679892e1 * t777 * t1157 * t4375 + 0.49846486874188679892e1 * t777 * t4410 * t1146 - 0.15243447427901234237e2 * t1967 * t4253 * t336 - 0.22865171141851851357e2 * t659 * t3320 * t1069;
8252   t17325 = t4223 * t247;
8253   t17329 = t6876 * t4239;
8254   t17336 = t106 * t4223;
8255   t17364 = t106 * t4239;
8256   t17368 = -0.13278652291933993376e0 * t7507 * t882 * t4239 + 0.16615495624729559964e1 * t777 * t17325 * t336 - 0.24056046973484009303e4 * t6871 * t8124 * t17329 - 0.22865171141851851357e2 * t659 * t896 * t12436 - 0.76217237139506171188e1 * t659 * t896 * t17336 - 0.34297756712777777035e2 * t1967 * t1084 * t4734 + 0.20977047095244633367e3 * t6892 * t4267 * t5492 - 0.22865171141851851357e2 * t659 * t12898 * t1168 - 0.22865171141851851357e2 * t659 * t3320 * t4437 + 0.31465570642866950052e3 * t1984 * t9820 * t4430 + 0.11432585570925925678e2 * t6904 * t4253 * t1392 + 0.15934382750320792050e0 * t2314 * t882 * t12436 - 0.37384865155641509919e1 * t2318 * t1157 * t12874 + 0.31465570642866950052e3 * t1984 * t2624 * t17364;
8257   t17405 = -0.18e2 * t104 * t9958 * t1065 + 0.6e1 * t104 * t3277 * t1088 + 0.6e1 * t104 * t12834 * t302 + 0.24e2 * t104 * t8176 * t4232 + 0.6e1 * t1061 * t1151 - 0.18e2 * t293 * t4388 + 0.12e2 * t293 * t4391 + 0.6e1 * t293 * t4394 - 0.3e1 * t293 * t4442 - 0.6e1 * t337 * t4233 + 0.6e1 * t337 * t4236;
8258   if(v4rho4 != NULL && (p->info->flags & XC_FLAGS_NEEDS_LAPLACIAN) && (p->info->flags & XC_FLAGS_HAVE_LXC))
8259     v4sigma3lapl[19] = -0.3e1 / 0.8e1 * t262 * t286 * (-0.3e1 * t1147 * t1089 - 0.3e1 * t4376 * t303 - t337 * t4276 + 0.6e1 * t1147 * t1066 + t25 * t17272 * t115 - 0.18e2 * t3265 * t3266 * t1088 - t104 * t234 * (t17321 + t17368) + 0.2e1 * t104 * t878 * t4275 - t4224 * t347 - 0.3e1 * t1061 * t1173 + t17405);
8260 
8261   t17477 = -0.34297756712777777034e2 * t12692 * t1202 + 0.31465570642866950052e3 * t3429 * t17130 + 0.49846486874188679892e1 * t710 * t4327 * t1181 + 0.49846486874188679892e1 * t710 * t1115 * t4451 - 0.10622921833547194700e0 * t705 * t3407 * t1015 - 0.35409739445157315668e-1 * t705 * t927 * t4154 + 0.16615495624729559964e1 * t710 * t17186 * t355 + 0.24923243437094339947e1 * t7106 * t17154 * t355 - 0.37384865155641509919e1 * t2137 * t4317 * t1181 - 0.10622921833547194700e0 * t705 * t13184 * t269 + 0.15934382750320792050e0 * t2133 * t3407 * t1024 - 0.13278652291933993376e0 * t7124 * t927 * t4170 - 0.15243447427901234237e2 * t1597 * t4184 * t355 - 0.22865171141851851357e2 * t490 * t3421 * t1024;
8262   t17482 = 0.10372043043679588041e-4 * t17137 - 0.25113094921099209164e-4 * t17139 + 0.54841825331504343850e-3 * t17142 + 0.28150260283386072598e-5 * t17144;
8263   t17526 = 0.70819478890314631335e-1 * t54 * t162 * t17482 + 0.16615495624729559964e1 * t167 * t61 * t17482 * t179 - 0.22865171141851851357e2 * t490 * t941 * t12269 - 0.76217237139506171188e1 * t490 * t941 * t17196 - 0.34297756712777777035e2 * t1597 * t1039 * t4980 + 0.20977047095244633367e3 * t5915 * t4198 * t8279 - 0.22865171141851851357e2 * t490 * t13212 * t1126 - 0.22865171141851851357e2 * t490 * t3421 * t4354 + 0.11432585570925925678e2 * t5940 * t4184 * t2709 + 0.15934382750320792050e0 * t2133 * t927 * t12269 - 0.37384865155641509919e1 * t2137 * t1115 * t13104 + 0.31465570642866950052e3 * t1618 * t2727 * t17228 + 0.31465570642866950052e3 * t1618 * t10087 * t4347 - 0.24056046973484009303e4 * t5905 * t8268 * t17209;
8264   t17548 = -0.18e2 * t52 * t10207 * t1020 + 0.6e1 * t1016 * t1186 + 0.2e1 * t52 * t923 * t4206 - t52 * t160 * (t17477 + t17526) - 0.3e1 * t4452 * t280 + 0.6e1 * t52 * t3382 * t1043 + t25 * t17482 * t71 + 0.6e1 * t52 * t13065 * t279 - 0.18e2 * t3144 * t3371 * t1043 + 0.6e1 * t356 * t4167 + 0.24e2 * t52 * t8363 * t4163;
8265   if(v4rho4 != NULL && (p->info->flags & XC_FLAGS_HAVE_LXC))
8266     v4sigma3tau[0] = -0.3e1 / 0.8e1 * t262 * t263 * (-0.3e1 * t1016 * t1206 + 0.6e1 * t1182 * t1021 - 0.3e1 * t1182 * t1044 - 0.18e2 * t270 * t4464 + 0.12e2 * t270 * t4467 + 0.6e1 * t270 * t4470 - 0.3e1 * t270 * t4514 - 0.6e1 * t356 * t4164 - t356 * t4207 - t4155 * t366 + t17548);
8267 
8268   if(v4rho4 != NULL && (p->info->flags & XC_FLAGS_HAVE_LXC))
8269     v4sigma3tau[1] = 0.0e0;
8270 
8271   if(v4rho4 != NULL && (p->info->flags & XC_FLAGS_HAVE_LXC))
8272     v4sigma3tau[2] = 0.0e0;
8273 
8274   if(v4rho4 != NULL && (p->info->flags & XC_FLAGS_HAVE_LXC))
8275     v4sigma3tau[3] = 0.0e0;
8276 
8277   if(v4rho4 != NULL && (p->info->flags & XC_FLAGS_HAVE_LXC))
8278     v4sigma3tau[4] = 0.0e0;
8279 
8280   if(v4rho4 != NULL && (p->info->flags & XC_FLAGS_HAVE_LXC))
8281     v4sigma3tau[5] = 0.0e0;
8282 
8283   if(v4rho4 != NULL && (p->info->flags & XC_FLAGS_HAVE_LXC))
8284     v4sigma3tau[6] = 0.0e0;
8285 
8286   if(v4rho4 != NULL && (p->info->flags & XC_FLAGS_HAVE_LXC))
8287     v4sigma3tau[7] = 0.0e0;
8288 
8289   if(v4rho4 != NULL && (p->info->flags & XC_FLAGS_HAVE_LXC))
8290     v4sigma3tau[8] = 0.0e0;
8291 
8292   if(v4rho4 != NULL && (p->info->flags & XC_FLAGS_HAVE_LXC))
8293     v4sigma3tau[9] = 0.0e0;
8294 
8295   if(v4rho4 != NULL && (p->info->flags & XC_FLAGS_HAVE_LXC))
8296     v4sigma3tau[10] = 0.0e0;
8297 
8298   if(v4rho4 != NULL && (p->info->flags & XC_FLAGS_HAVE_LXC))
8299     v4sigma3tau[11] = 0.0e0;
8300 
8301   if(v4rho4 != NULL && (p->info->flags & XC_FLAGS_HAVE_LXC))
8302     v4sigma3tau[12] = 0.0e0;
8303 
8304   if(v4rho4 != NULL && (p->info->flags & XC_FLAGS_HAVE_LXC))
8305     v4sigma3tau[13] = 0.0e0;
8306 
8307   if(v4rho4 != NULL && (p->info->flags & XC_FLAGS_HAVE_LXC))
8308     v4sigma3tau[14] = 0.0e0;
8309 
8310   if(v4rho4 != NULL && (p->info->flags & XC_FLAGS_HAVE_LXC))
8311     v4sigma3tau[15] = 0.0e0;
8312 
8313   if(v4rho4 != NULL && (p->info->flags & XC_FLAGS_HAVE_LXC))
8314     v4sigma3tau[16] = 0.0e0;
8315 
8316   if(v4rho4 != NULL && (p->info->flags & XC_FLAGS_HAVE_LXC))
8317     v4sigma3tau[17] = 0.0e0;
8318 
8319   if(v4rho4 != NULL && (p->info->flags & XC_FLAGS_HAVE_LXC))
8320     v4sigma3tau[18] = 0.0e0;
8321 
8322   t17572 = 0.10372043043679588041e-4 * t17263 - 0.25113094921099209164e-4 * t17265 + 0.54841825331504343850e-3 * t17268 + 0.28150260283386072598e-5 * t17270;
8323   t17643 = -0.22865171141851851357e2 * t659 * t3528 * t1069 - 0.15243447427901234237e2 * t1967 * t4253 * t374 - 0.13278652291933993376e0 * t7507 * t980 * t4239 + 0.15934382750320792050e0 * t2314 * t3514 * t1069 + 0.49846486874188679892e1 * t777 * t1157 * t4523 - 0.35409739445157315668e-1 * t772 * t980 * t4223 + 0.16615495624729559964e1 * t777 * t17325 * t374 + 0.49846486874188679892e1 * t777 * t4410 * t1214 + 0.24923243437094339947e1 * t7523 * t17302 * t374 - 0.37384865155641509919e1 * t2318 * t4400 * t1214 - 0.10622921833547194700e0 * t772 * t13379 * t292 - 0.10622921833547194700e0 * t772 * t3514 * t1060 - 0.34297756712777777034e2 * t12961 * t1235 + 0.31465570642866950052e3 * t3536 * t17278;
8324   t17687 = 0.16615495624729559964e1 * t240 * t61 * t17572 * t247 + 0.70819478890314631335e-1 * t54 * t236 * t17572 + 0.31465570642866950052e3 * t1984 * t2879 * t17364 - 0.22865171141851851357e2 * t659 * t13418 * t1168 - 0.22865171141851851357e2 * t659 * t3528 * t4437 + 0.31465570642866950052e3 * t1984 * t10400 * t4430 - 0.24056046973484009303e4 * t6871 * t8679 * t17329 - 0.34297756712777777035e2 * t1967 * t1084 * t5053 + 0.20977047095244633367e3 * t6892 * t4267 * t8690 + 0.15934382750320792050e0 * t2314 * t980 * t12436 - 0.37384865155641509919e1 * t2318 * t1157 * t13439 + 0.11432585570925925678e2 * t6904 * t4253 * t2861 - 0.22865171141851851357e2 * t659 * t994 * t12436 - 0.76217237139506171188e1 * t659 * t994 * t17336;
8325   t17691 = 0.6e1 * t375 * t4236 - 0.3e1 * t1215 * t1089 - 0.3e1 * t4524 * t303 + 0.6e1 * t104 * t3489 * t1088 + 0.6e1 * t293 * t4542 + 0.12e2 * t293 * t4539 - 0.18e2 * t3265 * t3478 * t1088 + 0.24e2 * t104 * t8640 * t4232 - 0.18e2 * t104 * t10488 * t1065 + 0.6e1 * t1061 * t1219 - t104 * t234 * (t17643 + t17687);
8326   if(v4rho4 != NULL && (p->info->flags & XC_FLAGS_HAVE_LXC))
8327     v4sigma3tau[19] = -0.3e1 / 0.8e1 * t262 * t286 * (0.6e1 * t104 * t13317 * t302 + 0.2e1 * t104 * t976 * t4275 + t25 * t17572 * t115 - 0.3e1 * t1061 * t1239 + 0.6e1 * t1215 * t1066 - 0.18e2 * t293 * t4536 - 0.3e1 * t293 * t4586 - 0.6e1 * t375 * t4233 - t375 * t4276 - t4224 * t385 + t17691);
8328 
8329   t17741 = t1104 * t1104;
8330   t17753 = 0.1e1 / t27 / t4144;
8331   t17755 = t17753 * t39 * t42;
8332   t17756 = t5814 * t17755;
8333   t17758 = t5820 * t17755;
8334   t17760 = t440 * t17753;
8335   t17761 = t17760 * t5828;
8336   t17763 = t17760 * t5827;
8337   t17765 = -0.51860215218397940203e-5 * t17756 + 0.12556547460549604582e-4 * t17758 - 0.27420912665752171925e-3 * t17761 - 0.14075130141693036299e-5 * t17763;
8338   t17769 = -0.76217237139506171188e1 * t490 * t3624 * t1024 - 0.15243447427901234237e2 * t1597 * t1278 * t1024 + 0.53114609167735973502e-1 * t2133 * t3610 * t1024 - 0.13278652291933993376e0 * t7124 * t3594 * t1024 - 0.70819478890314631336e-1 * t705 * t13586 * t269 - 0.35409739445157315668e-1 * t705 * t3610 * t1015 - 0.12461621718547169973e1 * t2137 * t4317 * t1254 + 0.16615495624729559964e1 * t710 * t4327 * t1254 + 0.33230991249459119928e1 * t710 * t1115 * t4601 + 0.33230991249459119928e1 * t710 * t1346 * t4292 + 0.53114609167735973502e-1 * t2133 * t3594 * t1015 + 0.24923243437094339947e1 * t7106 * t4317 * t1263 - 0.12461621718547169973e1 * t2137 * t4327 * t1263 - 0.70819478890314631336e-1 * t705 * t825 * t4292 - 0.15243447427901234238e2 * t490 * t17741 * t492 * t62 - 0.76217237139506171188e1 * t490 * t1278 * t1015 - 0.70819478890314631336e-1 * t54 * t469 * t17741 + 0.70819478890314631335e-1 * t54 * t162 * t17765;
8339   t17778 = t3208 * t12598;
8340   t17789 = t62 * t4292;
8341   t17793 = t174 * t1015;
8342   t17797 = t5910 * t1024;
8343   t17828 = 0.16615495624729559964e1 * t167 * t61 * t17765 * t179 + 0.33230991249459119928e1 * t474 * t61 * t17741 * t179 + 0.41954094190489266736e3 * t3207 * t17778 - 0.45730342283703702713e2 * t3807 * t4344 + 0.10488523547622316684e3 * t1618 * t10577 * t4347 - 0.30486894855802468476e2 * t490 * t839 * t12598 - 0.15243447427901234238e2 * t490 * t839 * t17789 + 0.10488523547622316684e3 * t1618 * t3632 * t17793 - 0.24056046973484009303e4 * t5905 * t10563 * t17797 - 0.11432585570925925678e2 * t1597 * t1039 * t5271 - 0.15243447427901234238e2 * t490 * t13684 * t1126 - 0.76217237139506171188e1 * t490 * t3624 * t4354 - 0.49846486874188679892e1 * t2137 * t1115 * t13697 + 0.11432585570925925678e2 * t5940 * t1039 * t10587 - 0.11432585570925925678e2 * t1597 * t1278 * t4354 + 0.20977047095244633367e3 * t5915 * t3632 * t4347 + 0.21245843667094389400e0 * t2133 * t825 * t12598 + 0.31465570642866950052e3 * t1618 * t3632 * t8972;
8344   t17839 = t1130 * t1130;
8345   t17856 = -0.2e1 * t270 * t4666 - t1016 * t1283 - t52 * t160 * (t17769 + t17828) - t1255 * t1044 - 0.2e1 * t4602 * t280 - 0.4e1 * t1105 * t1131 - 0.2e1 * t4293 * t325 + 0.4e1 * t52 * t462 * t17839 + 0.2e1 * t1255 * t1021 - 0.24e2 * t3144 * t3145 * t1130 + 0.4e1 * t52 * t821 * t4358 + 0.8e1 * t270 * t4616 - 0.6e1 * t52 * t10744 * t1020;
8346   t17887 = 0.24e2 * t52 * t10732 * t1020 - 0.6e1 * t52 * t3582 * t1043 + 0.2e1 * t52 * t3590 * t1043 + 0.4e1 * t52 * t13554 * t279 + t25 * t17765 * t71 + 0.2e1 * t1016 * t1260 + 0.8e1 * t1105 * t1109 - 0.12e2 * t270 * t4613 + 0.4e1 * t270 * t4620 - 0.12e2 * t315 * t4305 + 0.8e1 * t315 * t4308 + 0.4e1 * t315 * t4311 - 0.2e1 * t315 * t4359;
8347   if(v4rho4 != NULL && (p->info->flags & XC_FLAGS_NEEDS_LAPLACIAN) && (p->info->flags & XC_FLAGS_HAVE_LXC))
8348     v4sigma2lapl2[0] = -0.3e1 / 0.8e1 * t262 * t263 * (t17856 + t17887);
8349 
8350   if(v4rho4 != NULL && (p->info->flags & XC_FLAGS_NEEDS_LAPLACIAN) && (p->info->flags & XC_FLAGS_HAVE_LXC))
8351     v4sigma2lapl2[1] = 0.0e0;
8352 
8353   if(v4rho4 != NULL && (p->info->flags & XC_FLAGS_NEEDS_LAPLACIAN) && (p->info->flags & XC_FLAGS_HAVE_LXC))
8354     v4sigma2lapl2[2] = 0.0e0;
8355 
8356   if(v4rho4 != NULL && (p->info->flags & XC_FLAGS_NEEDS_LAPLACIAN) && (p->info->flags & XC_FLAGS_HAVE_LXC))
8357     v4sigma2lapl2[3] = 0.0e0;
8358 
8359   if(v4rho4 != NULL && (p->info->flags & XC_FLAGS_NEEDS_LAPLACIAN) && (p->info->flags & XC_FLAGS_HAVE_LXC))
8360     v4sigma2lapl2[4] = 0.0e0;
8361 
8362   if(v4rho4 != NULL && (p->info->flags & XC_FLAGS_NEEDS_LAPLACIAN) && (p->info->flags & XC_FLAGS_HAVE_LXC))
8363     v4sigma2lapl2[5] = 0.0e0;
8364 
8365   if(v4rho4 != NULL && (p->info->flags & XC_FLAGS_NEEDS_LAPLACIAN) && (p->info->flags & XC_FLAGS_HAVE_LXC))
8366     v4sigma2lapl2[6] = 0.0e0;
8367 
8368   if(v4rho4 != NULL && (p->info->flags & XC_FLAGS_NEEDS_LAPLACIAN) && (p->info->flags & XC_FLAGS_HAVE_LXC))
8369     v4sigma2lapl2[7] = 0.0e0;
8370 
8371   if(v4rho4 != NULL && (p->info->flags & XC_FLAGS_NEEDS_LAPLACIAN) && (p->info->flags & XC_FLAGS_HAVE_LXC))
8372     v4sigma2lapl2[8] = 0.0e0;
8373 
8374   if(v4rho4 != NULL && (p->info->flags & XC_FLAGS_NEEDS_LAPLACIAN) && (p->info->flags & XC_FLAGS_HAVE_LXC))
8375     v4sigma2lapl2[9] = 0.0e0;
8376 
8377   if(v4rho4 != NULL && (p->info->flags & XC_FLAGS_NEEDS_LAPLACIAN) && (p->info->flags & XC_FLAGS_HAVE_LXC))
8378     v4sigma2lapl2[10] = 0.0e0;
8379 
8380   if(v4rho4 != NULL && (p->info->flags & XC_FLAGS_NEEDS_LAPLACIAN) && (p->info->flags & XC_FLAGS_HAVE_LXC))
8381     v4sigma2lapl2[11] = 0.0e0;
8382 
8383   if(v4rho4 != NULL && (p->info->flags & XC_FLAGS_NEEDS_LAPLACIAN) && (p->info->flags & XC_FLAGS_HAVE_LXC))
8384     v4sigma2lapl2[12] = 0.0e0;
8385 
8386   if(v4rho4 != NULL && (p->info->flags & XC_FLAGS_NEEDS_LAPLACIAN) && (p->info->flags & XC_FLAGS_HAVE_LXC))
8387     v4sigma2lapl2[13] = 0.0e0;
8388 
8389   if(v4rho4 != NULL && (p->info->flags & XC_FLAGS_NEEDS_LAPLACIAN) && (p->info->flags & XC_FLAGS_HAVE_LXC))
8390     v4sigma2lapl2[14] = 0.0e0;
8391 
8392   if(v4rho4 != NULL && (p->info->flags & XC_FLAGS_NEEDS_LAPLACIAN) && (p->info->flags & XC_FLAGS_HAVE_LXC))
8393     v4sigma2lapl2[15] = 0.0e0;
8394 
8395   if(v4rho4 != NULL && (p->info->flags & XC_FLAGS_NEEDS_LAPLACIAN) && (p->info->flags & XC_FLAGS_HAVE_LXC))
8396     v4sigma2lapl2[16] = 0.0e0;
8397 
8398   t17892 = t1172 * t1172;
8399   t17897 = 0.1e1 / t82 / t4213;
8400   t17899 = t17897 * t39 * t42;
8401   t17900 = t6763 * t17899;
8402   t17902 = t6769 * t17899;
8403   t17904 = t616 * t17897;
8404   t17905 = t17904 * t5828;
8405   t17907 = t17904 * t5827;
8406   t17909 = -0.51860215218397940203e-5 * t17900 + 0.12556547460549604582e-4 * t17902 - 0.27420912665752171925e-3 * t17905 - 0.14075130141693036299e-5 * t17907;
8407   t17925 = t106 * t4375;
8408   t17929 = t242 * t1060;
8409   t17933 = t6876 * t1069;
8410   t17976 = 0.31465570642866950052e3 * t1984 * t3734 * t9301 - 0.30486894855802468476e2 * t659 * t896 * t12867 - 0.15243447427901234238e2 * t659 * t896 * t17925 + 0.10488523547622316684e3 * t1984 * t3734 * t17929 - 0.24056046973484009303e4 * t6871 * t10933 * t17933 + 0.53114609167735973502e-1 * t2314 * t3696 * t1060 + 0.24923243437094339947e1 * t7523 * t4400 * t1307 - 0.12461621718547169973e1 * t2318 * t4410 * t1307 - 0.15243447427901234237e2 * t1967 * t1322 * t1069 + 0.53114609167735973502e-1 * t2314 * t3712 * t1069 - 0.13278652291933993376e0 * t7507 * t3696 * t1069 + 0.16615495624729559964e1 * t777 * t4410 * t1298 + 0.33230991249459119928e1 * t777 * t1157 * t4681 + 0.33230991249459119928e1 * t777 * t1381 * t4375 - 0.70819478890314631336e-1 * t772 * t13837 * t292 - 0.35409739445157315668e-1 * t772 * t3712 * t1060 - 0.70819478890314631336e-1 * t772 * t882 * t4375 - 0.76217237139506171188e1 * t659 * t3726 * t1069;
8411   t17977 = t1146 * t1146;
8412   t18002 = t3329 * t12867;
8413   t18034 = -0.15243447427901234238e2 * t659 * t17977 * t661 * t106 - 0.76217237139506171188e1 * t659 * t1322 * t1060 - 0.12461621718547169973e1 * t2318 * t4400 * t1298 - 0.70819478890314631336e-1 * t54 * t641 * t17977 + 0.33230991249459119928e1 * t646 * t61 * t17977 * t247 + 0.70819478890314631335e-1 * t54 * t236 * t17909 + 0.16615495624729559964e1 * t240 * t61 * t17909 * t247 + 0.41954094190489266736e3 * t3328 * t18002 - 0.45730342283703702713e2 * t3917 * t4427 - 0.11432585570925925678e2 * t1967 * t1084 * t5347 - 0.15243447427901234238e2 * t659 * t13920 * t1168 - 0.76217237139506171188e1 * t659 * t3726 * t4437 + 0.10488523547622316684e3 * t1984 * t10944 * t4430 - 0.11432585570925925678e2 * t1967 * t1322 * t4437 + 0.20977047095244633367e3 * t6892 * t3734 * t4430 + 0.21245843667094389400e0 * t2314 * t882 * t12867 - 0.49846486874188679892e1 * t2318 * t1157 * t13913 + 0.11432585570925925678e2 * t6904 * t1084 * t10847;
8414   t18053 = 0.4e1 * t104 * t634 * t17892 + t25 * t17909 * t115 - 0.2e1 * t4682 * t303 - t1299 * t1089 - 0.4e1 * t1147 * t1173 - 0.2e1 * t4376 * t347 - t104 * t234 * (t17976 + t18034) - 0.24e2 * t3265 * t3266 * t1172 + 0.4e1 * t293 * t4700 - 0.6e1 * t104 * t11051 * t1065 - 0.12e2 * t293 * t4693 + 0.8e1 * t293 * t4696 - 0.6e1 * t104 * t3684 * t1088;
8415   t18083 = 0.24e2 * t104 * t11019 * t1065 + 0.2e1 * t104 * t3692 * t1088 + 0.4e1 * t104 * t13816 * t302 + 0.4e1 * t104 * t878 * t4441 + 0.2e1 * t1061 * t1304 - t1061 * t1327 + 0.2e1 * t1299 * t1066 + 0.8e1 * t1147 * t1151 - 0.2e1 * t293 * t4746 - 0.12e2 * t337 * t4388 + 0.8e1 * t337 * t4391 + 0.4e1 * t337 * t4394 - 0.2e1 * t337 * t4442;
8416   if(v4rho4 != NULL && (p->info->flags & XC_FLAGS_NEEDS_LAPLACIAN) && (p->info->flags & XC_FLAGS_HAVE_LXC))
8417     v4sigma2lapl2[17] = -0.3e1 / 0.8e1 * t262 * t286 * (t18053 + t18083);
8418 
8419   t18092 = 0.20744086087359176081e-4 * t17756 - 0.50226189842198418325e-4 * t17758 + 0.10968365066300868769e-2 * t17761 + 0.56300520566772145196e-5 * t17763;
8420   t18146 = 0.20977047095244633367e3 * t11197 * t4504 + 0.11432585570925925678e2 * t12688 * t1358 + 0.31465570642866950052e3 * t3429 * t9553 * t12622 + 0.20977047095244633368e3 * t13156 * t4822 + 0.20977047095244633368e3 * t3429 * t17778 + 0.10488523547622316684e3 * t3429 * t3208 * t12605 - 0.24056046973484009303e4 * t10132 * t9568 * t12622 - 0.22865171141851851356e2 * t14069 * t1202 - 0.22865171141851851356e2 * t3807 * t4501 - 0.11432585570925925678e2 * t3807 * t4510 + 0.16615495624729559964e1 * t710 * t4292 * t179 * t355;
8421   t18180 = 0.33230991249459119928e1 * t710 * t4794 * t1181 - 0.35409739445157315668e-1 * t705 * t13184 * t314 - 0.70819478890314631336e-1 * t705 * t3407 * t1104 - 0.76217237139506171188e1 * t490 * t3827 * t1024 + 0.53114609167735973502e-1 * t2133 * t3813 * t1024 - 0.12461621718547169973e1 * t2137 * t4317 * t1335 + 0.16615495624729559964e1 * t710 * t4327 * t1335 + 0.33230991249459119928e1 * t710 * t1115 * t4755 + 0.16615495624729559964e1 * t710 * t1346 * t4451 - 0.70819478890314631336e-1 * t705 * t14214 * t269 - 0.35409739445157315668e-1 * t705 * t3813 * t1015;
8422   t18216 = -0.35409739445157315668e-1 * t705 * t927 * t4292 + 0.70819478890314631335e-1 * t54 * t162 * t18092 + 0.16615495624729559964e1 * t167 * t61 * t18092 * t179 - 0.76217237139506171188e1 * t490 * t941 * t17789 - 0.11432585570925925678e2 * t1597 * t1039 * t5414 - 0.15243447427901234238e2 * t490 * t14133 * t1126 - 0.76217237139506171188e1 * t490 * t3827 * t4354 + 0.10488523547622316684e3 * t1618 * t11164 * t4347 - 0.76217237139506171188e1 * t490 * t13212 * t1357 - 0.24923243437094339946e1 * t2137 * t1115 * t14101 - 0.24923243437094339946e1 * t2137 * t1115 * t14151;
8423   t18250 = 0.10622921833547194700e0 * t2133 * t3407 * t3164 + 0.10622921833547194700e0 * t2133 * t927 * t12598 + 0.53114609167735973502e-1 * t2133 * t927 * t12605 + 0.24923243437094339947e1 * t7106 * t4317 * t3792 - 0.12461621718547169973e1 * t2137 * t4327 * t3792 - 0.15243447427901234238e2 * t490 * t3421 * t3164 - 0.15243447427901234238e2 * t490 * t3421 * t4654 - 0.76217237139506171188e1 * t490 * t941 * t12605 - 0.15243447427901234238e2 * t490 * t941 * t12598 - 0.15243447427901234237e2 * t1597 * t839 * t13122 - 0.13278652291933993376e0 * t7124 * t927 * t12622;
8424   t18268 = t25 * t18092 * t71 - t1016 * t1362 - 0.12e2 * t12724 * t4769 - 0.12e2 * t3144 * t14287 * t279 - 0.12e2 * t3144 * t14327 * t279 - 0.6e1 * t3144 * t3773 * t1043 - 0.2e1 * t1105 * t1206 + 0.2e1 * t1336 * t1021 - t4293 * t366 + 0.24e2 * t9638 * t3773 * t1020 - 0.6e1 * t356 * t4305 - 0.6e1 * t315 * t4464 - t52 * t160 * (t18146 + t18180 + t18216 + t18250) + 0.2e1 * t52 * t13065 * t324 + 0.4e1 * t270 * t4779 + 0.4e1 * t52 * t3382 * t1130 + 0.2e1 * t52 * t923 * t4358 + 0.4e1 * t1105 * t1186;
8425   t18304 = -0.6e1 * t52 * t11289 * t1020 + 0.2e1 * t52 * t3784 * t1043 + 0.4e1 * t52 * t14302 * t279 + 0.2e1 * t1016 * t1340 - t1336 * t1044 + 0.4e1 * t1182 * t1109 - 0.2e1 * t1182 * t1131 + 0.4e1 * t270 * t4772 + 0.4e1 * t270 * t4775 - 0.2e1 * t270 * t4832 - 0.2e1 * t4756 * t280 + 0.4e1 * t315 * t4467 + 0.2e1 * t315 * t4470 - t315 * t4514 - t4452 * t325 + 0.4e1 * t356 * t4308 + 0.2e1 * t356 * t4311 - t356 * t4359;
8426   if(v4rho4 != NULL && (p->info->flags & XC_FLAGS_NEEDS_LAPLACIAN) && (p->info->flags & XC_FLAGS_HAVE_LXC))
8427     v4sigma2lapltau[0] = -0.3e1 / 0.8e1 * t262 * t263 * (t18268 + t18304);
8428 
8429   if(v4rho4 != NULL && (p->info->flags & XC_FLAGS_NEEDS_LAPLACIAN) && (p->info->flags & XC_FLAGS_HAVE_LXC))
8430     v4sigma2lapltau[1] = 0.0e0;
8431 
8432   if(v4rho4 != NULL && (p->info->flags & XC_FLAGS_NEEDS_LAPLACIAN) && (p->info->flags & XC_FLAGS_HAVE_LXC))
8433     v4sigma2lapltau[2] = 0.0e0;
8434 
8435   if(v4rho4 != NULL && (p->info->flags & XC_FLAGS_NEEDS_LAPLACIAN) && (p->info->flags & XC_FLAGS_HAVE_LXC))
8436     v4sigma2lapltau[3] = 0.0e0;
8437 
8438   if(v4rho4 != NULL && (p->info->flags & XC_FLAGS_NEEDS_LAPLACIAN) && (p->info->flags & XC_FLAGS_HAVE_LXC))
8439     v4sigma2lapltau[4] = 0.0e0;
8440 
8441   if(v4rho4 != NULL && (p->info->flags & XC_FLAGS_NEEDS_LAPLACIAN) && (p->info->flags & XC_FLAGS_HAVE_LXC))
8442     v4sigma2lapltau[5] = 0.0e0;
8443 
8444   if(v4rho4 != NULL && (p->info->flags & XC_FLAGS_NEEDS_LAPLACIAN) && (p->info->flags & XC_FLAGS_HAVE_LXC))
8445     v4sigma2lapltau[6] = 0.0e0;
8446 
8447   if(v4rho4 != NULL && (p->info->flags & XC_FLAGS_NEEDS_LAPLACIAN) && (p->info->flags & XC_FLAGS_HAVE_LXC))
8448     v4sigma2lapltau[7] = 0.0e0;
8449 
8450   if(v4rho4 != NULL && (p->info->flags & XC_FLAGS_NEEDS_LAPLACIAN) && (p->info->flags & XC_FLAGS_HAVE_LXC))
8451     v4sigma2lapltau[8] = 0.0e0;
8452 
8453   if(v4rho4 != NULL && (p->info->flags & XC_FLAGS_NEEDS_LAPLACIAN) && (p->info->flags & XC_FLAGS_HAVE_LXC))
8454     v4sigma2lapltau[9] = 0.0e0;
8455 
8456   if(v4rho4 != NULL && (p->info->flags & XC_FLAGS_NEEDS_LAPLACIAN) && (p->info->flags & XC_FLAGS_HAVE_LXC))
8457     v4sigma2lapltau[10] = 0.0e0;
8458 
8459   if(v4rho4 != NULL && (p->info->flags & XC_FLAGS_NEEDS_LAPLACIAN) && (p->info->flags & XC_FLAGS_HAVE_LXC))
8460     v4sigma2lapltau[11] = 0.0e0;
8461 
8462   if(v4rho4 != NULL && (p->info->flags & XC_FLAGS_NEEDS_LAPLACIAN) && (p->info->flags & XC_FLAGS_HAVE_LXC))
8463     v4sigma2lapltau[12] = 0.0e0;
8464 
8465   if(v4rho4 != NULL && (p->info->flags & XC_FLAGS_NEEDS_LAPLACIAN) && (p->info->flags & XC_FLAGS_HAVE_LXC))
8466     v4sigma2lapltau[13] = 0.0e0;
8467 
8468   if(v4rho4 != NULL && (p->info->flags & XC_FLAGS_NEEDS_LAPLACIAN) && (p->info->flags & XC_FLAGS_HAVE_LXC))
8469     v4sigma2lapltau[14] = 0.0e0;
8470 
8471   if(v4rho4 != NULL && (p->info->flags & XC_FLAGS_NEEDS_LAPLACIAN) && (p->info->flags & XC_FLAGS_HAVE_LXC))
8472     v4sigma2lapltau[15] = 0.0e0;
8473 
8474   if(v4rho4 != NULL && (p->info->flags & XC_FLAGS_NEEDS_LAPLACIAN) && (p->info->flags & XC_FLAGS_HAVE_LXC))
8475     v4sigma2lapltau[16] = 0.0e0;
8476 
8477   if(v4rho4 != NULL && (p->info->flags & XC_FLAGS_NEEDS_LAPLACIAN) && (p->info->flags & XC_FLAGS_HAVE_LXC))
8478     v4sigma2lapltau[17] = 0.0e0;
8479 
8480   if(v4rho4 != NULL && (p->info->flags & XC_FLAGS_NEEDS_LAPLACIAN) && (p->info->flags & XC_FLAGS_HAVE_LXC))
8481     v4sigma2lapltau[18] = 0.0e0;
8482 
8483   if(v4rho4 != NULL && (p->info->flags & XC_FLAGS_NEEDS_LAPLACIAN) && (p->info->flags & XC_FLAGS_HAVE_LXC))
8484     v4sigma2lapltau[19] = 0.0e0;
8485 
8486   if(v4rho4 != NULL && (p->info->flags & XC_FLAGS_NEEDS_LAPLACIAN) && (p->info->flags & XC_FLAGS_HAVE_LXC))
8487     v4sigma2lapltau[20] = 0.0e0;
8488 
8489   if(v4rho4 != NULL && (p->info->flags & XC_FLAGS_NEEDS_LAPLACIAN) && (p->info->flags & XC_FLAGS_HAVE_LXC))
8490     v4sigma2lapltau[21] = 0.0e0;
8491 
8492   if(v4rho4 != NULL && (p->info->flags & XC_FLAGS_NEEDS_LAPLACIAN) && (p->info->flags & XC_FLAGS_HAVE_LXC))
8493     v4sigma2lapltau[22] = 0.0e0;
8494 
8495   t18352 = -0.6e1 * t104 * t11592 * t1065 + 0.2e1 * t104 * t3894 * t1088 + 0.4e1 * t104 * t3489 * t1172 + 0.2e1 * t104 * t13317 * t346 + 0.24e2 * t9939 * t3883 * t1065 - 0.6e1 * t3265 * t3883 * t1088 - 0.12e2 * t3265 * t14604 * t302 - 0.12e2 * t3265 * t14608 * t302 + 0.2e1 * t1061 * t1375 - 0.12e2 * t12999 * t4855 + 0.4e1 * t293 * t4858 + 0.4e1 * t293 * t4861 + 0.4e1 * t293 * t4865 + 0.4e1 * t337 * t4539 + 0.2e1 * t337 * t4542 - 0.6e1 * t375 * t4388 + 0.2e1 * t375 * t4394 - t375 * t4442;
8496   t18404 = 0.33230991249459119928e1 * t777 * t1157 * t4841 - 0.76217237139506171188e1 * t659 * t3937 * t1069 + 0.53114609167735973502e-1 * t2314 * t3923 * t1069 + 0.33230991249459119928e1 * t777 * t4880 * t1214 - 0.35409739445157315668e-1 * t772 * t13379 * t336 - 0.70819478890314631336e-1 * t772 * t3514 * t1146 - 0.35409739445157315668e-1 * t772 * t980 * t4375 + 0.16615495624729559964e1 * t777 * t1381 * t4523 - 0.70819478890314631336e-1 * t772 * t14404 * t292 - 0.35409739445157315668e-1 * t772 * t3923 * t1060 - 0.12461621718547169973e1 * t2318 * t4400 * t1370;
8497   t18416 = 0.20744086087359176081e-4 * t17900 - 0.50226189842198418325e-4 * t17902 + 0.10968365066300868769e-2 * t17905 + 0.56300520566772145196e-5 * t17907;
8498   t18445 = 0.16615495624729559964e1 * t777 * t4410 * t1370 + 0.16615495624729559964e1 * t777 * t4375 * t247 * t374 + 0.70819478890314631335e-1 * t54 * t236 * t18416 + 0.16615495624729559964e1 * t240 * t61 * t18416 * t247 - 0.15243447427901234237e2 * t1967 * t896 * t13456 - 0.13278652291933993376e0 * t7507 * t980 * t12857 - 0.11432585570925925678e2 * t1967 * t1084 * t5488 - 0.15243447427901234238e2 * t659 * t14479 * t1168 - 0.76217237139506171188e1 * t659 * t3937 * t4437 + 0.10488523547622316684e3 * t1984 * t11467 * t4430 - 0.76217237139506171188e1 * t659 * t13418 * t1392;
8499   t18480 = -0.15243447427901234238e2 * t659 * t3528 * t3285 + 0.10622921833547194700e0 * t2314 * t3514 * t3285 + 0.10622921833547194700e0 * t2314 * t980 * t12867 + 0.53114609167735973502e-1 * t2314 * t980 * t12874 + 0.24923243437094339947e1 * t7523 * t4400 * t3902 - 0.12461621718547169973e1 * t2318 * t4410 * t3902 - 0.24923243437094339946e1 * t2318 * t1157 * t14500 - 0.24923243437094339946e1 * t2318 * t1157 * t14441 - 0.15243447427901234238e2 * t659 * t3528 * t4734 - 0.76217237139506171188e1 * t659 * t994 * t12874 - 0.15243447427901234238e2 * t659 * t994 * t12867;
8500   t18507 = -0.76217237139506171188e1 * t659 * t994 * t17925 + 0.31465570642866950052e3 * t3536 * t9909 * t12857 + 0.20977047095244633368e3 * t3536 * t18002 + 0.10488523547622316684e3 * t3536 * t3329 * t12874 - 0.24056046973484009303e4 * t10460 * t9890 * t12857 - 0.11432585570925925678e2 * t3917 * t4582 + 0.20977047095244633367e3 * t11405 * t4576 + 0.20977047095244633368e3 * t13355 * t4908 + 0.11432585570925925678e2 * t12944 * t1393 - 0.22865171141851851356e2 * t14542 * t1235 - 0.22865171141851851356e2 * t3917 * t4573;
8501   t18525 = 0.4e1 * t104 * t14668 * t302 - 0.6e1 * t337 * t4536 + 0.4e1 * t1147 * t1219 + 0.2e1 * t104 * t976 * t4441 + 0.4e1 * t375 * t4391 + 0.4e1 * t1215 * t1151 - 0.2e1 * t1147 * t1239 - t4376 * t385 - t337 * t4586 - t104 * t234 * (t18404 + t18445 + t18480 + t18507) - 0.2e1 * t293 * t4918 + t25 * t18416 * t115 - t1061 * t1397 - t1371 * t1089 - 0.2e1 * t4842 * t303 - 0.2e1 * t1215 * t1173 + 0.2e1 * t1371 * t1066 - t4524 * t347;
8502   if(v4rho4 != NULL && (p->info->flags & XC_FLAGS_NEEDS_LAPLACIAN) && (p->info->flags & XC_FLAGS_HAVE_LXC))
8503     v4sigma2lapltau[23] = -0.3e1 / 0.8e1 * t262 * t286 * (t18352 + t18525);
8504 
8505   t18534 = -0.82976344349436704322e-4 * t17756 + 0.20090475936879367330e-3 * t17758 - 0.43873460265203475079e-2 * t17761 - 0.22520208226708858078e-4 * t17763;
8506   t18566 = 0.24e2 * t52 * t11808 * t1020 - 0.6e1 * t52 * t3983 * t1043 + 0.2e1 * t52 * t3991 * t1043 + 0.4e1 * t52 * t14900 * t279 + t25 * t18534 * t71 + 0.4e1 * t52 * t923 * t4513 + 0.8e1 * t1182 * t1186 - 0.12e2 * t270 * t4939 + 0.8e1 * t270 * t4942 + 0.4e1 * t270 * t4946 - 0.12e2 * t356 * t4464 + 0.8e1 * t356 * t4467 + 0.4e1 * t356 * t4470;
8507   t18572 = t1205 * t1205;
8508   t18587 = t1181 * t1181;
8509   t18645 = -0.70819478890314631336e-1 * t54 * t469 * t18587 + 0.33230991249459119928e1 * t474 * t61 * t18587 * t179 + 0.70819478890314631335e-1 * t54 * t162 * t18534 + 0.16615495624729559964e1 * t167 * t61 * t18534 * t179 + 0.10488523547622316684e3 * t1618 * t4034 * t17793 - 0.24056046973484009303e4 * t5905 * t11727 * t17797 - 0.11432585570925925678e2 * t1597 * t1039 * t11699 - 0.15243447427901234238e2 * t490 * t14809 * t1126 - 0.76217237139506171188e1 * t490 * t4026 * t4354 + 0.10488523547622316684e3 * t1618 * t11689 * t4347 - 0.30486894855802468476e2 * t490 * t941 * t13132 - 0.15243447427901234238e2 * t490 * t941 * t62 * t4451 + 0.11432585570925925678e2 * t5940 * t1039 * t11707 - 0.11432585570925925678e2 * t1597 * t1429 * t4354 + 0.20977047095244633367e3 * t5915 * t4034 * t4347 + 0.21245843667094389400e0 * t2133 * t927 * t13132 - 0.49846486874188679892e1 * t2137 * t1115 * t14822 + 0.31465570642866950052e3 * t1618 * t4034 * t8972;
8510   t18700 = -0.45730342283703702713e2 * t11658 * t4501 + 0.41954094190489266736e3 * t3429 * t3208 * t13132 - 0.12461621718547169973e1 * t2137 * t4327 * t1414 - 0.76217237139506171188e1 * t490 * t1429 * t1015 - 0.12461621718547169973e1 * t2137 * t4317 * t1405 + 0.16615495624729559964e1 * t710 * t4327 * t1405 + 0.33230991249459119928e1 * t710 * t1115 * t4927 - 0.70819478890314631336e-1 * t705 * t14735 * t269 - 0.35409739445157315668e-1 * t705 * t4012 * t1015 - 0.70819478890314631336e-1 * t705 * t927 * t4451 + 0.33230991249459119928e1 * t710 * t4005 * t4451 + 0.53114609167735973502e-1 * t2133 * t3995 * t1015 + 0.24923243437094339947e1 * t7106 * t4317 * t1414 + 0.53114609167735973502e-1 * t2133 * t4012 * t1024 - 0.13278652291933993376e0 * t7124 * t3995 * t1024 - 0.76217237139506171188e1 * t490 * t4026 * t1024 - 0.15243447427901234238e2 * t490 * t18587 * t492 * t62 - 0.15243447427901234237e2 * t1597 * t1429 * t1024;
8511   t18710 = -0.6e1 * t52 * t11649 * t1020 + 0.2e1 * t1406 * t1021 + 0.4e1 * t52 * t462 * t18572 - 0.2e1 * t4928 * t280 - t1406 * t1044 - 0.4e1 * t1182 * t1206 - 0.2e1 * t4452 * t366 + 0.2e1 * t1016 * t1411 - 0.2e1 * t356 * t4514 - t52 * t160 * (t18645 + t18700) - t1016 * t1434 - 0.2e1 * t270 * t4991 - 0.24e2 * t3144 * t3371 * t1205;
8512   if(v4rho4 != NULL && (p->info->flags & XC_FLAGS_HAVE_LXC))
8513     v4sigma2tau2[0] = -0.3e1 / 0.8e1 * t262 * t263 * (t18566 + t18710);
8514 
8515   if(v4rho4 != NULL && (p->info->flags & XC_FLAGS_HAVE_LXC))
8516     v4sigma2tau2[1] = 0.0e0;
8517 
8518   if(v4rho4 != NULL && (p->info->flags & XC_FLAGS_HAVE_LXC))
8519     v4sigma2tau2[2] = 0.0e0;
8520 
8521   if(v4rho4 != NULL && (p->info->flags & XC_FLAGS_HAVE_LXC))
8522     v4sigma2tau2[3] = 0.0e0;
8523 
8524   if(v4rho4 != NULL && (p->info->flags & XC_FLAGS_HAVE_LXC))
8525     v4sigma2tau2[4] = 0.0e0;
8526 
8527   if(v4rho4 != NULL && (p->info->flags & XC_FLAGS_HAVE_LXC))
8528     v4sigma2tau2[5] = 0.0e0;
8529 
8530   if(v4rho4 != NULL && (p->info->flags & XC_FLAGS_HAVE_LXC))
8531     v4sigma2tau2[6] = 0.0e0;
8532 
8533   if(v4rho4 != NULL && (p->info->flags & XC_FLAGS_HAVE_LXC))
8534     v4sigma2tau2[7] = 0.0e0;
8535 
8536   if(v4rho4 != NULL && (p->info->flags & XC_FLAGS_HAVE_LXC))
8537     v4sigma2tau2[8] = 0.0e0;
8538 
8539   if(v4rho4 != NULL && (p->info->flags & XC_FLAGS_HAVE_LXC))
8540     v4sigma2tau2[9] = 0.0e0;
8541 
8542   if(v4rho4 != NULL && (p->info->flags & XC_FLAGS_HAVE_LXC))
8543     v4sigma2tau2[10] = 0.0e0;
8544 
8545   if(v4rho4 != NULL && (p->info->flags & XC_FLAGS_HAVE_LXC))
8546     v4sigma2tau2[11] = 0.0e0;
8547 
8548   if(v4rho4 != NULL && (p->info->flags & XC_FLAGS_HAVE_LXC))
8549     v4sigma2tau2[12] = 0.0e0;
8550 
8551   if(v4rho4 != NULL && (p->info->flags & XC_FLAGS_HAVE_LXC))
8552     v4sigma2tau2[13] = 0.0e0;
8553 
8554   if(v4rho4 != NULL && (p->info->flags & XC_FLAGS_HAVE_LXC))
8555     v4sigma2tau2[14] = 0.0e0;
8556 
8557   if(v4rho4 != NULL && (p->info->flags & XC_FLAGS_HAVE_LXC))
8558     v4sigma2tau2[15] = 0.0e0;
8559 
8560   if(v4rho4 != NULL && (p->info->flags & XC_FLAGS_HAVE_LXC))
8561     v4sigma2tau2[16] = 0.0e0;
8562 
8563   t18747 = 0.24e2 * t104 * t12103 * t1065 - 0.6e1 * t104 * t12109 * t1065 - 0.6e1 * t104 * t4079 * t1088 + 0.2e1 * t104 * t4087 * t1088 + 0.4e1 * t104 * t15165 * t302 + 0.4e1 * t104 * t976 * t4585 + 0.8e1 * t1215 * t1219 - 0.12e2 * t293 * t5012 + 0.8e1 * t293 * t5015 + 0.4e1 * t293 * t5019 - 0.12e2 * t375 * t4536 + 0.8e1 * t375 * t4539 + 0.4e1 * t375 * t4542;
8564   t18760 = t1238 * t1238;
8565   t18771 = t1214 * t1214;
8566   t18783 = -0.82976344349436704322e-4 * t17900 + 0.20090475936879367330e-3 * t17902 - 0.43873460265203475079e-2 * t17905 - 0.22520208226708858078e-4 * t17907;
8567   t18833 = -0.70819478890314631336e-1 * t54 * t641 * t18771 + 0.33230991249459119928e1 * t646 * t61 * t18771 * t247 + 0.16615495624729559964e1 * t240 * t61 * t18783 * t247 + 0.70819478890314631335e-1 * t54 * t236 * t18783 - 0.76217237139506171188e1 * t659 * t1466 * t1060 - 0.12461621718547169973e1 * t2318 * t4400 * t1442 + 0.16615495624729559964e1 * t777 * t4410 * t1442 + 0.33230991249459119928e1 * t777 * t1157 * t5000 - 0.70819478890314631336e-1 * t772 * t15067 * t292 - 0.35409739445157315668e-1 * t772 * t4108 * t1060 - 0.70819478890314631336e-1 * t772 * t980 * t4523 - 0.11432585570925925678e2 * t1967 * t1084 * t11999 + 0.21245843667094389400e0 * t2314 * t980 * t13431 - 0.49846486874188679892e1 * t2318 * t1157 * t15004 + 0.11432585570925925678e2 * t6904 * t1084 * t12010 + 0.10488523547622316684e3 * t1984 * t4130 * t17929 - 0.24056046973484009303e4 * t6871 * t11970 * t17933 - 0.15243447427901234238e2 * t659 * t15060 * t1168;
8568   t18889 = -0.76217237139506171188e1 * t659 * t4122 * t4437 + 0.10488523547622316684e3 * t1984 * t11981 * t4430 - 0.30486894855802468476e2 * t659 * t994 * t13431 - 0.15243447427901234238e2 * t659 * t994 * t106 * t4523 - 0.11432585570925925678e2 * t1967 * t1466 * t4437 + 0.20977047095244633367e3 * t6892 * t4130 * t4430 + 0.31465570642866950052e3 * t1984 * t4130 * t9301 + 0.41954094190489266736e3 * t3536 * t3329 * t13431 - 0.45730342283703702713e2 * t12045 * t4573 - 0.15243447427901234238e2 * t659 * t18771 * t661 * t106 - 0.15243447427901234237e2 * t1967 * t1466 * t1069 + 0.53114609167735973502e-1 * t2314 * t4108 * t1069 - 0.13278652291933993376e0 * t7507 * t4091 * t1069 + 0.33230991249459119928e1 * t777 * t4101 * t4523 + 0.53114609167735973502e-1 * t2314 * t4091 * t1060 + 0.24923243437094339947e1 * t7523 * t4400 * t1451 - 0.12461621718547169973e1 * t2318 * t4410 * t1451 - 0.76217237139506171188e1 * t659 * t4122 * t1069;
8569   t18895 = -0.24e2 * t3265 * t3478 * t1238 + 0.2e1 * t1443 * t1066 - 0.2e1 * t5001 * t303 - t1443 * t1089 - 0.4e1 * t1215 * t1239 - 0.2e1 * t4524 * t385 + 0.4e1 * t104 * t634 * t18760 - 0.2e1 * t375 * t4586 + 0.2e1 * t1061 * t1448 - 0.2e1 * t293 * t5064 - t1061 * t1471 - t104 * t234 * (t18833 + t18889) + t25 * t18783 * t115;
8570   if(v4rho4 != NULL && (p->info->flags & XC_FLAGS_HAVE_LXC))
8571     v4sigma2tau2[17] = -0.3e1 / 0.8e1 * t262 * t286 * (t18747 + t18895);
8572 
8573   t18901 = 0.1e1 / t27 / t4282;
8574   t18903 = t18901 * t39 * t42;
8575   t18904 = t5814 * t18903;
8576   t18906 = t5820 * t18903;
8577   t18908 = t440 * t18901;
8578   t18909 = t18908 * t5828;
8579   t18911 = t18908 * t5827;
8580   t18913 = -0.10372043043679588040e-4 * t18904 + 0.25113094921099209163e-4 * t18906 - 0.54841825331504343849e-3 * t18909 - 0.28150260283386072598e-5 * t18911;
8581   t19002 = 0.16615495624729559964e1 * t167 * t61 * t18913 * t179 + 0.70819478890314631335e-1 * t54 * t162 * t18913 - 0.13278652291933993376e0 * t7124 * t15320 * t269 + 0.15934382750320792051e0 * t2133 * t3594 * t1104 - 0.22865171141851851356e2 * t490 * t1278 * t1104 + 0.16615495624729559964e1 * t710 * t1115 * t5079 + 0.49846486874188679892e1 * t710 * t4794 * t1254 + 0.49846486874188679892e1 * t710 * t1346 * t4601 - 0.15243447427901234237e2 * t1597 * t5109 * t269 - 0.35409739445157315668e-1 * t705 * t15294 * t269 + 0.24923243437094339947e1 * t7106 * t1115 * t5095 - 0.37384865155641509919e1 * t2137 * t5234 * t1104 - 0.10622921833547194700e0 * t705 * t3185 * t1254 - 0.10622921833547194700e0 * t705 * t825 * t4601;
8582   t19003 = t174 * t1104;
8583   t19010 = t5910 * t269;
8584   t19045 = 0.31465570642866950052e3 * t1618 * t3632 * t19003 + 0.31465570642866950052e3 * t1618 * t5123 * t1126 - 0.24056046973484009303e4 * t5905 * t15257 * t19010 - 0.37384865155641509919e1 * t2137 * t1115 * t15287 - 0.34297756712777777034e2 * t1597 * t1278 * t4654 + 0.20977047095244633367e3 * t5915 * t5123 * t4658 - 0.76217237139506171188e1 * t490 * t15267 * t1126 + 0.11432585570925925678e2 * t5940 * t5109 * t1126 + 0.15934382750320792050e0 * t2133 * t825 * t13680 - 0.22865171141851851357e2 * t490 * t13684 * t1357 - 0.22865171141851851357e2 * t490 * t3624 * t3164 - 0.22865171141851851357e2 * t490 * t3624 * t4654 - 0.34297756712777777034e2 * t3807 * t4651 + 0.31465570642866950052e3 * t13629 * t4822;
8585   t19049 = -0.3e1 * t315 * t4666 - 0.6e1 * t270 * t5089 + 0.24e2 * t52 * t15226 * t279 - 0.18e2 * t52 * t3582 * t1130 + 0.6e1 * t270 * t5092 - 0.18e2 * t3144 * t15235 * t279 + 0.6e1 * t52 * t3156 * t1282 + 0.6e1 * t52 * t821 * t4665 - t270 * t5132 + 0.2e1 * t52 * t15246 * t279 - t52 * t160 * (t19002 + t19045);
8586   if(v4rho4 != NULL && (p->info->flags & XC_FLAGS_NEEDS_LAPLACIAN) && (p->info->flags & XC_FLAGS_HAVE_LXC))
8587     v4sigmalapl3[0] = -0.3e1 / 0.8e1 * t262 * t263 * (t25 * t18913 * t71 + 0.6e1 * t1105 * t1260 - 0.3e1 * t1105 * t1283 + 0.6e1 * t1255 * t1109 - 0.3e1 * t1255 * t1131 - t5080 * t280 - 0.18e2 * t315 * t4613 + 0.12e2 * t315 * t4616 + 0.6e1 * t315 * t4620 - 0.3e1 * t4602 * t325 + t19049);
8588 
8589   if(v4rho4 != NULL && (p->info->flags & XC_FLAGS_NEEDS_LAPLACIAN) && (p->info->flags & XC_FLAGS_HAVE_LXC))
8590     v4sigmalapl3[1] = 0.0e0;
8591 
8592   if(v4rho4 != NULL && (p->info->flags & XC_FLAGS_NEEDS_LAPLACIAN) && (p->info->flags & XC_FLAGS_HAVE_LXC))
8593     v4sigmalapl3[2] = 0.0e0;
8594 
8595   if(v4rho4 != NULL && (p->info->flags & XC_FLAGS_NEEDS_LAPLACIAN) && (p->info->flags & XC_FLAGS_HAVE_LXC))
8596     v4sigmalapl3[3] = 0.0e0;
8597 
8598   if(v4rho4 != NULL && (p->info->flags & XC_FLAGS_NEEDS_LAPLACIAN) && (p->info->flags & XC_FLAGS_HAVE_LXC))
8599     v4sigmalapl3[4] = 0.0e0;
8600 
8601   if(v4rho4 != NULL && (p->info->flags & XC_FLAGS_NEEDS_LAPLACIAN) && (p->info->flags & XC_FLAGS_HAVE_LXC))
8602     v4sigmalapl3[5] = 0.0e0;
8603 
8604   if(v4rho4 != NULL && (p->info->flags & XC_FLAGS_NEEDS_LAPLACIAN) && (p->info->flags & XC_FLAGS_HAVE_LXC))
8605     v4sigmalapl3[6] = 0.0e0;
8606 
8607   if(v4rho4 != NULL && (p->info->flags & XC_FLAGS_NEEDS_LAPLACIAN) && (p->info->flags & XC_FLAGS_HAVE_LXC))
8608     v4sigmalapl3[7] = 0.0e0;
8609 
8610   if(v4rho4 != NULL && (p->info->flags & XC_FLAGS_NEEDS_LAPLACIAN) && (p->info->flags & XC_FLAGS_HAVE_LXC))
8611     v4sigmalapl3[8] = 0.0e0;
8612 
8613   if(v4rho4 != NULL && (p->info->flags & XC_FLAGS_NEEDS_LAPLACIAN) && (p->info->flags & XC_FLAGS_HAVE_LXC))
8614     v4sigmalapl3[9] = 0.0e0;
8615 
8616   if(v4rho4 != NULL && (p->info->flags & XC_FLAGS_NEEDS_LAPLACIAN) && (p->info->flags & XC_FLAGS_HAVE_LXC))
8617     v4sigmalapl3[10] = 0.0e0;
8618 
8619   t19055 = 0.1e1 / t82 / t4365;
8620   t19057 = t19055 * t39 * t42;
8621   t19058 = t6763 * t19057;
8622   t19060 = t6769 * t19057;
8623   t19062 = t616 * t19055;
8624   t19063 = t19062 * t5828;
8625   t19065 = t19062 * t5827;
8626   t19067 = -0.10372043043679588040e-4 * t19058 + 0.25113094921099209163e-4 * t19060 - 0.54841825331504343849e-3 * t19063 - 0.28150260283386072598e-5 * t19065;
8627   t19155 = 0.24923243437094339947e1 * t7523 * t1157 * t5163 - 0.37384865155641509919e1 * t2318 * t5310 * t1146 - 0.10622921833547194700e0 * t772 * t3306 * t1298 - 0.10622921833547194700e0 * t772 * t882 * t4681 - 0.13278652291933993376e0 * t7507 * t15464 * t292 - 0.22865171141851851356e2 * t659 * t1322 * t1146 + 0.16615495624729559964e1 * t777 * t1157 * t5147 + 0.49846486874188679892e1 * t777 * t4880 * t1298 + 0.49846486874188679892e1 * t777 * t1381 * t4681 - 0.15243447427901234237e2 * t1967 * t5177 * t292 - 0.35409739445157315668e-1 * t772 * t15451 * t292 + 0.15934382750320792051e0 * t2314 * t3696 * t1146 - 0.22865171141851851357e2 * t659 * t3726 * t3285 - 0.22865171141851851357e2 * t659 * t3726 * t4734;
8628   t19156 = t242 * t1146;
8629   t19163 = t6876 * t292;
8630   t19199 = 0.31465570642866950052e3 * t1984 * t3734 * t19156 + 0.31465570642866950052e3 * t1984 * t5191 * t1168 - 0.24056046973484009303e4 * t6871 * t15485 * t19163 - 0.37384865155641509919e1 * t2318 * t1157 * t15489 - 0.34297756712777777034e2 * t1967 * t1322 * t4734 + 0.20977047095244633367e3 * t6892 * t5191 * t4738 - 0.76217237139506171188e1 * t659 * t15506 * t1168 - 0.22865171141851851357e2 * t659 * t13920 * t1392 + 0.11432585570925925678e2 * t6904 * t5177 * t1168 + 0.15934382750320792050e0 * t2314 * t882 * t13956 - 0.34297756712777777034e2 * t3917 * t4731 + 0.31465570642866950052e3 * t13895 * t4908 + 0.16615495624729559964e1 * t240 * t61 * t19067 * t247 + 0.70819478890314631335e-1 * t54 * t236 * t19067;
8631   t19203 = -0.3e1 * t337 * t4746 - 0.6e1 * t293 * t5157 + 0.24e2 * t104 * t15404 * t302 - 0.18e2 * t104 * t3684 * t1172 + 0.6e1 * t293 * t5160 - 0.18e2 * t3265 * t15413 * t302 + 0.6e1 * t104 * t3277 * t1326 + 0.6e1 * t104 * t878 * t4745 - t293 * t5200 + 0.2e1 * t104 * t15424 * t302 - t104 * t234 * (t19155 + t19199);
8632   if(v4rho4 != NULL && (p->info->flags & XC_FLAGS_NEEDS_LAPLACIAN) && (p->info->flags & XC_FLAGS_HAVE_LXC))
8633     v4sigmalapl3[11] = -0.3e1 / 0.8e1 * t262 * t286 * (t25 * t19067 * t115 + 0.6e1 * t1147 * t1304 - 0.3e1 * t1147 * t1327 + 0.6e1 * t1299 * t1151 - 0.3e1 * t1299 * t1173 - t5148 * t303 - 0.18e2 * t337 * t4693 + 0.12e2 * t337 * t4696 + 0.6e1 * t337 * t4700 - 0.3e1 * t4682 * t347 + t19203);
8634 
8635   t19212 = 0.41488172174718352159e-4 * t18904 - 0.10045237968439683665e-3 * t18906 + 0.21936730132601737540e-2 * t18909 + 0.11260104113354429039e-4 * t18911;
8636   t19248 = t25 * t19212 * t71 - t1182 * t1283 + 0.2e1 * t1182 * t1260 - t356 * t4666 - 0.2e1 * t1336 * t1131 - 0.2e1 * t4756 * t325 - t270 * t5276 - 0.6e1 * t356 * t4613 + 0.4e1 * t356 * t4616 + 0.2e1 * t356 * t4620 + 0.2e1 * t1255 * t1186 + 0.4e1 * t315 * t4772 + 0.4e1 * t1105 * t1340 + 0.4e1 * t315 * t4779 + 0.4e1 * t315 * t4775 - 0.12e2 * t3144 * t3773 * t1130 + 0.24e2 * t9638 * t15550 * t279 - 0.12e2 * t13536 * t4769;
8637   t19284 = -0.12461621718547169973e1 * t2137 * t5234 * t1181 - 0.70819478890314631336e-1 * t705 * t14214 * t314 + 0.53114609167735973502e-1 * t2133 * t3407 * t1263 - 0.76217237139506171188e1 * t490 * t3421 * t1263 + 0.33230991249459119928e1 * t710 * t1346 * t4755 - 0.35409739445157315668e-1 * t705 * t15646 * t269 + 0.16615495624729559964e1 * t710 * t1115 * t5209 + 0.16615495624729559964e1 * t710 * t5244 * t1181 + 0.33230991249459119928e1 * t710 * t4794 * t1335 - 0.70819478890314631336e-1 * t705 * t3813 * t1104 - 0.35409739445157315668e-1 * t705 * t3407 * t1254;
8638   t19320 = -0.35409739445157315668e-1 * t705 * t927 * t4601 + 0.16615495624729559964e1 * t710 * t4601 * t179 * t355 + 0.10488523547622316684e3 * t1618 * t10087 * t5264 - 0.15243447427901234238e2 * t490 * t941 * t13697 - 0.76217237139506171188e1 * t490 * t3421 * t5271 - 0.76217237139506171188e1 * t490 * t941 * t13680 - 0.76217237139506171188e1 * t490 * t941 * t62 * t4601 - 0.11432585570925925678e2 * t1597 * t1278 * t4980 - 0.15243447427901234237e2 * t1597 * t1278 * t3389 - 0.76217237139506171188e1 * t490 * t15609 * t1126 - 0.15243447427901234238e2 * t490 * t14133 * t1357;
8639   t19355 = -0.15243447427901234238e2 * t490 * t3827 * t3164 - 0.15243447427901234238e2 * t490 * t3827 * t4654 + 0.10622921833547194700e0 * t2133 * t3813 * t3164 - 0.24923243437094339946e1 * t2137 * t1115 * t15629 + 0.53114609167735973502e-1 * t2133 * t927 * t13680 - 0.12461621718547169973e1 * t2137 * t1115 * t15636 - 0.13278652291933993376e0 * t7124 * t927 * t13653 + 0.10622921833547194700e0 * t2133 * t927 * t13697 + 0.24923243437094339947e1 * t7106 * t1115 * t15586 - 0.24923243437094339946e1 * t2137 * t1346 * t14151 + 0.31465570642866950052e3 * t3429 * t9553 * t13653;
8640   t19371 = t2727 * t4658;
8641   t19385 = 0.20977047095244633368e3 * t3429 * t3208 * t13697 - 0.24056046973484009303e4 * t10132 * t9568 * t13653 + 0.10488523547622316684e3 * t3429 * t3208 * t13680 + 0.11432585570925925678e2 * t15677 * t1202 - 0.11432585570925925678e2 * t15694 * t1202 - 0.22865171141851851356e2 * t3807 * t4828 + 0.20977047095244633367e3 * t13623 * t19371 - 0.22865171141851851357e2 * t3807 * t4816 + 0.20977047095244633368e3 * t14056 * t4822 + 0.70819478890314631335e-1 * t54 * t162 * t19212 + 0.16615495624729559964e1 * t167 * t61 * t19212 * t179;
8642   t19427 = 0.4e1 * t1336 * t1109 - t52 * t160 * (t19284 + t19320 + t19355 + t19385) - 0.2e1 * t315 * t4832 - t1255 * t1206 - t4602 * t366 - 0.6e1 * t3144 * t15566 * t279 - 0.12e2 * t3144 * t15573 * t279 - t5210 * t280 - 0.6e1 * t270 * t5222 + 0.4e1 * t52 * t14302 * t324 - 0.6e1 * t52 * t10207 * t1259 + 0.4e1 * t270 * t5225 - 0.2e1 * t1105 * t1362 + 0.2e1 * t52 * t3382 * t1282 + 0.4e1 * t52 * t3784 * t1130 + 0.2e1 * t52 * t923 * t4665 + 0.2e1 * t270 * t5228 + 0.2e1 * t52 * t15559 * t279;
8643   if(v4rho4 != NULL && (p->info->flags & XC_FLAGS_NEEDS_LAPLACIAN) && (p->info->flags & XC_FLAGS_HAVE_LXC))
8644     v4sigmalapl2tau[0] = -0.3e1 / 0.8e1 * t262 * t263 * (t19248 + t19427);
8645 
8646   if(v4rho4 != NULL && (p->info->flags & XC_FLAGS_NEEDS_LAPLACIAN) && (p->info->flags & XC_FLAGS_HAVE_LXC))
8647     v4sigmalapl2tau[1] = 0.0e0;
8648 
8649   if(v4rho4 != NULL && (p->info->flags & XC_FLAGS_NEEDS_LAPLACIAN) && (p->info->flags & XC_FLAGS_HAVE_LXC))
8650     v4sigmalapl2tau[2] = 0.0e0;
8651 
8652   if(v4rho4 != NULL && (p->info->flags & XC_FLAGS_NEEDS_LAPLACIAN) && (p->info->flags & XC_FLAGS_HAVE_LXC))
8653     v4sigmalapl2tau[3] = 0.0e0;
8654 
8655   if(v4rho4 != NULL && (p->info->flags & XC_FLAGS_NEEDS_LAPLACIAN) && (p->info->flags & XC_FLAGS_HAVE_LXC))
8656     v4sigmalapl2tau[4] = 0.0e0;
8657 
8658   if(v4rho4 != NULL && (p->info->flags & XC_FLAGS_NEEDS_LAPLACIAN) && (p->info->flags & XC_FLAGS_HAVE_LXC))
8659     v4sigmalapl2tau[5] = 0.0e0;
8660 
8661   if(v4rho4 != NULL && (p->info->flags & XC_FLAGS_NEEDS_LAPLACIAN) && (p->info->flags & XC_FLAGS_HAVE_LXC))
8662     v4sigmalapl2tau[6] = 0.0e0;
8663 
8664   if(v4rho4 != NULL && (p->info->flags & XC_FLAGS_NEEDS_LAPLACIAN) && (p->info->flags & XC_FLAGS_HAVE_LXC))
8665     v4sigmalapl2tau[7] = 0.0e0;
8666 
8667   if(v4rho4 != NULL && (p->info->flags & XC_FLAGS_NEEDS_LAPLACIAN) && (p->info->flags & XC_FLAGS_HAVE_LXC))
8668     v4sigmalapl2tau[8] = 0.0e0;
8669 
8670   if(v4rho4 != NULL && (p->info->flags & XC_FLAGS_NEEDS_LAPLACIAN) && (p->info->flags & XC_FLAGS_HAVE_LXC))
8671     v4sigmalapl2tau[9] = 0.0e0;
8672 
8673   if(v4rho4 != NULL && (p->info->flags & XC_FLAGS_NEEDS_LAPLACIAN) && (p->info->flags & XC_FLAGS_HAVE_LXC))
8674     v4sigmalapl2tau[10] = 0.0e0;
8675 
8676   if(v4rho4 != NULL && (p->info->flags & XC_FLAGS_NEEDS_LAPLACIAN) && (p->info->flags & XC_FLAGS_HAVE_LXC))
8677     v4sigmalapl2tau[11] = 0.0e0;
8678 
8679   if(v4rho4 != NULL && (p->info->flags & XC_FLAGS_NEEDS_LAPLACIAN) && (p->info->flags & XC_FLAGS_HAVE_LXC))
8680     v4sigmalapl2tau[12] = 0.0e0;
8681 
8682   if(v4rho4 != NULL && (p->info->flags & XC_FLAGS_NEEDS_LAPLACIAN) && (p->info->flags & XC_FLAGS_HAVE_LXC))
8683     v4sigmalapl2tau[13] = 0.0e0;
8684 
8685   if(v4rho4 != NULL && (p->info->flags & XC_FLAGS_NEEDS_LAPLACIAN) && (p->info->flags & XC_FLAGS_HAVE_LXC))
8686     v4sigmalapl2tau[14] = 0.0e0;
8687 
8688   if(v4rho4 != NULL && (p->info->flags & XC_FLAGS_NEEDS_LAPLACIAN) && (p->info->flags & XC_FLAGS_HAVE_LXC))
8689     v4sigmalapl2tau[15] = 0.0e0;
8690 
8691   if(v4rho4 != NULL && (p->info->flags & XC_FLAGS_NEEDS_LAPLACIAN) && (p->info->flags & XC_FLAGS_HAVE_LXC))
8692     v4sigmalapl2tau[16] = 0.0e0;
8693 
8694   t19439 = t2879 * t4738;
8695   t19461 = -0.24056046973484009303e4 * t10460 * t9890 * t13966 + 0.10488523547622316684e3 * t3536 * t3329 * t13956 + 0.20977047095244633367e3 * t13889 * t19439 - 0.22865171141851851357e2 * t3917 * t4902 + 0.20977047095244633368e3 * t14567 * t4908 + 0.31465570642866950052e3 * t3536 * t9909 * t13966 + 0.20977047095244633368e3 * t3536 * t3329 * t13913 + 0.11432585570925925678e2 * t15858 * t1235 - 0.11432585570925925678e2 * t15862 * t1235 - 0.22865171141851851356e2 * t3917 * t4914 - 0.12461621718547169973e1 * t2318 * t1157 * t15938;
8696   t19496 = -0.13278652291933993376e0 * t7507 * t980 * t13966 + 0.10622921833547194700e0 * t2314 * t980 * t13913 - 0.15243447427901234238e2 * t659 * t3937 * t3285 - 0.15243447427901234238e2 * t659 * t3937 * t4734 + 0.10488523547622316684e3 * t1984 * t10400 * t5340 - 0.15243447427901234238e2 * t659 * t994 * t13913 - 0.76217237139506171188e1 * t659 * t3528 * t5347 - 0.76217237139506171188e1 * t659 * t994 * t13956 - 0.76217237139506171188e1 * t659 * t994 * t106 * t4681 - 0.11432585570925925678e2 * t1967 * t1322 * t5053 - 0.15243447427901234237e2 * t1967 * t1322 * t3496;
8697   t19523 = 0.41488172174718352159e-4 * t19058 - 0.10045237968439683665e-3 * t19060 + 0.21936730132601737540e-2 * t19063 + 0.11260104113354429039e-4 * t19065;
8698   t19537 = -0.76217237139506171188e1 * t659 * t15912 * t1168 - 0.15243447427901234238e2 * t659 * t14479 * t1392 + 0.24923243437094339947e1 * t7523 * t1157 * t15894 - 0.24923243437094339946e1 * t2318 * t1381 * t14441 + 0.10622921833547194700e0 * t2314 * t3923 * t3285 - 0.24923243437094339946e1 * t2318 * t1157 * t15931 + 0.53114609167735973502e-1 * t2314 * t980 * t13956 + 0.16615495624729559964e1 * t240 * t61 * t19523 * t247 + 0.70819478890314631335e-1 * t54 * t236 * t19523 - 0.70819478890314631336e-1 * t772 * t3923 * t1146 - 0.35409739445157315668e-1 * t772 * t3514 * t1298;
8699   t19572 = -0.35409739445157315668e-1 * t772 * t980 * t4681 + 0.53114609167735973502e-1 * t2314 * t3514 * t1307 - 0.12461621718547169973e1 * t2318 * t5310 * t1214 - 0.70819478890314631336e-1 * t772 * t14404 * t336 + 0.33230991249459119928e1 * t777 * t1381 * t4841 - 0.35409739445157315668e-1 * t772 * t15870 * t292 + 0.16615495624729559964e1 * t777 * t1157 * t5285 + 0.16615495624729559964e1 * t777 * t4681 * t247 * t374 + 0.16615495624729559964e1 * t777 * t5320 * t1214 + 0.33230991249459119928e1 * t777 * t4880 * t1370 - 0.76217237139506171188e1 * t659 * t3528 * t1307;
8700   t19613 = -t1299 * t1239 - t104 * t234 * (t19461 + t19496 + t19537 + t19572) - 0.2e1 * t337 * t4918 + 0.2e1 * t104 * t15793 * t302 + 0.2e1 * t1215 * t1304 + 0.4e1 * t1371 * t1151 + 0.4e1 * t337 * t4861 - t4682 * t385 + 0.4e1 * t104 * t14668 * t346 - 0.6e1 * t104 * t10488 * t1303 - 0.6e1 * t293 * t5298 + 0.4e1 * t293 * t5301 + 0.4e1 * t104 * t3894 * t1172 + 0.4e1 * t375 * t4696 + 0.2e1 * t293 * t5304 + 0.2e1 * t104 * t3489 * t1326 + 0.2e1 * t104 * t976 * t4745 - t5286 * t303;
8701   t19651 = -0.2e1 * t4842 * t347 - 0.12e2 * t3265 * t15971 * t302 + 0.2e1 * t375 * t4700 + 0.4e1 * t1147 * t1375 + 0.2e1 * t1299 * t1219 + 0.4e1 * t337 * t4865 + 0.4e1 * t337 * t4858 - 0.6e1 * t375 * t4693 - t375 * t4746 - 0.12e2 * t3265 * t3883 * t1172 - 0.12e2 * t14001 * t4855 - 0.6e1 * t3265 * t15988 * t302 - t293 * t5352 - t1215 * t1327 + t25 * t19523 * t115 - 0.2e1 * t1147 * t1397 - 0.2e1 * t1371 * t1173 + 0.24e2 * t9939 * t15962 * t302;
8702   if(v4rho4 != NULL && (p->info->flags & XC_FLAGS_NEEDS_LAPLACIAN) && (p->info->flags & XC_FLAGS_HAVE_LXC))
8703     v4sigmalapl2tau[17] = -0.3e1 / 0.8e1 * t262 * t286 * (t19613 + t19651);
8704 
8705   t19710 = t1181 * t179;
8706   t19729 = -0.35409739445157315668e-1 * t705 * t14735 * t314 - 0.35409739445157315668e-1 * t705 * t4012 * t1104 + 0.16615495624729559964e1 * t710 * t4794 * t1405 + 0.16615495624729559964e1 * t710 * t1346 * t4927 - 0.70819478890314631336e-1 * t705 * t927 * t4755 + 0.33230991249459119928e1 * t710 * t19710 * t1335 + 0.33230991249459119928e1 * t710 * t4005 * t4755 + 0.53114609167735973502e-1 * t2133 * t3995 * t1104 - 0.12461621718547169973e1 * t2137 * t4794 * t1414 - 0.70819478890314631336e-1 * t705 * t3407 * t1335 - 0.35409739445157315668e-1 * t705 * t16130 * t269;
8707   t19758 = 0.16615495624729559964e1 * t710 * t1115 * t5361 - 0.76217237139506171188e1 * t490 * t1429 * t1104 + 0.31465570642866950052e3 * t14866 * t9553 * t3164 - 0.24056046973484009303e4 * t14870 * t9568 * t3164 - 0.11432585570925925678e2 * t3807 * t4977 + 0.10488523547622316684e3 * t14856 * t4822 + 0.20977047095244633368e3 * t3429 * t3208 * t14129 + 0.20977047095244633368e3 * t3429 * t3208 * t14101 + 0.11432585570925925678e2 * t16198 * t4961 - 0.22865171141851851357e2 * t11658 * t4816 - 0.22865171141851851356e2 * t11658 * t4819;
8708   t19793 = 0.20977047095244633367e3 * t14877 * t4822 - 0.15243447427901234238e2 * t490 * t3421 * t5414 - 0.15243447427901234238e2 * t490 * t941 * t14129 - 0.15243447427901234238e2 * t490 * t941 * t62 * t4755 + 0.10488523547622316684e3 * t1618 * t4034 * t19003 - 0.15243447427901234238e2 * t490 * t941 * t14101 - 0.15243447427901234237e2 * t1597 * t1429 * t3164 - 0.11432585570925925678e2 * t1597 * t1429 * t4654 + 0.53114609167735973502e-1 * t2133 * t4012 * t3164 - 0.12461621718547169973e1 * t2137 * t1115 * t16189 - 0.13278652291933993376e0 * t7124 * t3995 * t3164;
8709   t19825 = -0.16595268869887340864e-3 * t18904 + 0.40180951873758734661e-3 * t18906 - 0.87746920530406950160e-2 * t18909 - 0.45040416453417716156e-4 * t18911;
8710   t19833 = 0.10622921833547194700e0 * t2133 * t927 * t14101 + 0.24923243437094339947e1 * t7106 * t1115 * t16234 - 0.24923243437094339946e1 * t2137 * t1346 * t14822 + 0.10622921833547194700e0 * t2133 * t927 * t14129 - 0.24923243437094339946e1 * t2137 * t1115 * t16244 - 0.76217237139506171188e1 * t490 * t16149 * t1126 - 0.76217237139506171188e1 * t490 * t14809 * t1357 - 0.76217237139506171188e1 * t490 * t4026 * t3164 - 0.76217237139506171188e1 * t490 * t4026 * t4654 + 0.16615495624729559964e1 * t167 * t61 * t19825 * t179 + 0.70819478890314631335e-1 * t54 * t162 * t19825;
8711   t19838 = 0.4e1 * t52 * t923 * t4831 - 0.6e1 * t52 * t3983 * t1130 - 0.6e1 * t270 * t5373 + 0.2e1 * t52 * t16072 * t279 + 0.4e1 * t52 * t3382 * t1361 + 0.4e1 * t270 * t5376 + 0.2e1 * t52 * t3991 * t1130 + 0.2e1 * t315 * t4946 - t1406 * t1131 - 0.2e1 * t1182 * t1362 - t315 * t4991 + 0.2e1 * t1105 * t1411 - 0.12e2 * t3144 * t3773 * t1205 + 0.24e2 * t9638 * t16091 * t279 + 0.4e1 * t1336 * t1186 + 0.2e1 * t1406 * t1109 + 0.4e1 * t1182 * t1340 - t52 * t160 * (t19729 + t19758 + t19793 + t19833);
8712   t19874 = -t270 * t5426 - 0.6e1 * t3144 * t16063 * t279 - 0.12e2 * t3144 * t16044 * t279 - 0.12e2 * t14306 * t4769 - 0.2e1 * t356 * t4832 + 0.2e1 * t270 * t5380 - t4928 * t325 - 0.2e1 * t1336 * t1206 - t5362 * t280 - 0.2e1 * t4756 * t366 - t1105 * t1434 + 0.2e1 * t52 * t14900 * t324 + 0.4e1 * t356 * t4775 + 0.4e1 * t356 * t4772 + 0.4e1 * t356 * t4779 + 0.4e1 * t315 * t4942 - 0.6e1 * t315 * t4939 + t25 * t19825 * t71;
8713   if(v4rho4 != NULL && (p->info->flags & XC_FLAGS_NEEDS_LAPLACIAN) && (p->info->flags & XC_FLAGS_HAVE_LXC))
8714     v4sigmalapltau2[0] = -0.3e1 / 0.8e1 * t262 * t263 * (t19838 + t19874);
8715 
8716   if(v4rho4 != NULL && (p->info->flags & XC_FLAGS_NEEDS_LAPLACIAN) && (p->info->flags & XC_FLAGS_HAVE_LXC))
8717     v4sigmalapltau2[1] = 0.0e0;
8718 
8719   if(v4rho4 != NULL && (p->info->flags & XC_FLAGS_NEEDS_LAPLACIAN) && (p->info->flags & XC_FLAGS_HAVE_LXC))
8720     v4sigmalapltau2[2] = 0.0e0;
8721 
8722   if(v4rho4 != NULL && (p->info->flags & XC_FLAGS_NEEDS_LAPLACIAN) && (p->info->flags & XC_FLAGS_HAVE_LXC))
8723     v4sigmalapltau2[3] = 0.0e0;
8724 
8725   if(v4rho4 != NULL && (p->info->flags & XC_FLAGS_NEEDS_LAPLACIAN) && (p->info->flags & XC_FLAGS_HAVE_LXC))
8726     v4sigmalapltau2[4] = 0.0e0;
8727 
8728   if(v4rho4 != NULL && (p->info->flags & XC_FLAGS_NEEDS_LAPLACIAN) && (p->info->flags & XC_FLAGS_HAVE_LXC))
8729     v4sigmalapltau2[5] = 0.0e0;
8730 
8731   if(v4rho4 != NULL && (p->info->flags & XC_FLAGS_NEEDS_LAPLACIAN) && (p->info->flags & XC_FLAGS_HAVE_LXC))
8732     v4sigmalapltau2[6] = 0.0e0;
8733 
8734   if(v4rho4 != NULL && (p->info->flags & XC_FLAGS_NEEDS_LAPLACIAN) && (p->info->flags & XC_FLAGS_HAVE_LXC))
8735     v4sigmalapltau2[7] = 0.0e0;
8736 
8737   if(v4rho4 != NULL && (p->info->flags & XC_FLAGS_NEEDS_LAPLACIAN) && (p->info->flags & XC_FLAGS_HAVE_LXC))
8738     v4sigmalapltau2[8] = 0.0e0;
8739 
8740   if(v4rho4 != NULL && (p->info->flags & XC_FLAGS_NEEDS_LAPLACIAN) && (p->info->flags & XC_FLAGS_HAVE_LXC))
8741     v4sigmalapltau2[9] = 0.0e0;
8742 
8743   if(v4rho4 != NULL && (p->info->flags & XC_FLAGS_NEEDS_LAPLACIAN) && (p->info->flags & XC_FLAGS_HAVE_LXC))
8744     v4sigmalapltau2[10] = 0.0e0;
8745 
8746   if(v4rho4 != NULL && (p->info->flags & XC_FLAGS_NEEDS_LAPLACIAN) && (p->info->flags & XC_FLAGS_HAVE_LXC))
8747     v4sigmalapltau2[11] = 0.0e0;
8748 
8749   if(v4rho4 != NULL && (p->info->flags & XC_FLAGS_NEEDS_LAPLACIAN) && (p->info->flags & XC_FLAGS_HAVE_LXC))
8750     v4sigmalapltau2[12] = 0.0e0;
8751 
8752   if(v4rho4 != NULL && (p->info->flags & XC_FLAGS_NEEDS_LAPLACIAN) && (p->info->flags & XC_FLAGS_HAVE_LXC))
8753     v4sigmalapltau2[13] = 0.0e0;
8754 
8755   if(v4rho4 != NULL && (p->info->flags & XC_FLAGS_NEEDS_LAPLACIAN) && (p->info->flags & XC_FLAGS_HAVE_LXC))
8756     v4sigmalapltau2[14] = 0.0e0;
8757 
8758   if(v4rho4 != NULL && (p->info->flags & XC_FLAGS_NEEDS_LAPLACIAN) && (p->info->flags & XC_FLAGS_HAVE_LXC))
8759     v4sigmalapltau2[15] = 0.0e0;
8760 
8761   if(v4rho4 != NULL && (p->info->flags & XC_FLAGS_NEEDS_LAPLACIAN) && (p->info->flags & XC_FLAGS_HAVE_LXC))
8762     v4sigmalapltau2[16] = 0.0e0;
8763 
8764   t19904 = t1214 * t247;
8765   t19924 = -0.35409739445157315668e-1 * t772 * t15067 * t336 - 0.35409739445157315668e-1 * t772 * t4108 * t1146 + 0.16615495624729559964e1 * t777 * t4880 * t1442 + 0.16615495624729559964e1 * t777 * t1381 * t5000 + 0.33230991249459119928e1 * t777 * t19904 * t1370 + 0.33230991249459119928e1 * t777 * t4101 * t4841 - 0.24056046973484009303e4 * t15130 * t9890 * t3285 - 0.11432585570925925678e2 * t3917 * t5050 + 0.10488523547622316684e3 * t15116 * t4908 + 0.20977047095244633368e3 * t3536 * t3329 * t14475 + 0.20977047095244633368e3 * t3536 * t3329 * t14500;
8766   t19954 = 0.31465570642866950052e3 * t15126 * t9909 * t3285 + 0.11432585570925925678e2 * t16407 * t5034 - 0.22865171141851851357e2 * t12045 * t4902 - 0.22865171141851851356e2 * t12045 * t4905 + 0.20977047095244633367e3 * t15139 * t4908 + 0.53114609167735973502e-1 * t2314 * t4091 * t1146 - 0.12461621718547169973e1 * t2318 * t4880 * t1451 - 0.70819478890314631336e-1 * t772 * t3514 * t1370 - 0.70819478890314631336e-1 * t772 * t980 * t4841 - 0.24923243437094339946e1 * t2318 * t1157 * t16444 - 0.15243447427901234238e2 * t659 * t994 * t14500;
8767   t19990 = -0.76217237139506171188e1 * t659 * t16414 * t1168 - 0.76217237139506171188e1 * t659 * t15060 * t1392 - 0.76217237139506171188e1 * t659 * t4122 * t3285 - 0.76217237139506171188e1 * t659 * t4122 * t4734 - 0.15243447427901234238e2 * t659 * t3528 * t5488 - 0.15243447427901234238e2 * t659 * t994 * t14475 - 0.15243447427901234238e2 * t659 * t994 * t106 * t4841 + 0.10488523547622316684e3 * t1984 * t4130 * t19156 - 0.15243447427901234237e2 * t1967 * t1466 * t3285 - 0.11432585570925925678e2 * t1967 * t1466 * t4734 + 0.53114609167735973502e-1 * t2314 * t4108 * t3285;
8768   t20022 = -0.16595268869887340864e-3 * t19058 + 0.40180951873758734661e-3 * t19060 - 0.87746920530406950160e-2 * t19063 - 0.45040416453417716156e-4 * t19065;
8769   t20030 = -0.12461621718547169973e1 * t2318 * t1157 * t16430 - 0.13278652291933993376e0 * t7507 * t4091 * t3285 + 0.10622921833547194700e0 * t2314 * t980 * t14500 + 0.24923243437094339947e1 * t7523 * t1157 * t16434 - 0.24923243437094339946e1 * t2318 * t1381 * t15004 + 0.10622921833547194700e0 * t2314 * t980 * t14475 - 0.76217237139506171188e1 * t659 * t1466 * t1146 - 0.35409739445157315668e-1 * t772 * t16342 * t292 + 0.16615495624729559964e1 * t777 * t1157 * t5435 + 0.16615495624729559964e1 * t240 * t61 * t20022 * t247 + 0.70819478890314631335e-1 * t54 * t236 * t20022;
8770   t20053 = 0.4e1 * t104 * t976 * t4917 + 0.2e1 * t337 * t5019 + 0.2e1 * t1147 * t1448 - t337 * t5064 - t1147 * t1471 - 0.2e1 * t375 * t4918 - 0.2e1 * t1215 * t1397 - t104 * t234 * (t19924 + t19954 + t19990 + t20030) + 0.2e1 * t104 * t15165 * t346 - t293 * t5500 + 0.2e1 * t104 * t4087 * t1172 + 0.2e1 * t293 * t5454 + 0.4e1 * t375 * t4865 + 0.4e1 * t375 * t4861 - t1443 * t1173 - t5436 * t303 - t5001 * t347 - 0.2e1 * t1371 * t1239;
8771   t20097 = -0.2e1 * t4842 * t385 + 0.2e1 * t104 * t16506 * t302 + 0.4e1 * t337 * t5015 - 0.6e1 * t337 * t5012 - 0.6e1 * t104 * t4079 * t1172 - 0.6e1 * t293 * t5447 + t25 * t20022 * t115 + 0.2e1 * t1443 * t1151 + 0.4e1 * t1215 * t1375 + 0.4e1 * t375 * t4858 + 0.4e1 * t1371 * t1219 - 0.6e1 * t3265 * t16322 * t302 + 0.24e2 * t9939 * t16502 * t302 - 0.12e2 * t3265 * t3883 * t1238 - 0.12e2 * t3265 * t16498 * t302 - 0.12e2 * t14590 * t4855 + 0.4e1 * t104 * t3489 * t1396 + 0.4e1 * t293 * t5450;
8772   if(v4rho4 != NULL && (p->info->flags & XC_FLAGS_NEEDS_LAPLACIAN) && (p->info->flags & XC_FLAGS_HAVE_LXC))
8773     v4sigmalapltau2[17] = -0.3e1 / 0.8e1 * t262 * t286 * (t20053 + t20097);
8774 
8775   t20106 = 0.66381075479549363457e-3 * t18904 - 0.16072380749503493864e-2 * t18906 + 0.35098768212162780063e-1 * t18909 + 0.18016166581367086462e-3 * t18911;
8776   t20196 = 0.16615495624729559964e1 * t167 * t61 * t20106 * t179 + 0.70819478890314631335e-1 * t54 * t162 * t20106 - 0.22865171141851851357e2 * t490 * t4026 * t3389 - 0.22865171141851851357e2 * t490 * t4026 * t4980 + 0.31465570642866950052e3 * t1618 * t4034 * t174 * t1181 + 0.31465570642866950052e3 * t1618 * t5553 * t1126 - 0.24056046973484009303e4 * t5905 * t16632 * t19010 - 0.37384865155641509919e1 * t2137 * t1115 * t16586 - 0.34297756712777777034e2 * t1597 * t1429 * t4980 + 0.20977047095244633367e3 * t5915 * t5553 * t4658 - 0.76217237139506171188e1 * t490 * t16642 * t1126 - 0.22865171141851851357e2 * t490 * t14809 * t2709 + 0.11432585570925925678e2 * t5940 * t5539 * t1126 + 0.15934382750320792050e0 * t2133 * t927 * t14805;
8777   t20237 = -0.34297756712777777034e2 * t11658 * t4977 + 0.31465570642866950052e3 * t14856 * t19371 + 0.15934382750320792051e0 * t2133 * t3995 * t1181 + 0.24923243437094339947e1 * t7106 * t1115 * t5525 - 0.22865171141851851356e2 * t490 * t1429 * t1181 + 0.49846486874188679892e1 * t710 * t4005 * t4927 - 0.15243447427901234237e2 * t1597 * t5539 * t269 - 0.35409739445157315668e-1 * t705 * t16603 * t269 + 0.16615495624729559964e1 * t710 * t1115 * t5509 - 0.37384865155641509919e1 * t2137 * t16610 * t1181 - 0.10622921833547194700e0 * t705 * t3407 * t1405 - 0.10622921833547194700e0 * t705 * t927 * t4927 + 0.49846486874188679892e1 * t710 * t19710 * t1405 - 0.13278652291933993376e0 * t7124 * t16590 * t269;
8778   t20241 = -0.3e1 * t356 * t4991 - 0.6e1 * t270 * t5519 + 0.24e2 * t52 * t16558 * t279 - 0.18e2 * t52 * t3983 * t1205 + 0.6e1 * t270 * t5522 - 0.18e2 * t3144 * t16567 * t279 + 0.6e1 * t52 * t3382 * t1433 + 0.6e1 * t52 * t923 * t4990 - t270 * t5562 + 0.2e1 * t52 * t16578 * t279 - t52 * t160 * (t20196 + t20237);
8779   if(v4rho4 != NULL && (p->info->flags & XC_FLAGS_HAVE_LXC))
8780     v4sigmatau3[0] = -0.3e1 / 0.8e1 * t262 * t263 * (t25 * t20106 * t71 + 0.6e1 * t1182 * t1411 - 0.3e1 * t1182 * t1434 + 0.6e1 * t1406 * t1186 - 0.3e1 * t1406 * t1206 - t5510 * t280 - 0.18e2 * t356 * t4939 + 0.12e2 * t356 * t4942 + 0.6e1 * t356 * t4946 - 0.3e1 * t4928 * t366 + t20241);
8781 
8782   if(v4rho4 != NULL && (p->info->flags & XC_FLAGS_HAVE_LXC))
8783     v4sigmatau3[1] = 0.0e0;
8784 
8785   if(v4rho4 != NULL && (p->info->flags & XC_FLAGS_HAVE_LXC))
8786     v4sigmatau3[2] = 0.0e0;
8787 
8788   if(v4rho4 != NULL && (p->info->flags & XC_FLAGS_HAVE_LXC))
8789     v4sigmatau3[3] = 0.0e0;
8790 
8791   if(v4rho4 != NULL && (p->info->flags & XC_FLAGS_HAVE_LXC))
8792     v4sigmatau3[4] = 0.0e0;
8793 
8794   if(v4rho4 != NULL && (p->info->flags & XC_FLAGS_HAVE_LXC))
8795     v4sigmatau3[5] = 0.0e0;
8796 
8797   if(v4rho4 != NULL && (p->info->flags & XC_FLAGS_HAVE_LXC))
8798     v4sigmatau3[6] = 0.0e0;
8799 
8800   if(v4rho4 != NULL && (p->info->flags & XC_FLAGS_HAVE_LXC))
8801     v4sigmatau3[7] = 0.0e0;
8802 
8803   if(v4rho4 != NULL && (p->info->flags & XC_FLAGS_HAVE_LXC))
8804     v4sigmatau3[8] = 0.0e0;
8805 
8806   if(v4rho4 != NULL && (p->info->flags & XC_FLAGS_HAVE_LXC))
8807     v4sigmatau3[9] = 0.0e0;
8808 
8809   if(v4rho4 != NULL && (p->info->flags & XC_FLAGS_HAVE_LXC))
8810     v4sigmatau3[10] = 0.0e0;
8811 
8812   t20250 = 0.66381075479549363457e-3 * t19058 - 0.16072380749503493864e-2 * t19060 + 0.35098768212162780063e-1 * t19063 + 0.18016166581367086462e-3 * t19065;
8813   t20338 = -0.22865171141851851356e2 * t659 * t1466 * t1214 - 0.22865171141851851357e2 * t659 * t15060 * t2861 - 0.22865171141851851357e2 * t659 * t4122 * t3496 - 0.22865171141851851357e2 * t659 * t4122 * t5053 + 0.31465570642866950052e3 * t1984 * t4130 * t242 * t1214 - 0.37384865155641509919e1 * t2318 * t1157 * t16757 - 0.34297756712777777034e2 * t1967 * t1466 * t5053 + 0.20977047095244633367e3 * t6892 * t5615 * t4738 + 0.11432585570925925678e2 * t6904 * t5601 * t1168 + 0.15934382750320792050e0 * t2314 * t980 * t15037 + 0.31465570642866950052e3 * t1984 * t5615 * t1168 - 0.24056046973484009303e4 * t6871 * t16768 * t19163 - 0.76217237139506171188e1 * t659 * t16778 * t1168 - 0.34297756712777777034e2 * t12045 * t5050;
8814   t20381 = 0.31465570642866950052e3 * t15116 * t19439 + 0.16615495624729559964e1 * t240 * t61 * t20250 * t247 + 0.70819478890314631335e-1 * t54 * t236 * t20250 - 0.13278652291933993376e0 * t7507 * t16818 * t292 + 0.16615495624729559964e1 * t777 * t1157 * t5571 + 0.49846486874188679892e1 * t777 * t19904 * t1442 + 0.49846486874188679892e1 * t777 * t4101 * t5000 - 0.15243447427901234237e2 * t1967 * t5601 * t292 - 0.35409739445157315668e-1 * t772 * t16838 * t292 + 0.15934382750320792051e0 * t2314 * t4091 * t1214 + 0.24923243437094339947e1 * t7523 * t1157 * t5587 - 0.37384865155641509919e1 * t2318 * t16828 * t1214 - 0.10622921833547194700e0 * t772 * t3514 * t1442 - 0.10622921833547194700e0 * t772 * t980 * t5000;
8815   t20385 = -0.3e1 * t375 * t5064 - 0.6e1 * t293 * t5581 + 0.24e2 * t104 * t16729 * t302 - 0.18e2 * t104 * t4079 * t1238 + 0.6e1 * t293 * t5584 - 0.18e2 * t3265 * t16738 * t302 + 0.6e1 * t104 * t3489 * t1470 + 0.6e1 * t104 * t976 * t5063 - t293 * t5624 + 0.2e1 * t104 * t16749 * t302 - t104 * t234 * (t20338 + t20381);
8816   if(v4rho4 != NULL && (p->info->flags & XC_FLAGS_HAVE_LXC))
8817     v4sigmatau3[11] = -0.3e1 / 0.8e1 * t262 * t286 * (t25 * t20250 * t115 + 0.6e1 * t1215 * t1448 - 0.3e1 * t1215 * t1471 + 0.6e1 * t1443 * t1219 - 0.3e1 * t1443 * t1239 - t5572 * t303 - 0.18e2 * t375 * t5012 + 0.12e2 * t375 * t5015 + 0.6e1 * t375 * t5019 - 0.3e1 * t5001 * t385 + t20385);
8818 
8819   t20391 = t5801 * t39 * t42;
8820   t20392 = t5814 * t20391;
8821   t20394 = t5820 * t20391;
8822   t20396 = t440 * t5801;
8823   t20397 = t20396 * t5828;
8824   t20399 = t20396 * t5827;
8825   t20401 = -0.20744086087359176080e-4 * t20392 + 0.50226189842198418324e-4 * t20394 - 0.10968365066300868770e-2 * t20397 - 0.56300520566772145196e-5 * t20399;
8826   t20416 = t1259 * t1259;
8827   t20423 = t1282 * t1282;
8828   t20430 = t1263 * t1263;
8829   t20452 = t20430 * t1621;
8830   t20456 = t1254 * t1254;
8831   t20500 = -0.13278652291933993376e0 * t54 * t5954 * t20430 + 0.31868765500641584101e0 * t2133 * t3594 * t1254 - 0.74769730311283019838e1 * t2137 * t5234 * t1254 + 0.11432585570925925678e2 * t5940 * t20430 * t492 * t62 - 0.24056046973484009303e4 * t5905 * t20430 * t5908 * t5910 - 0.15243447427901234237e2 * t1596 * t489 * t20430 * t492 + 0.20977047095244633367e3 * t5915 * t20452 * t174 - 0.10622921833547194700e0 * t54 * t469 * t20456 - 0.14163895778062926267e0 * t705 * t825 * t5079 + 0.49846486874188679892e1 * t474 * t61 * t20456 * t179 + 0.66461982498918239856e1 * t710 * t1346 * t5079 + 0.24923243437094339947e1 * t5894 * t61 * t20430 * t179 - 0.30486894855802468476e2 * t490 * t15267 * t1357 - 0.45730342283703702713e2 * t490 * t3624 * t1263 - 0.22865171141851851357e2 * t490 * t20456 * t492 * t62 + 0.62931141285733900104e3 * t1618 * t10577 * t5264 + 0.31465570642866950052e3 * t1618 * t20452 * t62 - 0.68595513425555554068e2 * t1597 * t1278 * t5271 + 0.70819478890314631335e-1 * t54 * t162 * t20401 + 0.16615495624729559964e1 * t167 * t61 * t20401 * t179;
8832   t20503 = -0.36e2 * t52 * t3582 * t1282 - t52 * t160 * t20500 + t25 * t20401 * t71 + 0.24e2 * t52 * t5871 * t20416 + 0.6e1 * t52 * t462 * t20423 + 0.8e1 * t52 * t821 * t5131 + 0.12e2 * t1255 * t1260 - 0.6e1 * t1255 * t1283 - 0.24e2 * t315 * t5089 + 0.24e2 * t315 * t5092 - 0.4e1 * t315 * t5132 - 0.4e1 * t5080 * t325;
8833   if(v4rho4 != NULL && (p->info->flags & XC_FLAGS_NEEDS_LAPLACIAN) && (p->info->flags & XC_FLAGS_HAVE_LXC))
8834     v4lapl4[0] = -0.3e1 / 0.8e1 * t262 * t263 * t20503;
8835 
8836   if(v4rho4 != NULL && (p->info->flags & XC_FLAGS_NEEDS_LAPLACIAN) && (p->info->flags & XC_FLAGS_HAVE_LXC))
8837     v4lapl4[1] = 0.0e0;
8838 
8839   if(v4rho4 != NULL && (p->info->flags & XC_FLAGS_NEEDS_LAPLACIAN) && (p->info->flags & XC_FLAGS_HAVE_LXC))
8840     v4lapl4[2] = 0.0e0;
8841 
8842   if(v4rho4 != NULL && (p->info->flags & XC_FLAGS_NEEDS_LAPLACIAN) && (p->info->flags & XC_FLAGS_HAVE_LXC))
8843     v4lapl4[3] = 0.0e0;
8844 
8845   t20508 = t6750 * t39 * t42;
8846   t20509 = t6763 * t20508;
8847   t20511 = t6769 * t20508;
8848   t20513 = t616 * t6750;
8849   t20514 = t20513 * t5828;
8850   t20516 = t20513 * t5827;
8851   t20518 = -0.20744086087359176080e-4 * t20509 + 0.50226189842198418324e-4 * t20511 - 0.10968365066300868770e-2 * t20514 - 0.56300520566772145196e-5 * t20516;
8852   t20533 = t1303 * t1303;
8853   t20540 = t1326 * t1326;
8854   t20547 = t1307 * t1307;
8855   t20580 = t20547 * t1987;
8856   t20584 = t1298 * t1298;
8857   t20617 = -0.13278652291933993376e0 * t54 * t6918 * t20547 + 0.31868765500641584101e0 * t2314 * t3696 * t1298 - 0.74769730311283019838e1 * t2318 * t5310 * t1298 + 0.11432585570925925678e2 * t6904 * t20547 * t661 * t106 + 0.70819478890314631335e-1 * t54 * t236 * t20518 + 0.16615495624729559964e1 * t240 * t61 * t20518 * t247 + 0.24923243437094339947e1 * t6865 * t61 * t20547 * t247 - 0.24056046973484009303e4 * t6871 * t20547 * t6874 * t6876 - 0.15243447427901234237e2 * t1966 * t489 * t20547 * t661 + 0.20977047095244633367e3 * t6892 * t20580 * t242 - 0.10622921833547194700e0 * t54 * t641 * t20584 - 0.14163895778062926267e0 * t772 * t882 * t5147 + 0.49846486874188679892e1 * t646 * t61 * t20584 * t247 + 0.66461982498918239856e1 * t777 * t1381 * t5147 + 0.31465570642866950052e3 * t1984 * t20580 * t106 - 0.68595513425555554068e2 * t1967 * t1322 * t5347 - 0.30486894855802468476e2 * t659 * t15506 * t1392 - 0.45730342283703702713e2 * t659 * t3726 * t1307 - 0.22865171141851851357e2 * t659 * t20584 * t661 * t106 + 0.62931141285733900104e3 * t1984 * t10944 * t5340;
8858   t20620 = -0.36e2 * t104 * t3684 * t1326 + 0.24e2 * t104 * t6818 * t20533 + 0.6e1 * t104 * t634 * t20540 - t104 * t234 * t20617 + 0.8e1 * t104 * t878 * t5199 + t25 * t20518 * t115 + 0.12e2 * t1299 * t1304 - 0.6e1 * t1299 * t1327 - 0.24e2 * t337 * t5157 + 0.24e2 * t337 * t5160 - 0.4e1 * t337 * t5200 - 0.4e1 * t5148 * t347;
8859   if(v4rho4 != NULL && (p->info->flags & XC_FLAGS_NEEDS_LAPLACIAN) && (p->info->flags & XC_FLAGS_HAVE_LXC))
8860     v4lapl4[4] = -0.3e1 / 0.8e1 * t262 * t286 * t20620;
8861 
8862   t20633 = 0.82976344349436704319e-4 * t20392 - 0.20090475936879367329e-3 * t20394 + 0.43873460265203475079e-2 * t20397 + 0.22520208226708858078e-4 * t20399;
8863   t20695 = -0.22865171141851851357e2 * t490 * t3827 * t5271 + 0.31465570642866950052e3 * t1618 * t11164 * t5264 - 0.24056046973484009303e4 * t5905 * t8268 * t5910 * t5095 - 0.22865171141851851357e2 * t490 * t941 * t15287 + 0.15934382750320792050e0 * t2133 * t927 * t15287 - 0.37384865155641509919e1 * t2137 * t1346 * t15636 + 0.11432585570925925678e2 * t5940 * t5109 * t2709 + 0.31465570642866950052e3 * t1618 * t2727 * t62 * t5095 - 0.34297756712777777035e2 * t1597 * t1278 * t5414 + 0.20977047095244633367e3 * t5915 * t5123 * t8279 - 0.76217237139506171188e1 * t490 * t941 * t62 * t5079 - 0.22865171141851851357e2 * t490 * t15609 * t1357 + 0.31465570642866950052e3 * t3429 * t3208 * t15287 - 0.34297756712777777034e2 * t15694 * t1358;
8864   t20741 = -0.13278652291933993376e0 * t7124 * t927 * t5095 - 0.10622921833547194700e0 * t705 * t3813 * t1254 - 0.35409739445157315668e-1 * t705 * t927 * t5079 + 0.15934382750320792050e0 * t2133 * t3813 * t1263 + 0.24923243437094339947e1 * t7106 * t5095 * t179 * t355 - 0.37384865155641509919e1 * t2137 * t5234 * t1335 - 0.15243447427901234237e2 * t1597 * t5109 * t355 - 0.22865171141851851357e2 * t490 * t3827 * t1263 + 0.49846486874188679892e1 * t710 * t1346 * t5209 + 0.16615495624729559964e1 * t710 * t5079 * t179 * t355 + 0.49846486874188679892e1 * t710 * t5244 * t1335 - 0.10622921833547194700e0 * t705 * t15646 * t314 + 0.16615495624729559964e1 * t167 * t61 * t20633 * t179 + 0.70819478890314631335e-1 * t54 * t162 * t20633;
8865   t20768 = 0.6e1 * t1336 * t1260 - t52 * t160 * (t20695 + t20741) + 0.6e1 * t52 * t3784 * t1282 + 0.6e1 * t52 * t15559 * t324 - 0.3e1 * t1255 * t1362 - t5080 * t366 - 0.18e2 * t52 * t11289 * t1259 - 0.18e2 * t3144 * t3773 * t1282 + 0.2e1 * t52 * t923 * t5131 + 0.24e2 * t52 * t8363 * t5088 - 0.18e2 * t315 * t5222;
8866   if(v4rho4 != NULL && (p->info->flags & XC_FLAGS_NEEDS_LAPLACIAN) && (p->info->flags & XC_FLAGS_HAVE_LXC))
8867     v4lapl3tau[0] = -0.3e1 / 0.8e1 * t262 * t263 * (t25 * t20633 * t71 + 0.6e1 * t1255 * t1340 - 0.3e1 * t1336 * t1283 + 0.12e2 * t315 * t5225 + 0.6e1 * t315 * t5228 - 0.3e1 * t315 * t5276 - 0.3e1 * t5210 * t325 - 0.6e1 * t356 * t5089 + 0.6e1 * t356 * t5092 - t356 * t5132 + t20768);
8868 
8869   if(v4rho4 != NULL && (p->info->flags & XC_FLAGS_NEEDS_LAPLACIAN) && (p->info->flags & XC_FLAGS_HAVE_LXC))
8870     v4lapl3tau[1] = 0.0e0;
8871 
8872   if(v4rho4 != NULL && (p->info->flags & XC_FLAGS_NEEDS_LAPLACIAN) && (p->info->flags & XC_FLAGS_HAVE_LXC))
8873     v4lapl3tau[2] = 0.0e0;
8874 
8875   if(v4rho4 != NULL && (p->info->flags & XC_FLAGS_NEEDS_LAPLACIAN) && (p->info->flags & XC_FLAGS_HAVE_LXC))
8876     v4lapl3tau[3] = 0.0e0;
8877 
8878   if(v4rho4 != NULL && (p->info->flags & XC_FLAGS_NEEDS_LAPLACIAN) && (p->info->flags & XC_FLAGS_HAVE_LXC))
8879     v4lapl3tau[4] = 0.0e0;
8880 
8881   if(v4rho4 != NULL && (p->info->flags & XC_FLAGS_NEEDS_LAPLACIAN) && (p->info->flags & XC_FLAGS_HAVE_LXC))
8882     v4lapl3tau[5] = 0.0e0;
8883 
8884   if(v4rho4 != NULL && (p->info->flags & XC_FLAGS_NEEDS_LAPLACIAN) && (p->info->flags & XC_FLAGS_HAVE_LXC))
8885     v4lapl3tau[6] = 0.0e0;
8886 
8887   t20779 = 0.82976344349436704319e-4 * t20509 - 0.20090475936879367329e-3 * t20511 + 0.43873460265203475079e-2 * t20514 + 0.22520208226708858078e-4 * t20516;
8888   t20867 = 0.15934382750320792050e0 * t2314 * t980 * t15489 + 0.31465570642866950052e3 * t1984 * t11467 * t5340 - 0.24056046973484009303e4 * t6871 * t8679 * t6876 * t5163 - 0.22865171141851851357e2 * t659 * t994 * t15489 - 0.76217237139506171188e1 * t659 * t994 * t106 * t5147 + 0.31465570642866950052e3 * t1984 * t2879 * t106 * t5163 - 0.34297756712777777035e2 * t1967 * t1322 * t5488 + 0.20977047095244633367e3 * t6892 * t5191 * t8690 - 0.22865171141851851357e2 * t659 * t15912 * t1392 - 0.37384865155641509919e1 * t2318 * t1381 * t15938 + 0.11432585570925925678e2 * t6904 * t5177 * t2861 - 0.22865171141851851357e2 * t659 * t3937 * t5347 - 0.34297756712777777034e2 * t15862 * t1393 + 0.31465570642866950052e3 * t3536 * t3329 * t15489;
8889   t20913 = 0.16615495624729559964e1 * t240 * t61 * t20779 * t247 + 0.70819478890314631335e-1 * t54 * t236 * t20779 - 0.15243447427901234237e2 * t1967 * t5177 * t374 - 0.13278652291933993376e0 * t7507 * t980 * t5163 + 0.49846486874188679892e1 * t777 * t1381 * t5285 + 0.16615495624729559964e1 * t777 * t5147 * t247 * t374 + 0.49846486874188679892e1 * t777 * t5320 * t1370 - 0.10622921833547194700e0 * t772 * t15870 * t336 - 0.10622921833547194700e0 * t772 * t3923 * t1298 - 0.35409739445157315668e-1 * t772 * t980 * t5147 + 0.15934382750320792050e0 * t2314 * t3923 * t1307 + 0.24923243437094339947e1 * t7523 * t5163 * t247 * t374 - 0.37384865155641509919e1 * t2318 * t5310 * t1370 - 0.22865171141851851357e2 * t659 * t3937 * t1307;
8890   t20917 = -0.3e1 * t1371 * t1327 - t5148 * t385 - 0.3e1 * t1299 * t1397 - 0.3e1 * t5286 * t347 - t375 * t5200 - 0.6e1 * t375 * t5157 + 0.6e1 * t375 * t5160 + 0.6e1 * t337 * t5304 + 0.12e2 * t337 * t5301 + 0.6e1 * t1299 * t1375 - t104 * t234 * (t20867 + t20913);
8891   if(v4rho4 != NULL && (p->info->flags & XC_FLAGS_NEEDS_LAPLACIAN) && (p->info->flags & XC_FLAGS_HAVE_LXC))
8892     v4lapl3tau[7] = -0.3e1 / 0.8e1 * t262 * t286 * (-0.18e2 * t104 * t11592 * t1303 + 0.6e1 * t104 * t3894 * t1326 + 0.6e1 * t104 * t15793 * t346 + 0.24e2 * t104 * t8640 * t5156 + 0.2e1 * t104 * t976 * t5199 + t25 * t20779 * t115 - 0.18e2 * t3265 * t3883 * t1326 + 0.6e1 * t1371 * t1304 - 0.18e2 * t337 * t5298 - 0.3e1 * t337 * t5352 + t20917);
8893 
8894   t20926 = -0.33190537739774681728e-3 * t20392 + 0.80361903747517469318e-3 * t20394 - 0.17549384106081390032e-1 * t20397 - 0.90080832906835432313e-4 * t20399;
8895   t20959 = -0.6e1 * t52 * t11649 * t1259 + 0.24e2 * t52 * t11808 * t1259 + 0.2e1 * t52 * t3991 * t1282 - 0.24e2 * t3144 * t3773 * t1361 + 0.4e1 * t52 * t16072 * t324 + t25 * t20926 * t71 + 0.4e1 * t52 * t923 * t5275 - 0.12e2 * t315 * t5373 + 0.8e1 * t315 * t5376 + 0.4e1 * t315 * t5380 - 0.2e1 * t315 * t5426 - 0.12e2 * t356 * t5222 - 0.2e1 * t5210 * t366;
8896   t20961 = t1361 * t1361;
8897   t20965 = t1335 * t1335;
8898   t21025 = 0.33230991249459119928e1 * t474 * t61 * t20965 * t179 - 0.70819478890314631336e-1 * t54 * t469 * t20965 + 0.16615495624729559964e1 * t167 * t61 * t20926 * t179 + 0.70819478890314631335e-1 * t54 * t162 * t20926 + 0.31465570642866950052e3 * t1618 * t4034 * t10587 + 0.10488523547622316684e3 * t1618 * t4034 * t174 * t1254 - 0.24056046973484009303e4 * t5905 * t11727 * t5910 * t1263 - 0.11432585570925925678e2 * t1597 * t1278 * t11699 - 0.15243447427901234238e2 * t490 * t16149 * t1357 - 0.76217237139506171188e1 * t490 * t4026 * t5271 + 0.10488523547622316684e3 * t1618 * t11689 * t5264 - 0.30486894855802468476e2 * t490 * t941 * t15629 - 0.15243447427901234238e2 * t490 * t941 * t62 * t5209 - 0.11432585570925925678e2 * t1597 * t1429 * t5271 + 0.20977047095244633367e3 * t5915 * t4034 * t5264 + 0.21245843667094389400e0 * t2133 * t927 * t15629 - 0.49846486874188679892e1 * t2137 * t1346 * t16244 + 0.11432585570925925678e2 * t5940 * t1278 * t11707;
8899   t21080 = -0.76217237139506171188e1 * t490 * t4026 * t1263 - 0.15243447427901234238e2 * t490 * t20965 * t492 * t62 - 0.76217237139506171188e1 * t490 * t1429 * t1254 - 0.35409739445157315668e-1 * t705 * t4012 * t1254 - 0.12461621718547169973e1 * t2137 * t5234 * t1405 + 0.16615495624729559964e1 * t710 * t5244 * t1405 + 0.33230991249459119928e1 * t710 * t1346 * t5361 + 0.33230991249459119928e1 * t710 * t4005 * t5209 - 0.70819478890314631336e-1 * t705 * t16130 * t314 - 0.15243447427901234237e2 * t1597 * t1429 * t1263 + 0.53114609167735973502e-1 * t2133 * t4012 * t1263 - 0.13278652291933993376e0 * t7124 * t3995 * t1263 + 0.24923243437094339947e1 * t7106 * t5234 * t1414 - 0.12461621718547169973e1 * t2137 * t5244 * t1414 - 0.70819478890314631336e-1 * t705 * t927 * t5209 + 0.53114609167735973502e-1 * t2133 * t3995 * t1254 + 0.41954094190489266736e3 * t3429 * t3208 * t15629 - 0.45730342283703702713e2 * t11658 * t5261;
8900   t21104 = -t1255 * t1434 + 0.4e1 * t52 * t462 * t20961 - t52 * t160 * (t21025 + t21080) - t1406 * t1283 - 0.4e1 * t1336 * t1362 - 0.2e1 * t5362 * t325 + 0.2e1 * t1406 * t1260 + 0.4e1 * t356 * t5228 + 0.8e1 * t356 * t5225 + 0.8e1 * t1336 * t1340 - 0.2e1 * t356 * t5276 + 0.2e1 * t1255 * t1411 - 0.6e1 * t52 * t3983 * t1282;
8901   if(v4rho4 != NULL && (p->info->flags & XC_FLAGS_NEEDS_LAPLACIAN) && (p->info->flags & XC_FLAGS_HAVE_LXC))
8902     v4lapl2tau2[0] = -0.3e1 / 0.8e1 * t262 * t263 * (t20959 + t21104);
8903 
8904   if(v4rho4 != NULL && (p->info->flags & XC_FLAGS_NEEDS_LAPLACIAN) && (p->info->flags & XC_FLAGS_HAVE_LXC))
8905     v4lapl2tau2[1] = 0.0e0;
8906 
8907   if(v4rho4 != NULL && (p->info->flags & XC_FLAGS_NEEDS_LAPLACIAN) && (p->info->flags & XC_FLAGS_HAVE_LXC))
8908     v4lapl2tau2[2] = 0.0e0;
8909 
8910   if(v4rho4 != NULL && (p->info->flags & XC_FLAGS_NEEDS_LAPLACIAN) && (p->info->flags & XC_FLAGS_HAVE_LXC))
8911     v4lapl2tau2[3] = 0.0e0;
8912 
8913   if(v4rho4 != NULL && (p->info->flags & XC_FLAGS_NEEDS_LAPLACIAN) && (p->info->flags & XC_FLAGS_HAVE_LXC))
8914     v4lapl2tau2[4] = 0.0e0;
8915 
8916   if(v4rho4 != NULL && (p->info->flags & XC_FLAGS_NEEDS_LAPLACIAN) && (p->info->flags & XC_FLAGS_HAVE_LXC))
8917     v4lapl2tau2[5] = 0.0e0;
8918 
8919   if(v4rho4 != NULL && (p->info->flags & XC_FLAGS_NEEDS_LAPLACIAN) && (p->info->flags & XC_FLAGS_HAVE_LXC))
8920     v4lapl2tau2[6] = 0.0e0;
8921 
8922   if(v4rho4 != NULL && (p->info->flags & XC_FLAGS_NEEDS_LAPLACIAN) && (p->info->flags & XC_FLAGS_HAVE_LXC))
8923     v4lapl2tau2[7] = 0.0e0;
8924 
8925   t21139 = 0.24e2 * t104 * t12103 * t1303 - 0.6e1 * t104 * t12109 * t1303 + 0.2e1 * t104 * t4087 * t1326 + 0.4e1 * t104 * t16506 * t346 + 0.4e1 * t104 * t976 * t5351 - t1443 * t1327 - 0.4e1 * t1371 * t1397 + 0.4e1 * t337 * t5454 - 0.2e1 * t5436 * t347 - 0.12e2 * t375 * t5298 + 0.8e1 * t375 * t5301 + 0.4e1 * t375 * t5304 - 0.2e1 * t5286 * t385;
8926   t21148 = t1370 * t1370;
8927   t21205 = -0.70819478890314631336e-1 * t54 * t641 * t21148 + 0.33230991249459119928e1 * t646 * t61 * t21148 * t247 - 0.70819478890314631336e-1 * t772 * t980 * t5285 + 0.33230991249459119928e1 * t777 * t4101 * t5285 + 0.53114609167735973502e-1 * t2314 * t4091 * t1298 + 0.24923243437094339947e1 * t7523 * t5310 * t1451 - 0.12461621718547169973e1 * t2318 * t5320 * t1451 - 0.76217237139506171188e1 * t659 * t1466 * t1298 + 0.16615495624729559964e1 * t777 * t5320 * t1442 + 0.33230991249459119928e1 * t777 * t1381 * t5435 - 0.70819478890314631336e-1 * t772 * t16342 * t336 - 0.35409739445157315668e-1 * t772 * t4108 * t1298 - 0.12461621718547169973e1 * t2318 * t5310 * t1442 - 0.76217237139506171188e1 * t659 * t4122 * t1307 - 0.15243447427901234238e2 * t659 * t21148 * t661 * t106 + 0.21245843667094389400e0 * t2314 * t980 * t15931 - 0.49846486874188679892e1 * t2318 * t1381 * t16444 + 0.11432585570925925678e2 * t6904 * t1322 * t12010;
8928   t21251 = -0.33190537739774681728e-3 * t20509 + 0.80361903747517469318e-3 * t20511 - 0.17549384106081390032e-1 * t20514 - 0.90080832906835432313e-4 * t20516;
8929   t21268 = 0.31465570642866950052e3 * t1984 * t4130 * t10847 - 0.11432585570925925678e2 * t1967 * t1322 * t11999 - 0.15243447427901234238e2 * t659 * t16414 * t1392 - 0.76217237139506171188e1 * t659 * t4122 * t5347 + 0.10488523547622316684e3 * t1984 * t11981 * t5340 - 0.30486894855802468476e2 * t659 * t994 * t15931 - 0.15243447427901234238e2 * t659 * t994 * t106 * t5285 + 0.10488523547622316684e3 * t1984 * t4130 * t242 * t1298 - 0.24056046973484009303e4 * t6871 * t11970 * t6876 * t1307 - 0.11432585570925925678e2 * t1967 * t1466 * t5347 + 0.20977047095244633367e3 * t6892 * t4130 * t5340 + 0.41954094190489266736e3 * t3536 * t3329 * t15931 - 0.45730342283703702713e2 * t12045 * t5337 + 0.70819478890314631335e-1 * t54 * t236 * t21251 + 0.16615495624729559964e1 * t240 * t61 * t21251 * t247 - 0.15243447427901234237e2 * t1967 * t1466 * t1307 + 0.53114609167735973502e-1 * t2314 * t4108 * t1307 - 0.13278652291933993376e0 * t7507 * t4091 * t1307;
8930   t21278 = t1396 * t1396;
8931   t21291 = 0.2e1 * t1443 * t1304 - 0.2e1 * t337 * t5500 - 0.6e1 * t104 * t4079 * t1326 - t1299 * t1471 - t104 * t234 * (t21205 + t21268) + 0.8e1 * t1371 * t1375 + 0.2e1 * t1299 * t1448 - 0.2e1 * t375 * t5352 + 0.4e1 * t104 * t634 * t21278 - 0.12e2 * t337 * t5447 + 0.8e1 * t337 * t5450 - 0.24e2 * t3265 * t3883 * t1396 + t25 * t21251 * t115;
8932   if(v4rho4 != NULL && (p->info->flags & XC_FLAGS_NEEDS_LAPLACIAN) && (p->info->flags & XC_FLAGS_HAVE_LXC))
8933     v4lapl2tau2[8] = -0.3e1 / 0.8e1 * t262 * t286 * (t21139 + t21291);
8934 
8935   t21300 = 0.13276215095909872691e-2 * t20392 - 0.32144761499006987727e-2 * t20394 + 0.70197536424325560126e-1 * t20397 + 0.36032333162734172925e-3 * t20399;
8936   t21390 = -0.22865171141851851356e2 * t490 * t1429 * t1335 + 0.49846486874188679892e1 * t710 * t4005 * t5361 - 0.34297756712777777034e2 * t11658 * t5411 + 0.31465570642866950052e3 * t14856 * t3208 * t3792 + 0.16615495624729559964e1 * t167 * t61 * t21300 * t179 + 0.70819478890314631335e-1 * t54 * t162 * t21300 - 0.22865171141851851357e2 * t490 * t4026 * t3792 - 0.22865171141851851357e2 * t490 * t4026 * t5414 + 0.31465570642866950052e3 * t1618 * t4034 * t174 * t1335 + 0.31465570642866950052e3 * t1618 * t5553 * t1357 - 0.24056046973484009303e4 * t5905 * t16632 * t5910 * t314 + 0.11432585570925925678e2 * t5940 * t5539 * t1357 + 0.15934382750320792050e0 * t2133 * t927 * t16189 - 0.37384865155641509919e1 * t2137 * t1346 * t16586;
8937   t21434 = -0.34297756712777777034e2 * t1597 * t1429 * t5414 + 0.20977047095244633367e3 * t5915 * t5553 * t5418 - 0.76217237139506171188e1 * t490 * t16642 * t1357 - 0.22865171141851851357e2 * t490 * t16149 * t2709 - 0.15243447427901234237e2 * t1597 * t5539 * t314 - 0.35409739445157315668e-1 * t705 * t16603 * t314 + 0.16615495624729559964e1 * t710 * t1346 * t5509 + 0.24923243437094339947e1 * t7106 * t1346 * t5525 - 0.37384865155641509919e1 * t2137 * t16610 * t1335 - 0.10622921833547194700e0 * t705 * t3813 * t1405 - 0.10622921833547194700e0 * t705 * t927 * t5361 + 0.49846486874188679892e1 * t710 * t1335 * t179 * t1405 - 0.13278652291933993376e0 * t7124 * t16590 * t314 + 0.15934382750320792051e0 * t2133 * t3995 * t1335;
8938   t21438 = -0.3e1 * t356 * t5426 - 0.6e1 * t315 * t5519 + 0.24e2 * t52 * t16558 * t324 - 0.18e2 * t52 * t3983 * t1361 + 0.6e1 * t315 * t5522 - 0.18e2 * t3144 * t16567 * t324 + 0.6e1 * t52 * t3784 * t1433 + 0.6e1 * t52 * t923 * t5425 - t315 * t5562 + 0.2e1 * t52 * t16578 * t324 - t52 * t160 * (t21390 + t21434);
8939   if(v4rho4 != NULL && (p->info->flags & XC_FLAGS_NEEDS_LAPLACIAN) && (p->info->flags & XC_FLAGS_HAVE_LXC))
8940     v4lapltau3[0] = -0.3e1 / 0.8e1 * t262 * t263 * (t25 * t21300 * t71 + 0.6e1 * t1336 * t1411 - 0.3e1 * t1336 * t1434 + 0.6e1 * t1406 * t1340 - 0.3e1 * t1406 * t1362 - t5510 * t325 - 0.18e2 * t356 * t5373 + 0.12e2 * t356 * t5376 + 0.6e1 * t356 * t5380 - 0.3e1 * t5362 * t366 + t21438);
8941 
8942   if(v4rho4 != NULL && (p->info->flags & XC_FLAGS_NEEDS_LAPLACIAN) && (p->info->flags & XC_FLAGS_HAVE_LXC))
8943     v4lapltau3[1] = 0.0e0;
8944 
8945   if(v4rho4 != NULL && (p->info->flags & XC_FLAGS_NEEDS_LAPLACIAN) && (p->info->flags & XC_FLAGS_HAVE_LXC))
8946     v4lapltau3[2] = 0.0e0;
8947 
8948   if(v4rho4 != NULL && (p->info->flags & XC_FLAGS_NEEDS_LAPLACIAN) && (p->info->flags & XC_FLAGS_HAVE_LXC))
8949     v4lapltau3[3] = 0.0e0;
8950 
8951   if(v4rho4 != NULL && (p->info->flags & XC_FLAGS_NEEDS_LAPLACIAN) && (p->info->flags & XC_FLAGS_HAVE_LXC))
8952     v4lapltau3[4] = 0.0e0;
8953 
8954   if(v4rho4 != NULL && (p->info->flags & XC_FLAGS_NEEDS_LAPLACIAN) && (p->info->flags & XC_FLAGS_HAVE_LXC))
8955     v4lapltau3[5] = 0.0e0;
8956 
8957   if(v4rho4 != NULL && (p->info->flags & XC_FLAGS_NEEDS_LAPLACIAN) && (p->info->flags & XC_FLAGS_HAVE_LXC))
8958     v4lapltau3[6] = 0.0e0;
8959 
8960   t21447 = 0.13276215095909872691e-2 * t20509 - 0.32144761499006987727e-2 * t20511 + 0.70197536424325560126e-1 * t20514 + 0.36032333162734172925e-3 * t20516;
8961   t21537 = 0.24923243437094339947e1 * t7523 * t1381 * t5587 + 0.31465570642866950052e3 * t1984 * t4130 * t242 * t1370 + 0.31465570642866950052e3 * t1984 * t5615 * t1392 - 0.24056046973484009303e4 * t6871 * t16768 * t6876 * t336 - 0.34297756712777777034e2 * t1967 * t1466 * t5488 + 0.20977047095244633367e3 * t6892 * t5615 * t5492 - 0.76217237139506171188e1 * t659 * t16778 * t1392 - 0.22865171141851851357e2 * t659 * t16414 * t2861 - 0.22865171141851851357e2 * t659 * t4122 * t3902 - 0.22865171141851851357e2 * t659 * t4122 * t5488 + 0.11432585570925925678e2 * t6904 * t5601 * t1392 + 0.15934382750320792050e0 * t2314 * t980 * t16430 - 0.37384865155641509919e1 * t2318 * t1381 * t16757 - 0.22865171141851851356e2 * t659 * t1466 * t1370;
8962   t21581 = 0.16615495624729559964e1 * t777 * t1381 * t5571 + 0.49846486874188679892e1 * t777 * t1370 * t247 * t1442 + 0.49846486874188679892e1 * t777 * t4101 * t5435 - 0.15243447427901234237e2 * t1967 * t5601 * t336 - 0.35409739445157315668e-1 * t772 * t16838 * t336 - 0.37384865155641509919e1 * t2318 * t16828 * t1370 - 0.10622921833547194700e0 * t772 * t3923 * t1442 - 0.10622921833547194700e0 * t772 * t980 * t5435 - 0.13278652291933993376e0 * t7507 * t16818 * t336 + 0.15934382750320792051e0 * t2314 * t4091 * t1370 + 0.16615495624729559964e1 * t240 * t61 * t21447 * t247 + 0.70819478890314631335e-1 * t54 * t236 * t21447 - 0.34297756712777777034e2 * t12045 * t5485 + 0.31465570642866950052e3 * t15116 * t3329 * t3902;
8963   t21585 = -0.3e1 * t375 * t5500 - 0.6e1 * t337 * t5581 + 0.24e2 * t104 * t16729 * t346 - 0.18e2 * t104 * t4079 * t1396 + 0.6e1 * t337 * t5584 - 0.18e2 * t3265 * t16738 * t346 + 0.6e1 * t104 * t3894 * t1470 + 0.6e1 * t104 * t976 * t5499 - t337 * t5624 + 0.2e1 * t104 * t16749 * t346 - t104 * t234 * (t21537 + t21581);
8964   if(v4rho4 != NULL && (p->info->flags & XC_FLAGS_NEEDS_LAPLACIAN) && (p->info->flags & XC_FLAGS_HAVE_LXC))
8965     v4lapltau3[7] = -0.3e1 / 0.8e1 * t262 * t286 * (t25 * t21447 * t115 + 0.6e1 * t1371 * t1448 - 0.3e1 * t1371 * t1471 + 0.6e1 * t1443 * t1375 - 0.3e1 * t1443 * t1397 - t5572 * t347 - 0.18e2 * t375 * t5447 + 0.12e2 * t375 * t5450 + 0.6e1 * t375 * t5454 - 0.3e1 * t5436 * t385 + t21585);
8966 
8967   t21594 = -0.53104860383639490765e-2 * t20392 + 0.12857904599602795091e-1 * t20394 - 0.28079014569730224051e0 * t20397 - 0.14412933265093669170e-2 * t20399;
8968   t21609 = t1410 * t1410;
8969   t21616 = t1433 * t1433;
8970   t21630 = t1414 * t1414;
8971   t21643 = t21630 * t1621;
8972   t21650 = t1405 * t1405;
8973   t21694 = 0.16615495624729559964e1 * t167 * t61 * t21594 * t179 + 0.70819478890314631335e-1 * t54 * t162 * t21594 + 0.24923243437094339947e1 * t5894 * t61 * t21630 * t179 - 0.24056046973484009303e4 * t5905 * t21630 * t5908 * t5910 - 0.15243447427901234237e2 * t1596 * t489 * t21630 * t492 + 0.20977047095244633367e3 * t5915 * t21643 * t174 - 0.14163895778062926267e0 * t705 * t927 * t5509 + 0.49846486874188679892e1 * t474 * t61 * t21650 * t179 + 0.66461982498918239856e1 * t710 * t4005 * t5509 - 0.13278652291933993376e0 * t54 * t5954 * t21630 + 0.31868765500641584101e0 * t2133 * t3995 * t1405 - 0.74769730311283019838e1 * t2137 * t16610 * t1405 + 0.11432585570925925678e2 * t5940 * t21630 * t492 * t62 - 0.10622921833547194700e0 * t54 * t469 * t21650 + 0.31465570642866950052e3 * t1618 * t21643 * t62 - 0.30486894855802468476e2 * t490 * t16642 * t2709 - 0.45730342283703702713e2 * t490 * t4026 * t1414 - 0.22865171141851851357e2 * t490 * t21650 * t492 * t62 + 0.62931141285733900104e3 * t1618 * t11689 * t174 * t1414 - 0.68595513425555554068e2 * t1597 * t1429 * t11699;
8974   t21697 = -0.36e2 * t52 * t3983 * t1433 - t52 * t160 * t21694 + t25 * t21594 * t71 + 0.24e2 * t52 * t5871 * t21609 + 0.6e1 * t52 * t462 * t21616 + 0.8e1 * t52 * t923 * t5561 + 0.12e2 * t1406 * t1411 - 0.6e1 * t1406 * t1434 - 0.24e2 * t356 * t5519 + 0.24e2 * t356 * t5522 - 0.4e1 * t356 * t5562 - 0.4e1 * t5510 * t366;
8975   if(v4rho4 != NULL && (p->info->flags & XC_FLAGS_HAVE_LXC))
8976     v4tau4[0] = -0.3e1 / 0.8e1 * t262 * t263 * t21697;
8977 
8978   if(v4rho4 != NULL && (p->info->flags & XC_FLAGS_HAVE_LXC))
8979     v4tau4[1] = 0.0e0;
8980 
8981   if(v4rho4 != NULL && (p->info->flags & XC_FLAGS_HAVE_LXC))
8982     v4tau4[2] = 0.0e0;
8983 
8984   if(v4rho4 != NULL && (p->info->flags & XC_FLAGS_HAVE_LXC))
8985     v4tau4[3] = 0.0e0;
8986 
8987   t21705 = -0.53104860383639490765e-2 * t20509 + 0.12857904599602795091e-1 * t20511 - 0.28079014569730224051e0 * t20514 - 0.14412933265093669170e-2 * t20516;
8988   t21720 = t1447 * t1447;
8989   t21727 = t1470 * t1470;
8990   t21741 = t1451 * t1451;
8991   t21750 = t1442 * t1442;
8992   t21762 = t21741 * t1987;
8993   t21805 = 0.16615495624729559964e1 * t240 * t61 * t21705 * t247 + 0.70819478890314631335e-1 * t54 * t236 * t21705 + 0.24923243437094339947e1 * t6865 * t61 * t21741 * t247 - 0.24056046973484009303e4 * t6871 * t21741 * t6874 * t6876 + 0.49846486874188679892e1 * t646 * t61 * t21750 * t247 + 0.66461982498918239856e1 * t777 * t4101 * t5571 - 0.15243447427901234237e2 * t1966 * t489 * t21741 * t661 + 0.20977047095244633367e3 * t6892 * t21762 * t242 - 0.74769730311283019838e1 * t2318 * t16828 * t1442 + 0.11432585570925925678e2 * t6904 * t21741 * t661 * t106 - 0.10622921833547194700e0 * t54 * t641 * t21750 - 0.14163895778062926267e0 * t772 * t980 * t5571 - 0.13278652291933993376e0 * t54 * t6918 * t21741 + 0.31868765500641584101e0 * t2314 * t4091 * t1442 + 0.31465570642866950052e3 * t1984 * t21762 * t106 - 0.45730342283703702713e2 * t659 * t4122 * t1451 - 0.22865171141851851357e2 * t659 * t21750 * t661 * t106 + 0.62931141285733900104e3 * t1984 * t11981 * t242 * t1451 - 0.68595513425555554068e2 * t1967 * t1466 * t11999 - 0.30486894855802468476e2 * t659 * t16778 * t2861;
8994   t21808 = -0.36e2 * t104 * t4079 * t1470 + 0.24e2 * t104 * t6818 * t21720 + 0.6e1 * t104 * t634 * t21727 - t104 * t234 * t21805 + 0.8e1 * t104 * t976 * t5623 + t25 * t21705 * t115 + 0.12e2 * t1443 * t1448 - 0.6e1 * t1443 * t1471 - 0.24e2 * t375 * t5581 + 0.24e2 * t375 * t5584 - 0.4e1 * t375 * t5624 - 0.4e1 * t5572 * t385;
8995   if(v4rho4 != NULL && (p->info->flags & XC_FLAGS_HAVE_LXC))
8996     v4tau4[4] = -0.3e1 / 0.8e1 * t262 * t286 * t21808;
8997 
8998 #ifndef XC_DONT_COMPILE_MXC
8999 
9000   if(order < 5) return;
9001 
9002 
9003 #endif
9004 
9005 #endif
9006 
9007 #endif
9008 
9009 #endif
9010 
9011 #endif
9012 
9013 
9014 }
9015 
9016