Mercurial > hg > ltpda
diff src/c_sources/polyreg.c @ 0:f0afece42f48
Import.
| author | Daniele Nicolodi <nicolodi@science.unitn.it> |
|---|---|
| date | Wed, 23 Nov 2011 19:22:13 +0100 |
| parents | |
| children |
line wrap: on
line diff
--- /dev/null Thu Jan 01 00:00:00 1970 +0000 +++ b/src/c_sources/polyreg.c Wed Nov 23 19:22:13 2011 +0100 @@ -0,0 +1,6374 @@ +void +polyreg0 (double *x, int nn, double *y, double *a) +{ + +/* +polynominal detrending of a time series, order 0 +machine-generated file, do not edit! +made by polyregz.m (Mathematica ) +Gerhard Heinzel AEI 17.01.2008 + +x[]: input, read-only: time series to be detrended +nn: input, read-only: length of x[] +y[]: output: time series with trend subtracted +a[]: fitting coefficients in for z^0, z^1, z^2,... with + z = 2*i/(nn-1)-1 ; i=0,...,nn-1 +*/ + + long double n = nn, n1 = 2.L / (n - 1), z; + long double a0, temp0, sum0 = 0; + int i; + for (i = 0; i < nn; i++) + { + z = n1 * i - 1.L; + sum0 += x[i]; +/* the above code is efficiently optimized by GCC4 */ + + } + temp0 = 1.L / (1.L * n + 0); + a0 = temp0 * sum0; + for (i = 0; i < nn; i++) + { + z = n1 * i - 1.L; + y[i] = x[i] - a0; + } + a[0] = a0; +} + +void +polyreg1 (double *x, int nn, double *y, double *a) +{ + +/* +polynominal detrending of a time series, order 1 +machine-generated file, do not edit! +made by polyregz.m (Mathematica ) +Gerhard Heinzel AEI 17.01.2008 + +x[]: input, read-only: time series to be detrended +nn: input, read-only: length of x[] +y[]: output: time series with trend subtracted +a[]: fitting coefficients in for z^0, z^1, z^2,... with + z = 2*i/(nn-1)-1 ; i=0,...,nn-1 +*/ + + long double n = nn, n1 = 2.L / (n - 1), z; + long double a0, temp0, sum0 = 0; + long double a1, temp1, sum1 = 0; + int i; + for (i = 0; i < nn; i++) + { + z = n1 * i - 1.L; + sum0 += x[i]; + sum1 += x[i] * z; +/* the above code is efficiently optimized by GCC4 */ + + } + temp0 = 1.L / (1.L * n + 0); + a0 = temp0 * sum0; + temp1 = + (1.L * n + + -1.L) / ((0.3333333333333333333333L * n + + 0.3333333333333333333333L) * n + 0); + a1 = temp1 * sum1; + for (i = 0; i < nn; i++) + { + z = n1 * i - 1.L; + y[i] = x[i] - (a1 * z + a0); + } + a[0] = a0; + a[1] = a1; +} + +void +polyreg2 (double *x, int nn, double *y, double *a) +{ + +/* +polynominal detrending of a time series, order 2 +machine-generated file, do not edit! +made by polyregz.m (Mathematica ) +Gerhard Heinzel AEI 17.01.2008 + +x[]: input, read-only: time series to be detrended +nn: input, read-only: length of x[] +y[]: output: time series with trend subtracted +a[]: fitting coefficients in for z^0, z^1, z^2,... with + z = 2*i/(nn-1)-1 ; i=0,...,nn-1 +*/ + + long double n = nn, n1 = 2.L / (n - 1), z; + long double a0, temp0, sum0 = 0; + long double a1, temp1, sum1 = 0; + long double a2, temp2, sum2 = 0; + int i; + for (i = 0; i < nn; i++) + { + z = n1 * i - 1.L; + sum0 += x[i]; + sum1 += x[i] * z; + sum2 += x[i] * z * z; +/* the above code is efficiently optimized by GCC4 */ + + } + temp0 = + ((-0.4285714285714285714286L * n + 0) * n + + 1.L) / (((-0.1904761904761904761905L * n + 0) * n + + 0.7619047619047619047619L) * n + 0); + temp2 = + ((-0.5L * n + 1.L) * n + + -0.5L) / (((0.1333333333333333333333L * n + 0) * n + + -0.5333333333333333333333L) * n + 0); + a0 = temp0 * sum0 + temp2 * sum2; + temp1 = + (1.L * n + + -1.L) / ((0.3333333333333333333333L * n + + 0.3333333333333333333333L) * n + 0); + a1 = temp1 * sum1; + temp0 = + ((-0.5L * n + 1.L) * n + + -0.5L) / (((0.1333333333333333333333L * n + 0) * n + + -0.5333333333333333333333L) * n + 0); + temp2 = + (((0.3333333333333333333333L * n + -1.L) * n + 1.L) * n + + -0.3333333333333333333333L) / + ((((0.02962962962962962962963L * n + 0.02962962962962962962963L) * n + + -0.1185185185185185185185L) * n + -0.1185185185185185185185L) * n + 0); + a2 = temp0 * sum0 + temp2 * sum2; + for (i = 0; i < nn; i++) + { + z = n1 * i - 1.L; + y[i] = x[i] - ((a2 * z + a1) * z + a0); + } + a[0] = a0; + a[1] = a1; + a[2] = a2; +} + +void +polyreg3 (double *x, int nn, double *y, double *a) +{ + +/* +polynominal detrending of a time series, order 3 +machine-generated file, do not edit! +made by polyregz.m (Mathematica ) +Gerhard Heinzel AEI 17.01.2008 + +x[]: input, read-only: time series to be detrended +nn: input, read-only: length of x[] +y[]: output: time series with trend subtracted +a[]: fitting coefficients in for z^0, z^1, z^2,... with + z = 2*i/(nn-1)-1 ; i=0,...,nn-1 +*/ + + long double n = nn, n1 = 2.L / (n - 1), z; + long double a0, temp0, sum0 = 0; + long double a1, temp1, sum1 = 0; + long double a2, temp2, sum2 = 0; + long double a3, temp3, sum3 = 0; + int i; + for (i = 0; i < nn; i++) + { + z = n1 * i - 1.L; + sum0 += x[i]; + sum1 += x[i] * z; + sum2 += x[i] * z * z; + sum3 += x[i] * z * z * z; +/* the above code is efficiently optimized by GCC4 */ + + } + temp0 = + ((-0.4285714285714285714286L * n + 0) * n + + 1.L) / (((-0.1904761904761904761905L * n + 0) * n + + 0.7619047619047619047619L) * n + 0); + temp2 = + ((-0.5L * n + 1.L) * n + + -0.5L) / (((0.1333333333333333333333L * n + 0) * n + + -0.5333333333333333333333L) * n + 0); + a0 = temp0 * sum0 + temp2 * sum2; + temp1 = + (((((0.09677419354838709677419L * n + -0.09677419354838709677419L) * n + + -0.5806451612903225806452L) * n + 0.5806451612903225806452L) * n + + 1.L) * n + + -1.L) / + ((((((0.00516129032258064516129L * n + 0.00516129032258064516129L) * n + + -0.06709677419354838709677L) * n + -0.06709677419354838709677L) * n + + 0.1858064516129032258065L) * n + 0.1858064516129032258065L) * n + 0); + temp3 = + (((((-0.1428571428571428571429L * n + 0.4285714285714285714286L) * n + + -0.09523809523809523809524L) * n + -0.8571428571428571428571L) * n + + 1.L) * n + + -0.3333333333333333333333L) / + ((((((0.005442176870748299319728L * n + 0.005442176870748299319728L) * n + + -0.07074829931972789115646L) * n + -0.07074829931972789115646L) * n + + 0.1959183673469387755102L) * n + 0.1959183673469387755102L) * n + 0); + a1 = temp1 * sum1 + temp3 * sum3; + temp0 = + ((-0.5L * n + 1.L) * n + + -0.5L) / (((0.1333333333333333333333L * n + 0) * n + + -0.5333333333333333333333L) * n + 0); + temp2 = + (((0.3333333333333333333333L * n + -1.L) * n + 1.L) * n + + -0.3333333333333333333333L) / + ((((0.02962962962962962962963L * n + 0.02962962962962962962963L) * n + + -0.1185185185185185185185L) * n + -0.1185185185185185185185L) * n + 0); + a2 = temp0 * sum0 + temp2 * sum2; + temp1 = + (((((-0.1428571428571428571429L * n + 0.4285714285714285714286L) * n + + -0.09523809523809523809524L) * n + -0.8571428571428571428571L) * n + + 1.L) * n + + -0.3333333333333333333333L) / + ((((((0.005442176870748299319728L * n + 0.005442176870748299319728L) * n + + -0.07074829931972789115646L) * n + -0.07074829931972789115646L) * n + + 0.1959183673469387755102L) * n + 0.1959183673469387755102L) * n + 0); + temp3 = + (((((0.1L * n + -0.5L) * n + 1.L) * n + -1.L) * n + 0.5L) * n + + -0.1L) / + ((((((0.002285714285714285714286L * n + 0.002285714285714285714286L) * n + + -0.02971428571428571428571L) * n + -0.02971428571428571428571L) * n + + 0.08228571428571428571429L) * n + 0.08228571428571428571429L) * n + 0); + a3 = temp1 * sum1 + temp3 * sum3; + for (i = 0; i < nn; i++) + { + z = n1 * i - 1.L; + y[i] = x[i] - (((a3 * z + a2) * z + a1) * z + a0); + } + a[0] = a0; + a[1] = a1; + a[2] = a2; + a[3] = a3; +} + +void +polyreg4 (double *x, int nn, double *y, double *a) +{ + +/* +polynominal detrending of a time series, order 4 +machine-generated file, do not edit! +made by polyregz.m (Mathematica ) +Gerhard Heinzel AEI 17.01.2008 + +x[]: input, read-only: time series to be detrended +nn: input, read-only: length of x[] +y[]: output: time series with trend subtracted +a[]: fitting coefficients in for z^0, z^1, z^2,... with + z = 2*i/(nn-1)-1 ; i=0,...,nn-1 +*/ + + long double n = nn, n1 = 2.L / (n - 1), z; + long double a0, temp0, sum0 = 0; + long double a1, temp1, sum1 = 0; + long double a2, temp2, sum2 = 0; + long double a3, temp3, sum3 = 0; + long double a4, temp4, sum4 = 0; + int i; + for (i = 0; i < nn; i++) + { + z = n1 * i - 1.L; + sum0 += x[i]; + sum1 += x[i] * z; + sum2 += x[i] * z * z; + sum3 += x[i] * z * z * z; + sum4 += x[i] * z * z * z * z; +/* the above code is efficiently optimized by GCC4 */ + + } + temp0 = + ((((0.03685503685503685503686L * n + 0) * n + + -0.5651105651105651105651L) * n + 0) * n + + 1.L) / + (((((0.01048321048321048321048L * n + 0) * n + + -0.2096642096642096642097L) * n + 0) * n + + 0.6709254709254709254709L) * n + 0); + temp2 = + ((((-0.1428571428571428571429L * n + 0.2857142857142857142857L) * n + + 0.8571428571428571428571L) * n + -2.L) * n + + 1.L) / + (((((0.008707482993197278911565L * n + 0) * n + + -0.1741496598639455782313L) * n + 0) * n + + 0.5572789115646258503401L) * n + 0); + temp4 = + ((((0.1666666666666666666667L * n + -0.6666666666666666666667L) * n + + 1.L) * n + -0.6666666666666666666667L) * n + + 0.1666666666666666666667L) / + (((((0.01128747795414462081129L * n + 0) * n + + -0.2257495590828924162257L) * n + 0) * n + + 0.7223985890652557319224L) * n + 0); + a0 = temp0 * sum0 + temp2 * sum2 + temp4 * sum4; + temp1 = + (((((0.09677419354838709677419L * n + -0.09677419354838709677419L) * n + + -0.5806451612903225806452L) * n + 0.5806451612903225806452L) * n + + 1.L) * n + + -1.L) / + ((((((0.00516129032258064516129L * n + 0.00516129032258064516129L) * n + + -0.06709677419354838709677L) * n + -0.06709677419354838709677L) * n + + 0.1858064516129032258065L) * n + 0.1858064516129032258065L) * n + 0); + temp3 = + (((((-0.1428571428571428571429L * n + 0.4285714285714285714286L) * n + + -0.09523809523809523809524L) * n + -0.8571428571428571428571L) * n + + 1.L) * n + + -0.3333333333333333333333L) / + ((((((0.005442176870748299319728L * n + 0.005442176870748299319728L) * n + + -0.07074829931972789115646L) * n + -0.07074829931972789115646L) * n + + 0.1959183673469387755102L) * n + 0.1959183673469387755102L) * n + 0); + a1 = temp1 * sum1 + temp3 * sum3; + temp0 = + ((((-0.1428571428571428571429L * n + 0.2857142857142857142857L) * n + + 0.8571428571428571428571L) * n + -2.L) * n + + 1.L) / + (((((0.008707482993197278911565L * n + 0) * n + + -0.1741496598639455782313L) * n + 0) * n + + 0.5572789115646258503401L) * n + 0); + temp2 = + (((((((0.0114942528735632183908L * n + -0.03448275862068965517241L) * n + + -0.08045977011494252873563L) * n + 0.3333333333333333333333L) * n + + -0.0114942528735632183908L) * n + -0.885057471264367816092L) * n + + 1.L) * n + + -0.3333333333333333333333L) / + ((((((((0.00008340500951338389762035L * n + + 0.00008340500951338389762035L) * n + + -0.00241874527588813303099L) * n + + -0.00241874527588813303099L) * n + 0.02035082232126567101937L) * n + + 0.02035082232126567101937L) * n + -0.04804128547970912502932L) * n + + -0.04804128547970912502932L) * n + 0); + temp4 = + (((((((-0.02608695652173913043478L * n + 0.1304347826086956521739L) * n + + -0.1478260869565217391304L) * n + -0.3043478260869565217391L) * n + + 1.L) * n + -1.104347826086956521739L) * n + + 0.565217391304347826087L) * n + + -0.1130434782608695652174L) / + ((((((((0.0001766735679779158040028L * n + + 0.0001766735679779158040028L) * n + + -0.00512353347135955831608L) * n + + -0.00512353347135955831608L) * n + 0.04310835058661145617667L) * n + + 0.04310835058661145617667L) * n + -0.1017639751552795031056L) * n + + -0.1017639751552795031056L) * n + 0); + a2 = temp0 * sum0 + temp2 * sum2 + temp4 * sum4; + temp1 = + (((((-0.1428571428571428571429L * n + 0.4285714285714285714286L) * n + + -0.09523809523809523809524L) * n + -0.8571428571428571428571L) * n + + 1.L) * n + + -0.3333333333333333333333L) / + ((((((0.005442176870748299319728L * n + 0.005442176870748299319728L) * n + + -0.07074829931972789115646L) * n + -0.07074829931972789115646L) * n + + 0.1959183673469387755102L) * n + 0.1959183673469387755102L) * n + 0); + temp3 = + (((((0.1L * n + -0.5L) * n + 1.L) * n + -1.L) * n + 0.5L) * n + + -0.1L) / + ((((((0.002285714285714285714286L * n + 0.002285714285714285714286L) * n + + -0.02971428571428571428571L) * n + -0.02971428571428571428571L) * n + + 0.08228571428571428571429L) * n + 0.08228571428571428571429L) * n + 0); + a3 = temp1 * sum1 + temp3 * sum3; + temp0 = + ((((0.1666666666666666666667L * n + -0.6666666666666666666667L) * n + + 1.L) * n + -0.6666666666666666666667L) * n + + 0.1666666666666666666667L) / + (((((0.01128747795414462081129L * n + 0) * n + + -0.2257495590828924162257L) * n + 0) * n + + 0.7223985890652557319224L) * n + 0); + temp2 = + (((((((-0.02608695652173913043478L * n + 0.1304347826086956521739L) * n + + -0.1478260869565217391304L) * n + -0.3043478260869565217391L) * n + + 1.L) * n + -1.104347826086956521739L) * n + + 0.565217391304347826087L) * n + + -0.1130434782608695652174L) / + ((((((((0.0001766735679779158040028L * n + + 0.0001766735679779158040028L) * n + + -0.00512353347135955831608L) * n + + -0.00512353347135955831608L) * n + 0.04310835058661145617667L) * n + + 0.04310835058661145617667L) * n + -0.1017639751552795031056L) * n + + -0.1017639751552795031056L) * n + 0); + temp4 = + (((((((0.02857142857142857142857L * n + -0.2L) * n + 0.6L) * n + + -1.L) * n + 1.L) * n + -0.6L) * n + 0.2L) * n + + -0.02857142857142857142857L) / + ((((((((0.0001658568189180434078393L * n + + 0.0001658568189180434078393L) * n + + -0.00480984774862325882734L) * n + + -0.00480984774862325882734L) * n + 0.0404690638160025915128L) * n + + 0.0404690638160025915128L) * n + -0.09553352769679300291545L) * n + + -0.09553352769679300291545L) * n + 0); + a4 = temp0 * sum0 + temp2 * sum2 + temp4 * sum4; + for (i = 0; i < nn; i++) + { + z = n1 * i - 1.L; + y[i] = x[i] - ((((a4 * z + a3) * z + a2) * z + a1) * z + a0); + } + a[0] = a0; + a[1] = a1; + a[2] = a2; + a[3] = a3; + a[4] = a4; +} + +void +polyreg5 (double *x, int nn, double *y, double *a) +{ + +/* +polynominal detrending of a time series, order 5 +machine-generated file, do not edit! +made by polyregz.m (Mathematica ) +Gerhard Heinzel AEI 17.01.2008 + +x[]: input, read-only: time series to be detrended +nn: input, read-only: length of x[] +y[]: output: time series with trend subtracted +a[]: fitting coefficients in for z^0, z^1, z^2,... with + z = 2*i/(nn-1)-1 ; i=0,...,nn-1 +*/ + + long double n = nn, n1 = 2.L / (n - 1), z; + long double a0, temp0, sum0 = 0; + long double a1, temp1, sum1 = 0; + long double a2, temp2, sum2 = 0; + long double a3, temp3, sum3 = 0; + long double a4, temp4, sum4 = 0; + long double a5, temp5, sum5 = 0; + int i; + for (i = 0; i < nn; i++) + { + z = n1 * i - 1.L; + sum0 += x[i]; + sum1 += x[i] * z; + sum2 += x[i] * z * z; + sum3 += x[i] * z * z * z; + sum4 += x[i] * z * z * z * z; + sum5 += x[i] * z * z * z * z * z; +/* the above code is efficiently optimized by GCC4 */ + + } + temp0 = + ((((0.03685503685503685503686L * n + 0) * n + + -0.5651105651105651105651L) * n + 0) * n + + 1.L) / + (((((0.01048321048321048321048L * n + 0) * n + + -0.2096642096642096642097L) * n + 0) * n + + 0.6709254709254709254709L) * n + 0); + temp2 = + ((((-0.1428571428571428571429L * n + 0.2857142857142857142857L) * n + + 0.8571428571428571428571L) * n + -2.L) * n + + 1.L) / + (((((0.008707482993197278911565L * n + 0) * n + + -0.1741496598639455782313L) * n + 0) * n + + 0.5572789115646258503401L) * n + 0); + temp4 = + ((((0.1666666666666666666667L * n + -0.6666666666666666666667L) * n + + 1.L) * n + -0.6666666666666666666667L) * n + + 0.1666666666666666666667L) / + (((((0.01128747795414462081129L * n + 0) * n + + -0.2257495590828924162257L) * n + 0) * n + + 0.7223985890652557319224L) * n + 0); + a0 = temp0 * sum0 + temp2 * sum2 + temp4 * sum4; + temp1 = + (((((((((0.0005418644471898909768732L * n + + -0.0005418644471898909768732L) * n + + -0.01950712009883607516744L) * n + + 0.01950712009883607516744L) * n + 0.2217309317901033877365L) * n + + -0.2217309317901033877365L) * n + -0.8032598565142943841169L) * n + + 0.8032598565142943841169L) * n + 1.L) * n + + -1.L) / + ((((((((((9.43655091704844150201e-6L * n + + 9.43655091704844150201e-6L) * n + + -0.0005095737495206158411085L) * n + + -0.0005095737495206158411085L) * n + + 0.009144017838619939815448L) * n + + 0.009144017838619939815448L) * n + + -0.06299841392221539546742L) * n + -0.06299841392221539546742L) * n + + 0.1358863332054975576289L) * n + 0.1358863332054975576289L) * n + 0); + temp3 = + (((((((((-0.001172332942555685814771L * n + + 0.003516998827667057444314L) * n + + 0.02579132473622508792497L) * n + + -0.08675263774912075029308L) * n + + -0.1234857366158655724893L) * n + 0.604923798358733880422L) * n + + -0.300898788589292692458L) * n + -0.7885892926924579914029L) * n + + 1.L) * n + + -0.3333333333333333333333L) / + ((((((((((5.671149533149198196929e-6L * n + + 5.671149533149198196929e-6L) * n + + -0.0003062420747900567026342L) * n + + -0.0003062420747900567026342L) * n + + 0.005495343897621573052824L) * n + + 0.005495343897621573052824L) * n + -0.0378605942833040471627L) * n + + -0.0378605942833040471627L) * n + 0.08166455327734845403578L) * n + + 0.08166455327734845403578L) * n + 0); + temp5 = + (((((((((0.005136986301369863013699L * n + + -0.02568493150684931506849L) * n + + -0.02739726027397260273973L) * n + + 0.3424657534246575342466L) * n + -0.6226027397260273972603L) * n + + 0.08561643835616438356164L) * n + 1.L) * n + + -1.315068493150684931507L) * n + 0.6969178082191780821918L) * n + + -0.1393835616438356164384L) / + ((((((((((0.0000316274288877028603056L * n + + 0.0000316274288877028603056L) * n + + -0.001707881159935954456502L) * n + + -0.001707881159935954456502L) * n + + 0.03064697859218407163613L) * n + 0.03064697859218407163613L) * n + + -0.2111447152543042954002L) * n + -0.2111447152543042954002L) * n + + 0.4554349759829211884006L) * n + 0.4554349759829211884006L) * n + 0); + a1 = temp1 * sum1 + temp3 * sum3 + temp5 * sum5; + temp0 = + ((((-0.1428571428571428571429L * n + 0.2857142857142857142857L) * n + + 0.8571428571428571428571L) * n + -2.L) * n + + 1.L) / + (((((0.008707482993197278911565L * n + 0) * n + + -0.1741496598639455782313L) * n + 0) * n + + 0.5572789115646258503401L) * n + 0); + temp2 = + (((((((0.0114942528735632183908L * n + -0.03448275862068965517241L) * n + + -0.08045977011494252873563L) * n + 0.3333333333333333333333L) * n + + -0.0114942528735632183908L) * n + -0.885057471264367816092L) * n + + 1.L) * n + + -0.3333333333333333333333L) / + ((((((((0.00008340500951338389762035L * n + + 0.00008340500951338389762035L) * n + + -0.00241874527588813303099L) * n + + -0.00241874527588813303099L) * n + 0.02035082232126567101937L) * n + + 0.02035082232126567101937L) * n + -0.04804128547970912502932L) * n + + -0.04804128547970912502932L) * n + 0); + temp4 = + (((((((-0.02608695652173913043478L * n + 0.1304347826086956521739L) * n + + -0.1478260869565217391304L) * n + -0.3043478260869565217391L) * n + + 1.L) * n + -1.104347826086956521739L) * n + + 0.565217391304347826087L) * n + + -0.1130434782608695652174L) / + ((((((((0.0001766735679779158040028L * n + + 0.0001766735679779158040028L) * n + + -0.00512353347135955831608L) * n + + -0.00512353347135955831608L) * n + 0.04310835058661145617667L) * n + + 0.04310835058661145617667L) * n + -0.1017639751552795031056L) * n + + -0.1017639751552795031056L) * n + 0); + a2 = temp0 * sum0 + temp2 * sum2 + temp4 * sum4; + temp1 = + (((((((((-0.001172332942555685814771L * n + + 0.003516998827667057444314L) * n + + 0.02579132473622508792497L) * n + + -0.08675263774912075029308L) * n + + -0.1234857366158655724893L) * n + 0.604923798358733880422L) * n + + -0.300898788589292692458L) * n + -0.7885892926924579914029L) * n + + 1.L) * n + + -0.3333333333333333333333L) / + ((((((((((5.671149533149198196929e-6L * n + + 5.671149533149198196929e-6L) * n + + -0.0003062420747900567026342L) * n + + -0.0003062420747900567026342L) * n + + 0.005495343897621573052824L) * n + + 0.005495343897621573052824L) * n + -0.0378605942833040471627L) * n + + -0.0378605942833040471627L) * n + 0.08166455327734845403578L) * n + + 0.08166455327734845403578L) * n + 0); + temp3 = + (((((((((0.001704545454545454545455L * n + + -0.008522727272727272727273L) * n + + -0.009090909090909090909091L) * n + + 0.1136363636363636363636L) * n + -0.1397727272727272727273L) * n + + -0.3056818181818181818182L) * n + 1.L) * n + + -1.104545454545454545455L) * n + 0.5653409090909090909091L) * n + + -0.1130681818181818181818L) / + ((((((((((1.924001924001924001924e-6L * n + + 1.924001924001924001924e-6L) * n + + -0.0001038961038961038961039L) * n + + -0.0001038961038961038961039L) * n + + 0.001864357864357864357864L) * n + + 0.001864357864357864357864L) * n + + -0.01284463684463684463684L) * n + -0.01284463684463684463684L) * n + + 0.02770562770562770562771L) * n + 0.02770562770562770562771L) * n + 0); + temp5 = + (((((((((-0.004201680672268907563025L * n + + 0.02941176470588235294118L) * n + + -0.05882352941176470588235L) * n + + -0.05882352941176470588235L) * n + 0.4705882352941176470588L) * n + + -0.9411764705882352941176L) * n + 1.L) * n + + -0.6134453781512605042017L) * n + 0.2058823529411764705882L) * n + + -0.02941176470588235294118L) / + ((((((((((5.543342878276851866288e-6L * n + + 5.543342878276851866288e-6L) * n + + -0.0002993405154269500007795L) * n + + -0.0002993405154269500007795L) * n + + 0.005371499249050269458433L) * n + + 0.005371499249050269458433L) * n + + -0.03700735705537626305934L) * n + -0.03700735705537626305934L) * n + + 0.07982413744718666687454L) * n + 0.07982413744718666687454L) * n + 0); + a3 = temp1 * sum1 + temp3 * sum3 + temp5 * sum5; + temp0 = + ((((0.1666666666666666666667L * n + -0.6666666666666666666667L) * n + + 1.L) * n + -0.6666666666666666666667L) * n + + 0.1666666666666666666667L) / + (((((0.01128747795414462081129L * n + 0) * n + + -0.2257495590828924162257L) * n + 0) * n + + 0.7223985890652557319224L) * n + 0); + temp2 = + (((((((-0.02608695652173913043478L * n + 0.1304347826086956521739L) * n + + -0.1478260869565217391304L) * n + -0.3043478260869565217391L) * n + + 1.L) * n + -1.104347826086956521739L) * n + + 0.565217391304347826087L) * n + + -0.1130434782608695652174L) / + ((((((((0.0001766735679779158040028L * n + + 0.0001766735679779158040028L) * n + + -0.00512353347135955831608L) * n + + -0.00512353347135955831608L) * n + 0.04310835058661145617667L) * n + + 0.04310835058661145617667L) * n + -0.1017639751552795031056L) * n + + -0.1017639751552795031056L) * n + 0); + temp4 = + (((((((0.02857142857142857142857L * n + -0.2L) * n + 0.6L) * n + + -1.L) * n + 1.L) * n + -0.6L) * n + 0.2L) * n + + -0.02857142857142857142857L) / + ((((((((0.0001658568189180434078393L * n + + 0.0001658568189180434078393L) * n + + -0.00480984774862325882734L) * n + + -0.00480984774862325882734L) * n + 0.0404690638160025915128L) * n + + 0.0404690638160025915128L) * n + -0.09553352769679300291545L) * n + + -0.09553352769679300291545L) * n + 0); + a4 = temp0 * sum0 + temp2 * sum2 + temp4 * sum4; + temp1 = + (((((((((0.005136986301369863013699L * n + + -0.02568493150684931506849L) * n + + -0.02739726027397260273973L) * n + + 0.3424657534246575342466L) * n + -0.6226027397260273972603L) * n + + 0.08561643835616438356164L) * n + 1.L) * n + + -1.315068493150684931507L) * n + 0.6969178082191780821918L) * n + + -0.1393835616438356164384L) / + ((((((((((0.0000316274288877028603056L * n + + 0.0000316274288877028603056L) * n + + -0.001707881159935954456502L) * n + + -0.001707881159935954456502L) * n + + 0.03064697859218407163613L) * n + 0.03064697859218407163613L) * n + + -0.2111447152543042954002L) * n + -0.2111447152543042954002L) * n + + 0.4554349759829211884006L) * n + 0.4554349759829211884006L) * n + 0); + temp3 = + (((((((((-0.004201680672268907563025L * n + + 0.02941176470588235294118L) * n + + -0.05882352941176470588235L) * n + + -0.05882352941176470588235L) * n + 0.4705882352941176470588L) * n + + -0.9411764705882352941176L) * n + 1.L) * n + + -0.6134453781512605042017L) * n + 0.2058823529411764705882L) * n + + -0.02941176470588235294118L) / + ((((((((((5.543342878276851866288e-6L * n + + 5.543342878276851866288e-6L) * n + + -0.0002993405154269500007795L) * n + + -0.0002993405154269500007795L) * n + + 0.005371499249050269458433L) * n + + 0.005371499249050269458433L) * n + + -0.03700735705537626305934L) * n + -0.03700735705537626305934L) * n + + 0.07982413744718666687454L) * n + 0.07982413744718666687454L) * n + 0); + temp5 = + (((((((((0.007936507936507936507937L * n + + -0.07142857142857142857143L) * n + + 0.2857142857142857142857L) * n + -0.6666666666666666666667L) * n + + 1.L) * n + -1.L) * n + 0.6666666666666666666667L) * n + + -0.2857142857142857142857L) * n + 0.07142857142857142857143L) * n + + -0.007936507936507936507937L) / + ((((((((((0.00001163417641119833107739L * n + + 0.00001163417641119833107739L) * n + + -0.0006282455262047098781793L) * n + + -0.0006282455262047098781793L) * n + + 0.01127351694245118281399L) * n + 0.01127351694245118281399L) * n + + -0.07766976172116005827268L) * n + -0.07766976172116005827268L) * n + + 0.1675321403212559675145L) * n + 0.1675321403212559675145L) * n + 0); + a5 = temp1 * sum1 + temp3 * sum3 + temp5 * sum5; + for (i = 0; i < nn; i++) + { + z = n1 * i - 1.L; + y[i] = x[i] - (((((a5 * z + a4) * z + a3) * z + a2) * z + a1) * z + a0); + } + a[0] = a0; + a[1] = a1; + a[2] = a2; + a[3] = a3; + a[4] = a4; + a[5] = a5; +} + +void +polyreg6 (double *x, int nn, double *y, double *a) +{ + +/* +polynominal detrending of a time series, order 6 +machine-generated file, do not edit! +made by polyregz.m (Mathematica ) +Gerhard Heinzel AEI 17.01.2008 + +x[]: input, read-only: time series to be detrended +nn: input, read-only: length of x[] +y[]: output: time series with trend subtracted +a[]: fitting coefficients in for z^0, z^1, z^2,... with + z = 2*i/(nn-1)-1 ; i=0,...,nn-1 +*/ + + long double n = nn, n1 = 2.L / (n - 1), z; + long double a0, temp0, sum0 = 0; + long double a1, temp1, sum1 = 0; + long double a2, temp2, sum2 = 0; + long double a3, temp3, sum3 = 0; + long double a4, temp4, sum4 = 0; + long double a5, temp5, sum5 = 0; + long double a6, temp6, sum6 = 0; + int i; + for (i = 0; i < nn; i++) + { + z = n1 * i - 1.L; + sum0 += x[i]; + sum1 += x[i] * z; + sum2 += x[i] * z * z; + sum3 += x[i] * z * z * z; + sum4 += x[i] * z * z * z * z; + sum5 += x[i] * z * z * z * z * z; + sum6 += x[i] * z * z * z * z * z * z; +/* the above code is efficiently optimized by GCC4 */ + + } + temp0 = + ((((((0.002023472278429785511938L * n + 0) * n + + -0.09510319708619991906111L) * n + 0) * n + 1.L) * n + 0) * n + + -1.572931722263976412095L) / + (((((((0.0004228644108392041559643L * n + 0) * n + + -0.023680407006995432734L) * n + 0) * n + + 0.331525698097936058276L) * n + 0) * n + + -0.9742796025735263753417L) * n + 0); + temp2 = + ((((((-0.00365675280351048269137L * n + 0.00731350560702096538274L) * n + + 0.1060458313018039980497L) * n + -0.2194051682106289614822L) * n + + -0.3902974158946855192589L) * n + 1.L) * n + + -0.5L) / + (((((((0.00008490963425838399718737L * n + 0) * n + + -0.004754939518469503842493L) * n + 0) * n + + 0.0665691532585730537949L) * n + 0) * n + + -0.1956317973313167295197L) * n + 0); + temp4 = + ((((((0.01744186046511627906977L * n + -0.06976744186046511627907L) * n + + -0.1453488372093023255814L) * n + 0.9302325581395348837209L) * n + + -1.48255813953488372093L) * n + 1.L) * n + + -0.25L) / + (((((((0.0001840905495390545224432L * n + 0) * n + + -0.01030907077418705325682L) * n + 0) * n + + 0.1443269908386187455955L) * n + 0) * n + + -0.4241446261379816197092L) * n + 0); + temp6 = + ((((((-0.05L * n + 0.3L) * n + -0.75L) * n + 1.L) * n + -0.75L) * n + + 0.3L) * n + + -0.05L) / + (((((((0.0008524808524808524808525L * n + 0) * n + + -0.04773892773892773892774L) * n + 0) * n + + 0.6683449883449883449883L) * n + 0) * n + + -1.964115884115884115884L) * n + 0); + a0 = temp0 * sum0 + temp2 * sum2 + temp4 * sum4 + temp6 * sum6; + temp1 = + (((((((((0.0005418644471898909768732L * n + + -0.0005418644471898909768732L) * n + + -0.01950712009883607516744L) * n + + 0.01950712009883607516744L) * n + 0.2217309317901033877365L) * n + + -0.2217309317901033877365L) * n + -0.8032598565142943841169L) * n + + 0.8032598565142943841169L) * n + 1.L) * n + + -1.L) / + ((((((((((9.43655091704844150201e-6L * n + + 9.43655091704844150201e-6L) * n + + -0.0005095737495206158411085L) * n + + -0.0005095737495206158411085L) * n + + 0.009144017838619939815448L) * n + + 0.009144017838619939815448L) * n + + -0.06299841392221539546742L) * n + -0.06299841392221539546742L) * n + + 0.1358863332054975576289L) * n + 0.1358863332054975576289L) * n + 0); + temp3 = + (((((((((-0.001172332942555685814771L * n + + 0.003516998827667057444314L) * n + + 0.02579132473622508792497L) * n + + -0.08675263774912075029308L) * n + + -0.1234857366158655724893L) * n + 0.604923798358733880422L) * n + + -0.300898788589292692458L) * n + -0.7885892926924579914029L) * n + + 1.L) * n + + -0.3333333333333333333333L) / + ((((((((((5.671149533149198196929e-6L * n + + 5.671149533149198196929e-6L) * n + + -0.0003062420747900567026342L) * n + + -0.0003062420747900567026342L) * n + + 0.005495343897621573052824L) * n + + 0.005495343897621573052824L) * n + -0.0378605942833040471627L) * n + + -0.0378605942833040471627L) * n + 0.08166455327734845403578L) * n + + 0.08166455327734845403578L) * n + 0); + temp5 = + (((((((((0.005136986301369863013699L * n + + -0.02568493150684931506849L) * n + + -0.02739726027397260273973L) * n + + 0.3424657534246575342466L) * n + -0.6226027397260273972603L) * n + + 0.08561643835616438356164L) * n + 1.L) * n + + -1.315068493150684931507L) * n + 0.6969178082191780821918L) * n + + -0.1393835616438356164384L) / + ((((((((((0.0000316274288877028603056L * n + + 0.0000316274288877028603056L) * n + + -0.001707881159935954456502L) * n + + -0.001707881159935954456502L) * n + + 0.03064697859218407163613L) * n + 0.03064697859218407163613L) * n + + -0.2111447152543042954002L) * n + -0.2111447152543042954002L) * n + + 0.4554349759829211884006L) * n + 0.4554349759829211884006L) * n + 0); + a1 = temp1 * sum1 + temp3 * sum3 + temp5 * sum5; + temp0 = + ((((((-0.00365675280351048269137L * n + 0.00731350560702096538274L) * n + + 0.1060458313018039980497L) * n + -0.2194051682106289614822L) * n + + -0.3902974158946855192589L) * n + 1.L) * n + + -0.5L) / + (((((((0.00008490963425838399718737L * n + 0) * n + + -0.004754939518469503842493L) * n + 0) * n + + 0.0665691532585730537949L) * n + 0) * n + + -0.1956317973313167295197L) * n + 0); + temp2 = + (((((((((((0.00003862513958696278510718L * n + + -0.0001158754187608883553215L) * n + + -0.001789631467529275709966L) * n + + 0.005677895519283529410755L) * n + + 0.02510634073152581031966L) * n + + -0.09056307728489874348129L) * n + + -0.07943331484095168910597L) * n + 0.4848828356460254874421L) * n + + -0.1823723637030884566243L) * n + -0.8280981009878594033475L) * n + + 1.L) * n + + -0.3333333333333333333333L) / + ((((((((((((5.536259194458426688747e-8L * n + + 5.536259194458426688747e-8L) * n + + -4.982633275012584019873e-6L) * n + + -4.982633275012584019873e-6L) * n + + 0.0001612712303345739694432L) * n + + 0.0001612712303345739694432L) * n + + -0.002300869321216922131843L) * n + + -0.002300869321216922131843L) * n + + 0.01410284522159561780985L) * n + 0.01410284522159561780985L) * n + + -0.02869996766407248395447L) * n + -0.02869996766407248395447L) * n + + 0); + temp4 = + (((((((((((-0.0001318610477581180009865L * n + + 0.0006593052387905900049326L) * n + + 0.003296526193952950024663L) * n + + -0.02175707288008947016278L) * n + + -0.002443824751783786951617L) * n + + 0.1936599254740893041155L) * n + -0.332315235811507074101L) * n + + -0.1450959899590254003448L) * n + 1.L) * n + + -1.191743544913337989168L) * n + 0.6198397155708362432299L) * n + + -0.123967943114167248646L) / + ((((((((((((7.216381428267480787248e-8L * n + + 7.216381428267480787248e-8L) * n + + -6.494743285440732708523e-6L) * n + + -6.494743285440732708523e-6L) * n + + 0.0002102131910054317153325L) * n + + 0.0002102131910054317153325L) * n + + -0.00299912812158796501518L) * n + + -0.00299912812158796501518L) * n + 0.0183827213951114498582L) * n + + 0.0183827213951114498582L) * n + -0.03740972132413862040109L) * n + + -0.03740972132413862040109L) * n + 0); + temp6 = + (((((((((((0.0004653327128897161470451L * n + + -0.003257328990228013029316L) * n + + -0.0004653327128897161470451L) * n + + 0.05537459283387622149837L) * n + + -0.1680781758957654723127L) * n + 0.1342019543973941368078L) * n + + 0.2879478827361563517915L) * n + -0.8571428571428571428571L) * n + + 1.L) * n + -0.632759422987436016752L) * n + + 0.214332247557003257329L) * n + + -0.03061889250814332247557L) / + ((((((((((((3.7779735978233618332e-7L * n + + 3.7779735978233618332e-7L) * n + + -0.0000340017623804102564988L) * n + + -0.0000340017623804102564988L) * n + + 0.001100523709045945302011L) * n + + 0.001100523709045945302011L) * n + + -0.01570125827255389177878L) * n + + -0.01570125827255389177878L) * n + 0.09623858824151318999421L) * n + + 0.09623858824151318999421L) * n + -0.1958501513111630774331L) * n + + -0.1958501513111630774331L) * n + 0); + a2 = temp0 * sum0 + temp2 * sum2 + temp4 * sum4 + temp6 * sum6; + temp1 = + (((((((((-0.001172332942555685814771L * n + + 0.003516998827667057444314L) * n + + 0.02579132473622508792497L) * n + + -0.08675263774912075029308L) * n + + -0.1234857366158655724893L) * n + 0.604923798358733880422L) * n + + -0.300898788589292692458L) * n + -0.7885892926924579914029L) * n + + 1.L) * n + + -0.3333333333333333333333L) / + ((((((((((5.671149533149198196929e-6L * n + + 5.671149533149198196929e-6L) * n + + -0.0003062420747900567026342L) * n + + -0.0003062420747900567026342L) * n + + 0.005495343897621573052824L) * n + + 0.005495343897621573052824L) * n + -0.0378605942833040471627L) * n + + -0.0378605942833040471627L) * n + 0.08166455327734845403578L) * n + + 0.08166455327734845403578L) * n + 0); + temp3 = + (((((((((0.001704545454545454545455L * n + + -0.008522727272727272727273L) * n + + -0.009090909090909090909091L) * n + + 0.1136363636363636363636L) * n + -0.1397727272727272727273L) * n + + -0.3056818181818181818182L) * n + 1.L) * n + + -1.104545454545454545455L) * n + 0.5653409090909090909091L) * n + + -0.1130681818181818181818L) / + ((((((((((1.924001924001924001924e-6L * n + + 1.924001924001924001924e-6L) * n + + -0.0001038961038961038961039L) * n + + -0.0001038961038961038961039L) * n + + 0.001864357864357864357864L) * n + + 0.001864357864357864357864L) * n + + -0.01284463684463684463684L) * n + -0.01284463684463684463684L) * n + + 0.02770562770562770562771L) * n + 0.02770562770562770562771L) * n + 0); + temp5 = + (((((((((-0.004201680672268907563025L * n + + 0.02941176470588235294118L) * n + + -0.05882352941176470588235L) * n + + -0.05882352941176470588235L) * n + 0.4705882352941176470588L) * n + + -0.9411764705882352941176L) * n + 1.L) * n + + -0.6134453781512605042017L) * n + 0.2058823529411764705882L) * n + + -0.02941176470588235294118L) / + ((((((((((5.543342878276851866288e-6L * n + + 5.543342878276851866288e-6L) * n + + -0.0002993405154269500007795L) * n + + -0.0002993405154269500007795L) * n + + 0.005371499249050269458433L) * n + + 0.005371499249050269458433L) * n + + -0.03700735705537626305934L) * n + -0.03700735705537626305934L) * n + + 0.07982413744718666687454L) * n + 0.07982413744718666687454L) * n + 0); + a3 = temp1 * sum1 + temp3 * sum3 + temp5 * sum5; + temp0 = + ((((((0.01744186046511627906977L * n + -0.06976744186046511627907L) * n + + -0.1453488372093023255814L) * n + 0.9302325581395348837209L) * n + + -1.48255813953488372093L) * n + 1.L) * n + + -0.25L) / + (((((((0.0001840905495390545224432L * n + 0) * n + + -0.01030907077418705325682L) * n + 0) * n + + 0.1443269908386187455955L) * n + 0) * n + + -0.4241446261379816197092L) * n + 0); + temp2 = + (((((((((((-0.0001318610477581180009865L * n + + 0.0006593052387905900049326L) * n + + 0.003296526193952950024663L) * n + + -0.02175707288008947016278L) * n + + -0.002443824751783786951617L) * n + + 0.1936599254740893041155L) * n + -0.332315235811507074101L) * n + + -0.1450959899590254003448L) * n + 1.L) * n + + -1.191743544913337989168L) * n + 0.6198397155708362432299L) * n + + -0.123967943114167248646L) / + ((((((((((((7.216381428267480787248e-8L * n + + 7.216381428267480787248e-8L) * n + + -6.494743285440732708523e-6L) * n + + -6.494743285440732708523e-6L) * n + + 0.0002102131910054317153325L) * n + + 0.0002102131910054317153325L) * n + + -0.00299912812158796501518L) * n + + -0.00299912812158796501518L) * n + 0.0183827213951114498582L) * n + + 0.0183827213951114498582L) * n + -0.03740972132413862040109L) * n + + -0.03740972132413862040109L) * n + 0); + temp4 = + (((((((((((0.000222172850477671628527L * n + + -0.001555209953343701399689L) * n + + -0.000222172850477671628527L) * n + + 0.02643856920684292379471L) * n + + -0.06531881804043545878694L) * n + + -0.04043545878693623639191L) * n + 0.4510108864696734059098L) * n + + -0.9317929349033548100422L) * n + 1.L) * n + + -0.6156409686736280826483L) * n + 0.2068429237947122861586L) * n + + -0.02954898911353032659409L) / + ((((((((((((4.263507034896942478807e-8L * n + + 4.263507034896942478807e-8L) * n + + -3.837156331407248230927e-6L) * n + + -3.837156331407248230927e-6L) * n + + 0.0001241959599265479344077L) * n + + 0.0001241959599265479344077L) * n + + -0.001771913523703169294192L) * n + + -0.001771913523703169294192L) * n + + 0.01086068728041507539281L) * n + 0.01086068728041507539281L) * n + + -0.02210202046890574981014L) * n + -0.02210202046890574981014L) * n + + 0); + temp6 = + (((((((((((-0.0008210180623973727422003L * n + + 0.007389162561576354679803L) * n + + -0.02107279693486590038314L) * n + + -0.007389162561576354679803L) * n + + 0.2019704433497536945813L) * n + -0.6091954022988505747126L) * n + + 1.L) * n + -1.039408866995073891626L) * n + + 0.7052545155993431855501L) * n + -0.3045977011494252873563L) * n + + 0.07635467980295566502463L) * n + + -0.00848385331143951833607L) / + ((((((((((((2.221911675348222380829e-7L * n + + 2.221911675348222380829e-7L) * n + + -0.00001999720507813400142746L) * n + + -0.00001999720507813400142746L) * n + + 0.0006472428710289371795353L) * n + + 0.0006472428710289371795353L) * n + + -0.009234264922747212214723L) * n + + -0.009234264922747212214723L) * n + + 0.05660008925315047764027L) * n + 0.05660008925315047764027L) * n + + -0.1151839012500518482222L) * n + -0.1151839012500518482222L) * n + 0); + a4 = temp0 * sum0 + temp2 * sum2 + temp4 * sum4 + temp6 * sum6; + temp1 = + (((((((((0.005136986301369863013699L * n + + -0.02568493150684931506849L) * n + + -0.02739726027397260273973L) * n + + 0.3424657534246575342466L) * n + -0.6226027397260273972603L) * n + + 0.08561643835616438356164L) * n + 1.L) * n + + -1.315068493150684931507L) * n + 0.6969178082191780821918L) * n + + -0.1393835616438356164384L) / + ((((((((((0.0000316274288877028603056L * n + + 0.0000316274288877028603056L) * n + + -0.001707881159935954456502L) * n + + -0.001707881159935954456502L) * n + + 0.03064697859218407163613L) * n + 0.03064697859218407163613L) * n + + -0.2111447152543042954002L) * n + -0.2111447152543042954002L) * n + + 0.4554349759829211884006L) * n + 0.4554349759829211884006L) * n + 0); + temp3 = + (((((((((-0.004201680672268907563025L * n + + 0.02941176470588235294118L) * n + + -0.05882352941176470588235L) * n + + -0.05882352941176470588235L) * n + 0.4705882352941176470588L) * n + + -0.9411764705882352941176L) * n + 1.L) * n + + -0.6134453781512605042017L) * n + 0.2058823529411764705882L) * n + + -0.02941176470588235294118L) / + ((((((((((5.543342878276851866288e-6L * n + + 5.543342878276851866288e-6L) * n + + -0.0002993405154269500007795L) * n + + -0.0002993405154269500007795L) * n + + 0.005371499249050269458433L) * n + + 0.005371499249050269458433L) * n + + -0.03700735705537626305934L) * n + -0.03700735705537626305934L) * n + + 0.07982413744718666687454L) * n + 0.07982413744718666687454L) * n + 0); + temp5 = + (((((((((0.007936507936507936507937L * n + + -0.07142857142857142857143L) * n + + 0.2857142857142857142857L) * n + -0.6666666666666666666667L) * n + + 1.L) * n + -1.L) * n + 0.6666666666666666666667L) * n + + -0.2857142857142857142857L) * n + 0.07142857142857142857143L) * n + + -0.007936507936507936507937L) / + ((((((((((0.00001163417641119833107739L * n + + 0.00001163417641119833107739L) * n + + -0.0006282455262047098781793L) * n + + -0.0006282455262047098781793L) * n + + 0.01127351694245118281399L) * n + 0.01127351694245118281399L) * n + + -0.07766976172116005827268L) * n + -0.07766976172116005827268L) * n + + 0.1675321403212559675145L) * n + 0.1675321403212559675145L) * n + 0); + a5 = temp1 * sum1 + temp3 * sum3 + temp5 * sum5; + temp0 = + ((((((-0.05L * n + 0.3L) * n + -0.75L) * n + 1.L) * n + -0.75L) * n + + 0.3L) * n + + -0.05L) / + (((((((0.0008524808524808524808525L * n + 0) * n + + -0.04773892773892773892774L) * n + 0) * n + + 0.6683449883449883449883L) * n + 0) * n + + -1.964115884115884115884L) * n + 0); + temp2 = + (((((((((((0.0004653327128897161470451L * n + + -0.003257328990228013029316L) * n + + -0.0004653327128897161470451L) * n + + 0.05537459283387622149837L) * n + + -0.1680781758957654723127L) * n + 0.1342019543973941368078L) * n + + 0.2879478827361563517915L) * n + -0.8571428571428571428571L) * n + + 1.L) * n + -0.632759422987436016752L) * n + + 0.214332247557003257329L) * n + + -0.03061889250814332247557L) / + ((((((((((((3.7779735978233618332e-7L * n + + 3.7779735978233618332e-7L) * n + + -0.0000340017623804102564988L) * n + + -0.0000340017623804102564988L) * n + + 0.001100523709045945302011L) * n + + 0.001100523709045945302011L) * n + + -0.01570125827255389177878L) * n + + -0.01570125827255389177878L) * n + 0.09623858824151318999421L) * n + + 0.09623858824151318999421L) * n + -0.1958501513111630774331L) * n + + -0.1958501513111630774331L) * n + 0); + temp4 = + (((((((((((-0.0008210180623973727422003L * n + + 0.007389162561576354679803L) * n + + -0.02107279693486590038314L) * n + + -0.007389162561576354679803L) * n + + 0.2019704433497536945813L) * n + -0.6091954022988505747126L) * n + + 1.L) * n + -1.039408866995073891626L) * n + + 0.7052545155993431855501L) * n + -0.3045977011494252873563L) * n + + 0.07635467980295566502463L) * n + + -0.00848385331143951833607L) / + ((((((((((((2.221911675348222380829e-7L * n + + 2.221911675348222380829e-7L) * n + + -0.00001999720507813400142746L) * n + + -0.00001999720507813400142746L) * n + + 0.0006472428710289371795353L) * n + + 0.0006472428710289371795353L) * n + + -0.009234264922747212214723L) * n + + -0.009234264922747212214723L) * n + + 0.05660008925315047764027L) * n + 0.05660008925315047764027L) * n + + -0.1151839012500518482222L) * n + -0.1151839012500518482222L) * n + 0); + temp6 = + (((((((((((0.002164502164502164502165L * n + + -0.02380952380952380952381L) * n + + 0.119047619047619047619L) * n + + -0.3571428571428571428571L) * n + + 0.7142857142857142857143L) * n + -1.L) * n + 1.L) * n + + -0.7142857142857142857143L) * n + 0.3571428571428571428571L) * n + + -0.119047619047619047619L) * n + 0.02380952380952380952381L) * n + + -0.002164502164502164502165L) / + ((((((((((((7.987864287408898641822e-7L * n + + 7.987864287408898641822e-7L) * n + + -0.00007189077858668008777639L) * n + + -0.00007189077858668008777639L) * n + + 0.002326864866922212174363L) * n + + 0.002326864866922212174363L) * n + + -0.03319756397847138275541L) * n + + -0.03319756397847138275541L) * n + 0.2034796597117393204423L) * n + + 0.2034796597117393204423L) * n + -0.414090884659277305592L) * n + + -0.414090884659277305592L) * n + 0); + a6 = temp0 * sum0 + temp2 * sum2 + temp4 * sum4 + temp6 * sum6; + for (i = 0; i < nn; i++) + { + z = n1 * i - 1.L; + y[i] = + x[i] - + ((((((a6 * z + a5) * z + a4) * z + a3) * z + a2) * z + a1) * z + a0); + } + a[0] = a0; + a[1] = a1; + a[2] = a2; + a[3] = a3; + a[4] = a4; + a[5] = a5; + a[6] = a6; +} + +void +polyreg7 (double *x, int nn, double *y, double *a) +{ + +/* +polynominal detrending of a time series, order 7 +machine-generated file, do not edit! +made by polyregz.m (Mathematica ) +Gerhard Heinzel AEI 17.01.2008 + +x[]: input, read-only: time series to be detrended +nn: input, read-only: length of x[] +y[]: output: time series with trend subtracted +a[]: fitting coefficients in for z^0, z^1, z^2,... with + z = 2*i/(nn-1)-1 ; i=0,...,nn-1 +*/ + + long double n = nn, n1 = 2.L / (n - 1), z; + long double a0, temp0, sum0 = 0; + long double a1, temp1, sum1 = 0; + long double a2, temp2, sum2 = 0; + long double a3, temp3, sum3 = 0; + long double a4, temp4, sum4 = 0; + long double a5, temp5, sum5 = 0; + long double a6, temp6, sum6 = 0; + long double a7, temp7, sum7 = 0; + int i; + for (i = 0; i < nn; i++) + { + z = n1 * i - 1.L; + sum0 += x[i]; + sum1 += x[i] * z; + sum2 += x[i] * z * z; + sum3 += x[i] * z * z * z; + sum4 += x[i] * z * z * z * z; + sum5 += x[i] * z * z * z * z * z; + sum6 += x[i] * z * z * z * z * z * z; + sum7 += x[i] * z * z * z * z * z * z * z; +/* the above code is efficiently optimized by GCC4 */ + + } + temp0 = + ((((((0.002023472278429785511938L * n + 0) * n + + -0.09510319708619991906111L) * n + 0) * n + 1.L) * n + 0) * n + + -1.572931722263976412095L) / + (((((((0.0004228644108392041559643L * n + 0) * n + + -0.023680407006995432734L) * n + 0) * n + + 0.331525698097936058276L) * n + 0) * n + + -0.9742796025735263753417L) * n + 0); + temp2 = + ((((((-0.00365675280351048269137L * n + 0.00731350560702096538274L) * n + + 0.1060458313018039980497L) * n + -0.2194051682106289614822L) * n + + -0.3902974158946855192589L) * n + 1.L) * n + + -0.5L) / + (((((((0.00008490963425838399718737L * n + 0) * n + + -0.004754939518469503842493L) * n + 0) * n + + 0.0665691532585730537949L) * n + 0) * n + + -0.1956317973313167295197L) * n + 0); + temp4 = + ((((((0.01744186046511627906977L * n + -0.06976744186046511627907L) * n + + -0.1453488372093023255814L) * n + 0.9302325581395348837209L) * n + + -1.48255813953488372093L) * n + 1.L) * n + + -0.25L) / + (((((((0.0001840905495390545224432L * n + 0) * n + + -0.01030907077418705325682L) * n + 0) * n + + 0.1443269908386187455955L) * n + 0) * n + + -0.4241446261379816197092L) * n + 0); + temp6 = + ((((((-0.05L * n + 0.3L) * n + -0.75L) * n + 1.L) * n + -0.75L) * n + + 0.3L) * n + + -0.05L) / + (((((((0.0008524808524808524808525L * n + 0) * n + + -0.04773892773892773892774L) * n + 0) * n + + 0.6683449883449883449883L) * n + 0) * n + + -1.964115884115884115884L) * n + 0); + a0 = temp0 * sum0 + temp2 * sum2 + temp4 * sum4 + temp6 * sum6; + temp1 = + (((((((((((((5.609917572601837047788e-7L * n + + -5.609917572601837047788e-7L) * n + + -0.00005946512626957947270656L) * n + + 0.00005946512626957947270656L) * n + + 0.002301300386632725593744L) * n + + -0.002301300386632725593744L) * n + + -0.03983795876891353236683L) * n + + 0.03983795876891353236683L) * n + 0.3107415910765268958665L) * n + + -0.3107415910765268958665L) * n + -0.9305548012124555634861L) * n + + 0.9305548012124555634861L) * n + 1.L) * n + + -1.L) / + ((((((((((((((4.342067720592805092166e-9L * n + + 4.342067720592805092166e-9L) * n + + -6.03547413162399907811e-7L) * n + + -6.03547413162399907811e-7L) * n + + 0.00003179696191790111168993L) * n + + 0.00003179696191790111168993L) * n + + -0.0008002300547020922000708L) * n + + -0.0008002300547020922000708L) * n + + 0.009948441351796940799848L) * n + + 0.009948441351796940799848L) * n + + -0.05644889508712882125972L) * n + -0.05644889508712882125972L) * n + + 0.1102954674114101978292L) * n + 0.1102954674114101978292L) * n + 0); + temp3 = + (((((((((((((-1.649242420494146014028e-6L * n + + 4.947727261482438042085e-6L) * n + + 0.0001352378784805199731503L) * n + + -0.0004189075748055130875632L) * n + + -0.003756424486412166571285L) * n + + 0.0123907583051725190034L) * n + 0.0388677746591388959767L) * n + + -0.150019174406522078369L) * n + -0.09621672427627512159432L) * n + + 0.6998399213892527039133L) * n + -0.4179053066259727879713L) * n + + -0.7495871200135646262318L) * n + 1.L) * n + + -0.3333333333333333333333L) / + ((((((((((((((1.934107788297951760651e-9L * n + + 1.934107788297951760651e-9L) * n + + -2.688409825734152947305e-7L) * n + + -2.688409825734152947305e-7L) * n + + 0.00001416347133370590074325L) * n + + 0.00001416347133370590074325L) * n + + -0.0003564502630599476156327L) * n + + -0.0003564502630599476156327L) * n + + 0.004431381345961347923161L) * n + + 0.004431381345961347923161L) * n + + -0.02514429867388714313808L) * n + -0.02514429867388714313808L) * n + + 0.04912943239522925144335L) * n + 0.04912943239522925144335L) * n + 0); + temp5 = + (((((((((((((0.00001012603538711833284953L * n + + -0.00005063017693559166424767L) * n + + -0.0005603072914205477510075L) * n + + 0.003206577872587472069019L) * n + + 0.007261717510615460430829L) * n + + -0.06252826851545570534587L) * n + + 0.03303787812303808064375L) * n + 0.3720035373616952333376L) * n + + -0.7991244354735271681529L) * n + 0.2505876475869657672497L) * n + + 1.L) * n + -1.407687686065900238299L) * n + + 0.7548048037911876489371L) * n + + -0.1509609607582375297874L) / + ((((((((((((((6.394260206712529962582e-9L * n + + 6.394260206712529962582e-9L) * n + + -8.888021687330416647989e-7L) * n + + -8.888021687330416647989e-7L) * n + + 0.00004682516749375585691599L) * n + + 0.00004682516749375585691599L) * n + + -0.001178442973316499134514L) * n + + -0.001178442973316499134514L) * n + + 0.01465037552337478754955L) * n + 0.01465037552337478754955L) * n + + -0.08312834962399880412747L) * n + -0.08312834962399880412747L) * n + + 0.1624244400668290010975L) * n + 0.1624244400668290010975L) * n + 0); + temp7 = + (((((((((((((-0.00003463502914186507936508L * n + + 0.0002424452039930555555556L) * n + + 0.0009005107576884920634921L) * n + + -0.01018269856770833333333L) * n + + 0.01585591634114583333333L) * n + + 0.06356913248697916666667L) * n + + -0.2757937891953656462585L) * n + 0.3764689127604166666667L) * n + + -0.02229803176153273809524L) * n + -0.5844938247922867063492L) * n + + 0.8224988180493551587302L) * n + -0.5482725113157242063492L) * n + + 0.1884630475725446428571L) * n + + -0.02692329251036352040816L) / + ((((((((((((((3.936759889140841521794e-8L * n + + 3.936759889140841521794e-8L) * n + + -5.472096245905769715294e-6L) * n + + -5.472096245905769715294e-6L) * n + + 0.000288288926681783824641L) * n + + 0.000288288926681783824641L) * n + + -0.007255330372889896699421L) * n + + -0.007255330372889896699421L) * n + + 0.09019809775762156714538L) * n + 0.09019809775762156714538L) * n + + -0.5117970521541950113379L) * n + -0.5117970521541950113379L) * n + + 1.L) * n + 1.L) * n + 0); + a1 = temp1 * sum1 + temp3 * sum3 + temp5 * sum5 + temp7 * sum7; + temp0 = + ((((((-0.00365675280351048269137L * n + 0.00731350560702096538274L) * n + + 0.1060458313018039980497L) * n + -0.2194051682106289614822L) * n + + -0.3902974158946855192589L) * n + 1.L) * n + + -0.5L) / + (((((((0.00008490963425838399718737L * n + 0) * n + + -0.004754939518469503842493L) * n + 0) * n + + 0.0665691532585730537949L) * n + 0) * n + + -0.1956317973313167295197L) * n + 0); + temp2 = + (((((((((((0.00003862513958696278510718L * n + + -0.0001158754187608883553215L) * n + + -0.001789631467529275709966L) * n + + 0.005677895519283529410755L) * n + + 0.02510634073152581031966L) * n + + -0.09056307728489874348129L) * n + + -0.07943331484095168910597L) * n + 0.4848828356460254874421L) * n + + -0.1823723637030884566243L) * n + -0.8280981009878594033475L) * n + + 1.L) * n + + -0.3333333333333333333333L) / + ((((((((((((5.536259194458426688747e-8L * n + + 5.536259194458426688747e-8L) * n + + -4.982633275012584019873e-6L) * n + + -4.982633275012584019873e-6L) * n + + 0.0001612712303345739694432L) * n + + 0.0001612712303345739694432L) * n + + -0.002300869321216922131843L) * n + + -0.002300869321216922131843L) * n + + 0.01410284522159561780985L) * n + 0.01410284522159561780985L) * n + + -0.02869996766407248395447L) * n + -0.02869996766407248395447L) * n + + 0); + temp4 = + (((((((((((-0.0001318610477581180009865L * n + + 0.0006593052387905900049326L) * n + + 0.003296526193952950024663L) * n + + -0.02175707288008947016278L) * n + + -0.002443824751783786951617L) * n + + 0.1936599254740893041155L) * n + -0.332315235811507074101L) * n + + -0.1450959899590254003448L) * n + 1.L) * n + + -1.191743544913337989168L) * n + 0.6198397155708362432299L) * n + + -0.123967943114167248646L) / + ((((((((((((7.216381428267480787248e-8L * n + + 7.216381428267480787248e-8L) * n + + -6.494743285440732708523e-6L) * n + + -6.494743285440732708523e-6L) * n + + 0.0002102131910054317153325L) * n + + 0.0002102131910054317153325L) * n + + -0.00299912812158796501518L) * n + + -0.00299912812158796501518L) * n + 0.0183827213951114498582L) * n + + 0.0183827213951114498582L) * n + -0.03740972132413862040109L) * n + + -0.03740972132413862040109L) * n + 0); + temp6 = + (((((((((((0.0004653327128897161470451L * n + + -0.003257328990228013029316L) * n + + -0.0004653327128897161470451L) * n + + 0.05537459283387622149837L) * n + + -0.1680781758957654723127L) * n + 0.1342019543973941368078L) * n + + 0.2879478827361563517915L) * n + -0.8571428571428571428571L) * n + + 1.L) * n + -0.632759422987436016752L) * n + + 0.214332247557003257329L) * n + + -0.03061889250814332247557L) / + ((((((((((((3.7779735978233618332e-7L * n + + 3.7779735978233618332e-7L) * n + + -0.0000340017623804102564988L) * n + + -0.0000340017623804102564988L) * n + + 0.001100523709045945302011L) * n + + 0.001100523709045945302011L) * n + + -0.01570125827255389177878L) * n + + -0.01570125827255389177878L) * n + 0.09623858824151318999421L) * n + + 0.09623858824151318999421L) * n + -0.1958501513111630774331L) * n + + -0.1958501513111630774331L) * n + 0); + a2 = temp0 * sum0 + temp2 * sum2 + temp4 * sum4 + temp6 * sum6; + temp1 = + (((((((((((((-1.649242420494146014028e-6L * n + + 4.947727261482438042085e-6L) * n + + 0.0001352378784805199731503L) * n + + -0.0004189075748055130875632L) * n + + -0.003756424486412166571285L) * n + + 0.0123907583051725190034L) * n + 0.0388677746591388959767L) * n + + -0.150019174406522078369L) * n + -0.09621672427627512159432L) * n + + 0.6998399213892527039133L) * n + -0.4179053066259727879713L) * n + + -0.7495871200135646262318L) * n + 1.L) * n + + -0.3333333333333333333333L) / + ((((((((((((((1.934107788297951760651e-9L * n + + 1.934107788297951760651e-9L) * n + + -2.688409825734152947305e-7L) * n + + -2.688409825734152947305e-7L) * n + + 0.00001416347133370590074325L) * n + + 0.00001416347133370590074325L) * n + + -0.0003564502630599476156327L) * n + + -0.0003564502630599476156327L) * n + + 0.004431381345961347923161L) * n + + 0.004431381345961347923161L) * n + + -0.02514429867388714313808L) * n + -0.02514429867388714313808L) * n + + 0.04912943239522925144335L) * n + 0.04912943239522925144335L) * n + 0); + temp3 = + (((((((((((((3.849737062958599927625e-6L * n + + -0.00001924868531479299963812L) * n + + -0.0002130187841503758626619L) * n + + 0.001219083403270223310415L) * n + + 0.0030194771030471952099L) * n + + -0.02506563801692344412877L) * n + + 0.00985019389842340434815L) * n + 0.1653282414144447267585L) * n + + -0.2908612375108113449185L) * n + -0.1751694525930545610401L) * n + + 1.L) * n + -1.176184499931987978554L) * n + + 0.6101153124574924865965L) * n + + -0.1220230624914984973193L) / + ((((((((((((((5.745959963953541658851e-10L * n + + 5.745959963953541658851e-10L) * n + + -7.986884349895422905803e-8L) * n + + -7.986884349895422905803e-8L) * n + + 4.207766481603178556777e-6L) * n + + 4.207766481603178556777e-6L) * n + + -0.0001058963183476745867101L) * n + + -0.0001058963183476745867101L) * n + + 0.001316500556637121976376L) * n + + 0.001316500556637121976376L) * n + + -0.007470014565681931600839L) * n + + -0.007470014565681931600839L) * n + 0.01459565766203622838015L) * n + + 0.01459565766203622838015L) * n + 0); + temp5 = + (((((((((((((-0.00001186718249353238554102L * n + + 0.00008307027745472669878717L) * n + + 0.0003085467448318420240666L) * n + + -0.003488951653098521349061L) * n + + 0.003382147010656729879192L) * n + + 0.03613557069280611397242L) * n + + -0.1166306695464362850972L) * n + + 0.05425675836043006669357L) * n + 0.3601096527662402392424L) * n + + -0.8897420074525906059383L) * n + 1.L) * n + + -0.6253293143141955236988L) * n + 0.2110815750124605416182L) * n + + -0.03015451071606579165974L) / + ((((((((((((((8.758914154660031738831e-10L * n + + 8.758914154660031738831e-10L) * n + + -1.217489067497744411697e-7L) * n + + -1.217489067497744411697e-7L) * n + + 6.414152835457541242346e-6L) * n + + 6.414152835457541242346e-6L) * n + + -0.0001614241601961379869371L) * n + + -0.0001614241601961379869371L) * n + + 0.002006821389721735287925L) * n + + 0.002006821389721735287925L) * n + + -0.01138699481467481748595L) * n + -0.01138699481467481748595L) * n + + 0.02224904337910122622171L) * n + 0.02224904337910122622171L) * n + 0); + temp7 = + (((((((((((((0.00006794678407870955467678L * n + + -0.000611521056708385992091L) * n + + 0.0004076807044722573280607L) * n + + 0.01263810183863997716988L) * n + + -0.05553064173472669538551L) * n + + 0.07904928859717069591096L) * n + + 0.0833299359941293978556L) * n + -0.5260168236237378884857L) * n + + 1.L) * n + -1.097299794800712082297L) * n + + 0.7620639515131748814329L) * n + -0.3324228464266786253007L) * n + + 0.08361531248725997798524L) * n + + -0.009290590276362219776138L) / + ((((((((((((((8.581234431814923840236e-9L * n + + 8.581234431814923840236e-9L) * n + + -1.192791586022274413793e-6L) * n + + -1.192791586022274413793e-6L) * n + + 0.00006284037974418068728205L) * n + + 0.00006284037974418068728205L) * n + + -0.001581495762080195018984L) * n + + -0.001581495762080195018984L) * n + + 0.01966111838054798994458L) * n + 0.01966111838054798994458L) * n + + -0.1115600293063703720477L) * n + -0.1115600293063703720477L) * n + + 0.2179770845431899694201L) * n + 0.2179770845431899694201L) * n + 0); + a3 = temp1 * sum1 + temp3 * sum3 + temp5 * sum5 + temp7 * sum7; + temp0 = + ((((((0.01744186046511627906977L * n + -0.06976744186046511627907L) * n + + -0.1453488372093023255814L) * n + 0.9302325581395348837209L) * n + + -1.48255813953488372093L) * n + 1.L) * n + + -0.25L) / + (((((((0.0001840905495390545224432L * n + 0) * n + + -0.01030907077418705325682L) * n + 0) * n + + 0.1443269908386187455955L) * n + 0) * n + + -0.4241446261379816197092L) * n + 0); + temp2 = + (((((((((((-0.0001318610477581180009865L * n + + 0.0006593052387905900049326L) * n + + 0.003296526193952950024663L) * n + + -0.02175707288008947016278L) * n + + -0.002443824751783786951617L) * n + + 0.1936599254740893041155L) * n + -0.332315235811507074101L) * n + + -0.1450959899590254003448L) * n + 1.L) * n + + -1.191743544913337989168L) * n + 0.6198397155708362432299L) * n + + -0.123967943114167248646L) / + ((((((((((((7.216381428267480787248e-8L * n + + 7.216381428267480787248e-8L) * n + + -6.494743285440732708523e-6L) * n + + -6.494743285440732708523e-6L) * n + + 0.0002102131910054317153325L) * n + + 0.0002102131910054317153325L) * n + + -0.00299912812158796501518L) * n + + -0.00299912812158796501518L) * n + 0.0183827213951114498582L) * n + + 0.0183827213951114498582L) * n + -0.03740972132413862040109L) * n + + -0.03740972132413862040109L) * n + 0); + temp4 = + (((((((((((0.000222172850477671628527L * n + + -0.001555209953343701399689L) * n + + -0.000222172850477671628527L) * n + + 0.02643856920684292379471L) * n + + -0.06531881804043545878694L) * n + + -0.04043545878693623639191L) * n + 0.4510108864696734059098L) * n + + -0.9317929349033548100422L) * n + 1.L) * n + + -0.6156409686736280826483L) * n + 0.2068429237947122861586L) * n + + -0.02954898911353032659409L) / + ((((((((((((4.263507034896942478807e-8L * n + + 4.263507034896942478807e-8L) * n + + -3.837156331407248230927e-6L) * n + + -3.837156331407248230927e-6L) * n + + 0.0001241959599265479344077L) * n + + 0.0001241959599265479344077L) * n + + -0.001771913523703169294192L) * n + + -0.001771913523703169294192L) * n + + 0.01086068728041507539281L) * n + 0.01086068728041507539281L) * n + + -0.02210202046890574981014L) * n + -0.02210202046890574981014L) * n + + 0); + temp6 = + (((((((((((-0.0008210180623973727422003L * n + + 0.007389162561576354679803L) * n + + -0.02107279693486590038314L) * n + + -0.007389162561576354679803L) * n + + 0.2019704433497536945813L) * n + -0.6091954022988505747126L) * n + + 1.L) * n + -1.039408866995073891626L) * n + + 0.7052545155993431855501L) * n + -0.3045977011494252873563L) * n + + 0.07635467980295566502463L) * n + + -0.00848385331143951833607L) / + ((((((((((((2.221911675348222380829e-7L * n + + 2.221911675348222380829e-7L) * n + + -0.00001999720507813400142746L) * n + + -0.00001999720507813400142746L) * n + + 0.0006472428710289371795353L) * n + + 0.0006472428710289371795353L) * n + + -0.009234264922747212214723L) * n + + -0.009234264922747212214723L) * n + + 0.05660008925315047764027L) * n + 0.05660008925315047764027L) * n + + -0.1151839012500518482222L) * n + -0.1151839012500518482222L) * n + 0); + a4 = temp0 * sum0 + temp2 * sum2 + temp4 * sum4 + temp6 * sum6; + temp1 = + (((((((((((((0.00001012603538711833284953L * n + + -0.00005063017693559166424767L) * n + + -0.0005603072914205477510075L) * n + + 0.003206577872587472069019L) * n + + 0.007261717510615460430829L) * n + + -0.06252826851545570534587L) * n + + 0.03303787812303808064375L) * n + 0.3720035373616952333376L) * n + + -0.7991244354735271681529L) * n + 0.2505876475869657672497L) * n + + 1.L) * n + -1.407687686065900238299L) * n + + 0.7548048037911876489371L) * n + + -0.1509609607582375297874L) / + ((((((((((((((6.394260206712529962582e-9L * n + + 6.394260206712529962582e-9L) * n + + -8.888021687330416647989e-7L) * n + + -8.888021687330416647989e-7L) * n + + 0.00004682516749375585691599L) * n + + 0.00004682516749375585691599L) * n + + -0.001178442973316499134514L) * n + + -0.001178442973316499134514L) * n + + 0.01465037552337478754955L) * n + 0.01465037552337478754955L) * n + + -0.08312834962399880412747L) * n + -0.08312834962399880412747L) * n + + 0.1624244400668290010975L) * n + 0.1624244400668290010975L) * n + 0); + temp3 = + (((((((((((((-0.00001186718249353238554102L * n + + 0.00008307027745472669878717L) * n + + 0.0003085467448318420240666L) * n + + -0.003488951653098521349061L) * n + + 0.003382147010656729879192L) * n + + 0.03613557069280611397242L) * n + + -0.1166306695464362850972L) * n + + 0.05425675836043006669357L) * n + 0.3601096527662402392424L) * n + + -0.8897420074525906059383L) * n + 1.L) * n + + -0.6253293143141955236988L) * n + 0.2110815750124605416182L) * n + + -0.03015451071606579165974L) / + ((((((((((((((8.758914154660031738831e-10L * n + + 8.758914154660031738831e-10L) * n + + -1.217489067497744411697e-7L) * n + + -1.217489067497744411697e-7L) * n + + 6.414152835457541242346e-6L) * n + + 6.414152835457541242346e-6L) * n + + -0.0001614241601961379869371L) * n + + -0.0001614241601961379869371L) * n + + 0.002006821389721735287925L) * n + + 0.002006821389721735287925L) * n + + -0.01138699481467481748595L) * n + -0.01138699481467481748595L) * n + + 0.02224904337910122622171L) * n + 0.02224904337910122622171L) * n + 0); + temp5 = + (((((((((((((0.00003568497305784534132677L * n + + -0.0003211647575206080719409L) * n + + 0.0002141098383470720479606L) * n + + 0.006637404988759233486779L) * n + + -0.02539580582616660124422L) * n + + 0.007600899261321057702601L) * n + + 0.179424044534846376191L) * n + -0.5927987724369268101203L) * n + + 1.L) * n + -1.05110088141883452878L) * n + + 0.7167683688398815258894L) * n + -0.3102451557649073974949L) * n + + 0.07782892623916068943368L) * n + + -0.00864765847101785438152L) / + ((((((((((((((1.238126017627523389601e-9L * n + + 1.238126017627523389601e-9L) * n + + -1.720995164502257511545e-7L) * n + + -1.720995164502257511545e-7L) * n + + 9.066796827086353782047e-6L) * n + + 9.066796827086353782047e-6L) * n + + -0.0002281829106706996781333L) * n + + -0.0002281829106706996781333L) * n + + 0.002836764616563758529692L) * n + + 0.002836764616563758529692L) * n + + -0.01609621271962998323566L) * n + -0.01609621271962998323566L) * n + + 0.03145038184936729813328L) * n + 0.03145038184936729813328L) * n + 0); + temp7 = + (((((((((((((-0.0001548706829797119405297L * n + + 0.001703577512776831345826L) * n + + -0.006298074441174952248206L) * n + + 0.001135718341851220897217L) * n + + 0.07098239636570130607609L) * n + + -0.2947189097103918228279L) * n + + 0.6609880749574105621806L) * n + -0.9744463373083475298126L) * n + + 1.L) * n + -0.7240204429301533219761L) * n + + 0.3645655877342419080068L) * n + -0.1219348510660265345104L) * n + + 0.02441794434980124929018L) * n + + -0.002219813122709204480925L) / + ((((((((((((((8.890524703760046188512e-9L * n + + 8.890524703760046188512e-9L) * n + + -1.235782933822646420203e-6L) * n + + -1.235782933822646420203e-6L) * n + + 0.00006510531240563481823848L) * n + + 0.00006510531240563481823848L) * n + + -0.001638497031328865232404L) * n + + -0.001638497031328865232404L) * n + + 0.02036975682866212758601L) * n + 0.02036975682866212758601L) * n + + -0.1155809463523431451121L) * n + -0.1155809463523431451121L) * n + + 0.2258335523150311892621L) * n + 0.2258335523150311892621L) * n + 0); + a5 = temp1 * sum1 + temp3 * sum3 + temp5 * sum5 + temp7 * sum7; + temp0 = + ((((((-0.05L * n + 0.3L) * n + -0.75L) * n + 1.L) * n + -0.75L) * n + + 0.3L) * n + + -0.05L) / + (((((((0.0008524808524808524808525L * n + 0) * n + + -0.04773892773892773892774L) * n + 0) * n + + 0.6683449883449883449883L) * n + 0) * n + + -1.964115884115884115884L) * n + 0); + temp2 = + (((((((((((0.0004653327128897161470451L * n + + -0.003257328990228013029316L) * n + + -0.0004653327128897161470451L) * n + + 0.05537459283387622149837L) * n + + -0.1680781758957654723127L) * n + 0.1342019543973941368078L) * n + + 0.2879478827361563517915L) * n + -0.8571428571428571428571L) * n + + 1.L) * n + -0.632759422987436016752L) * n + + 0.214332247557003257329L) * n + + -0.03061889250814332247557L) / + ((((((((((((3.7779735978233618332e-7L * n + + 3.7779735978233618332e-7L) * n + + -0.0000340017623804102564988L) * n + + -0.0000340017623804102564988L) * n + + 0.001100523709045945302011L) * n + + 0.001100523709045945302011L) * n + + -0.01570125827255389177878L) * n + + -0.01570125827255389177878L) * n + 0.09623858824151318999421L) * n + + 0.09623858824151318999421L) * n + -0.1958501513111630774331L) * n + + -0.1958501513111630774331L) * n + 0); + temp4 = + (((((((((((-0.0008210180623973727422003L * n + + 0.007389162561576354679803L) * n + + -0.02107279693486590038314L) * n + + -0.007389162561576354679803L) * n + + 0.2019704433497536945813L) * n + -0.6091954022988505747126L) * n + + 1.L) * n + -1.039408866995073891626L) * n + + 0.7052545155993431855501L) * n + -0.3045977011494252873563L) * n + + 0.07635467980295566502463L) * n + + -0.00848385331143951833607L) / + ((((((((((((2.221911675348222380829e-7L * n + + 2.221911675348222380829e-7L) * n + + -0.00001999720507813400142746L) * n + + -0.00001999720507813400142746L) * n + + 0.0006472428710289371795353L) * n + + 0.0006472428710289371795353L) * n + + -0.009234264922747212214723L) * n + + -0.009234264922747212214723L) * n + + 0.05660008925315047764027L) * n + 0.05660008925315047764027L) * n + + -0.1151839012500518482222L) * n + -0.1151839012500518482222L) * n + 0); + temp6 = + (((((((((((0.002164502164502164502165L * n + + -0.02380952380952380952381L) * n + + 0.119047619047619047619L) * n + + -0.3571428571428571428571L) * n + + 0.7142857142857142857143L) * n + -1.L) * n + 1.L) * n + + -0.7142857142857142857143L) * n + 0.3571428571428571428571L) * n + + -0.119047619047619047619L) * n + 0.02380952380952380952381L) * n + + -0.002164502164502164502165L) / + ((((((((((((7.987864287408898641822e-7L * n + + 7.987864287408898641822e-7L) * n + + -0.00007189077858668008777639L) * n + + -0.00007189077858668008777639L) * n + + 0.002326864866922212174363L) * n + + 0.002326864866922212174363L) * n + + -0.03319756397847138275541L) * n + + -0.03319756397847138275541L) * n + 0.2034796597117393204423L) * n + + 0.2034796597117393204423L) * n + -0.414090884659277305592L) * n + + -0.414090884659277305592L) * n + 0); + a6 = temp0 * sum0 + temp2 * sum2 + temp4 * sum4 + temp6 * sum6; + temp1 = + (((((((((((((-0.00003463502914186507936508L * n + + 0.0002424452039930555555556L) * n + + 0.0009005107576884920634921L) * n + + -0.01018269856770833333333L) * n + + 0.01585591634114583333333L) * n + + 0.06356913248697916666667L) * n + + -0.2757937891953656462585L) * n + 0.3764689127604166666667L) * n + + -0.02229803176153273809524L) * n + -0.5844938247922867063492L) * n + + 0.8224988180493551587302L) * n + -0.5482725113157242063492L) * n + + 0.1884630475725446428571L) * n + + -0.02692329251036352040816L) / + ((((((((((((((3.936759889140841521794e-8L * n + + 3.936759889140841521794e-8L) * n + + -5.472096245905769715294e-6L) * n + + -5.472096245905769715294e-6L) * n + + 0.000288288926681783824641L) * n + + 0.000288288926681783824641L) * n + + -0.007255330372889896699421L) * n + + -0.007255330372889896699421L) * n + + 0.09019809775762156714538L) * n + 0.09019809775762156714538L) * n + + -0.5117970521541950113379L) * n + -0.5117970521541950113379L) * n + + 1.L) * n + 1.L) * n + 0); + temp3 = + (((((((((((((0.00006794678407870955467678L * n + + -0.000611521056708385992091L) * n + + 0.0004076807044722573280607L) * n + + 0.01263810183863997716988L) * n + + -0.05553064173472669538551L) * n + + 0.07904928859717069591096L) * n + + 0.0833299359941293978556L) * n + -0.5260168236237378884857L) * n + + 1.L) * n + -1.097299794800712082297L) * n + + 0.7620639515131748814329L) * n + -0.3324228464266786253007L) * n + + 0.08361531248725997798524L) * n + + -0.009290590276362219776138L) / + ((((((((((((((8.581234431814923840236e-9L * n + + 8.581234431814923840236e-9L) * n + + -1.192791586022274413793e-6L) * n + + -1.192791586022274413793e-6L) * n + + 0.00006284037974418068728205L) * n + + 0.00006284037974418068728205L) * n + + -0.001581495762080195018984L) * n + + -0.001581495762080195018984L) * n + + 0.01966111838054798994458L) * n + 0.01966111838054798994458L) * n + + -0.1115600293063703720477L) * n + -0.1115600293063703720477L) * n + + 0.2179770845431899694201L) * n + 0.2179770845431899694201L) * n + 0); + temp5 = + (((((((((((((-0.0001548706829797119405297L * n + + 0.001703577512776831345826L) * n + + -0.006298074441174952248206L) * n + + 0.001135718341851220897217L) * n + + 0.07098239636570130607609L) * n + + -0.2947189097103918228279L) * n + + 0.6609880749574105621806L) * n + -0.9744463373083475298126L) * n + + 1.L) * n + -0.7240204429301533219761L) * n + + 0.3645655877342419080068L) * n + -0.1219348510660265345104L) * n + + 0.02441794434980124929018L) * n + + -0.002219813122709204480925L) / + ((((((((((((((8.890524703760046188512e-9L * n + + 8.890524703760046188512e-9L) * n + + -1.235782933822646420203e-6L) * n + + -1.235782933822646420203e-6L) * n + + 0.00006510531240563481823848L) * n + + 0.00006510531240563481823848L) * n + + -0.001638497031328865232404L) * n + + -0.001638497031328865232404L) * n + + 0.02036975682866212758601L) * n + 0.02036975682866212758601L) * n + + -0.1155809463523431451121L) * n + -0.1155809463523431451121L) * n + + 0.2258335523150311892621L) * n + 0.2258335523150311892621L) * n + 0); + temp7 = + (((((((((((((0.0004245265000531462585034L * n + + -0.005518844500690901360544L) * n + + 0.03311306700414540816327L) * n + + -0.121414579015199829932L) * n + + 0.3035364475379995748299L) * n + + -0.5463656055683992346939L) * n + + 0.7284874740911989795918L) * n + -0.7284874740911989795918L) * n + + 0.5463656055683992346939L) * n + -0.3035364475379995748299L) * n + + 0.121414579015199829932L) * n + -0.03311306700414540816327L) * n + + 0.005518844500690901360544L) * n + + -0.0004245265000531462585034L) / + ((((((((((((((3.936759889140841521794e-8L * n + + 3.936759889140841521794e-8L) * n + + -5.472096245905769715294e-6L) * n + + -5.472096245905769715294e-6L) * n + + 0.000288288926681783824641L) * n + + 0.000288288926681783824641L) * n + + -0.007255330372889896699421L) * n + + -0.007255330372889896699421L) * n + + 0.09019809775762156714538L) * n + 0.09019809775762156714538L) * n + + -0.5117970521541950113379L) * n + -0.5117970521541950113379L) * n + + 1.L) * n + 1.L) * n + 0); + a7 = temp1 * sum1 + temp3 * sum3 + temp5 * sum5 + temp7 * sum7; + for (i = 0; i < nn; i++) + { + z = n1 * i - 1.L; + y[i] = + x[i] - + (((((((a7 * z + a6) * z + a5) * z + a4) * z + a3) * z + a2) * z + + a1) * z + a0); + } + a[0] = a0; + a[1] = a1; + a[2] = a2; + a[3] = a3; + a[4] = a4; + a[5] = a5; + a[6] = a6; + a[7] = a7; +} + +void +polyreg8 (double *x, int nn, double *y, double *a) +{ + +/* +polynominal detrending of a time series, order 8 +machine-generated file, do not edit! +made by polyregz.m (Mathematica ) +Gerhard Heinzel AEI 17.01.2008 + +x[]: input, read-only: time series to be detrended +nn: input, read-only: length of x[] +y[]: output: time series with trend subtracted +a[]: fitting coefficients in for z^0, z^1, z^2,... with + z = 2*i/(nn-1)-1 ; i=0,...,nn-1 +*/ + + long double n = nn, n1 = 2.L / (n - 1), z; + long double a0, temp0, sum0 = 0; + long double a1, temp1, sum1 = 0; + long double a2, temp2, sum2 = 0; + long double a3, temp3, sum3 = 0; + long double a4, temp4, sum4 = 0; + long double a5, temp5, sum5 = 0; + long double a6, temp6, sum6 = 0; + long double a7, temp7, sum7 = 0; + long double a8, temp8, sum8 = 0; + int i; + for (i = 0; i < nn; i++) + { + z = n1 * i - 1.L; + sum0 += x[i]; + sum1 += x[i] * z; + sum2 += x[i] * z * z; + sum3 += x[i] * z * z * z; + sum4 += x[i] * z * z * z * z; + sum5 += x[i] * z * z * z * z * z; + sum6 += x[i] * z * z * z * z * z * z; + sum7 += x[i] * z * z * z * z * z * z * z; + sum8 += x[i] * z * z * z * z * z * z * z * z; +/* the above code is efficiently optimized by GCC4 */ + + } + temp0 = + ((((((((0.00002402547524106132193656L * n + 0) * n + + -0.002530683392058459243985L) * n + 0) * n + + 0.07643624863026189369711L) * n + 0) * n + + -0.6802962043638957971664L) * n + 0) * n + + 1.L) / + (((((((((3.967078723603413440248e-6L * n + 0) * n + + -0.0004760494468324096128298L) * n + 0) * n + + 0.01732819986469970990701L) * n + 0) * n + + -0.2081922914147071373442L) * n + 0) * n + + 0.5849695602676649322453L) * n + 0); + temp2 = + ((((((((-0.0001859213287177625696098L * n + + 0.0003718426574355251392197L) * n + + 0.01413002098254995529035L) * n + + -0.02863188462253543571991L) * n + -0.2547122203433347203655L) * n + + 0.5380563253092048764509L) * n + 0.7309718373453975617746L) * n + + -2.L) * n + + 1.L) / + (((((((((2.093132034434014938836e-6L * n + 0) * n + + -0.0002511758441320817926603L) * n + 0) * n + + 0.009142800726407777252834L) * n + 0) * n + + -0.1098475691670971039901L) * n + 0) * n + + 0.3086448772695021068209L) * n + 0); + temp4 = + ((((((((0.0003900156006240249609984L * n + + -0.001560062402496099843994L) * n + + -0.01716068642745709828393L) * n + + 0.07644305772230889235569L) * n + 0.05330213208528341133645L) * n + + -0.6016640665626625065003L) * n + 1.L) * n + + -0.6796671866874674986999L) * n + + 0.169916796671866874675L) / + (((((((((1.125861017399536083141e-6L * n + 0) * n + + -0.0001351033220879443299769L) * n + 0) * n + + 0.004917760924001173611158L) * n + 0) * n + + -0.05908518619312765364322L) * n + 0) * n + + 0.1660149621816659926756L) * n + 0); + temp6 = + ((((((((-0.002747252747252747252747L * n + + 0.01648351648351648351648L) * n + + 0.02564102564102564102564L) * n + -0.3461538461538461538462L) * n + + 0.9615384615384615384615L) * n + -1.320512820512820512821L) * n + + 1.L) * n + -0.4010989010989010989011L) * n + + 0.06684981684981684981685L) / + (((((((((5.551360862716174071485e-6L * n + 0) * n + + -0.0006661633035259408885783L) * n + 0) * n + + 0.02424834424834424834425L) * n + 0) * n + + -0.2913354180753448152716L) * n + 0) * n + + 0.818581467372676163885L) * n + 0); + temp8 = + ((((((((0.001584831625223159790039L * n + + -0.01267865300178527832031L) * n + + 0.04437528550624847412109L) * n + + -0.08875057101249694824219L) * n + 0.1109382137656211853027L) * n + + -0.08875057101249694824219L) * n + 0.04437528550624847412109L) * n + + -0.01267865300178527832031L) * n + + 0.001584831625223159790039L) / + (((((((((6.781684027777777777778e-6L * n + 0) * n + + -0.0008138020833333333333333L) * n + 0) * n + + 0.02962239583333333333333L) * n + 0) * n + + -0.3559027777777777777778L) * n + 0) * n + 1.L) * n + 0); + a0 = + temp0 * sum0 + temp2 * sum2 + temp4 * sum4 + temp6 * sum6 + temp8 * sum8; + temp1 = + (((((((((((((5.609917572601837047788e-7L * n + + -5.609917572601837047788e-7L) * n + + -0.00005946512626957947270656L) * n + + 0.00005946512626957947270656L) * n + + 0.002301300386632725593744L) * n + + -0.002301300386632725593744L) * n + + -0.03983795876891353236683L) * n + + 0.03983795876891353236683L) * n + 0.3107415910765268958665L) * n + + -0.3107415910765268958665L) * n + -0.9305548012124555634861L) * n + + 0.9305548012124555634861L) * n + 1.L) * n + + -1.L) / + ((((((((((((((4.342067720592805092166e-9L * n + + 4.342067720592805092166e-9L) * n + + -6.03547413162399907811e-7L) * n + + -6.03547413162399907811e-7L) * n + + 0.00003179696191790111168993L) * n + + 0.00003179696191790111168993L) * n + + -0.0008002300547020922000708L) * n + + -0.0008002300547020922000708L) * n + + 0.009948441351796940799848L) * n + + 0.009948441351796940799848L) * n + + -0.05644889508712882125972L) * n + -0.05644889508712882125972L) * n + + 0.1102954674114101978292L) * n + 0.1102954674114101978292L) * n + 0); + temp3 = + (((((((((((((-1.649242420494146014028e-6L * n + + 4.947727261482438042085e-6L) * n + + 0.0001352378784805199731503L) * n + + -0.0004189075748055130875632L) * n + + -0.003756424486412166571285L) * n + + 0.0123907583051725190034L) * n + 0.0388677746591388959767L) * n + + -0.150019174406522078369L) * n + -0.09621672427627512159432L) * n + + 0.6998399213892527039133L) * n + -0.4179053066259727879713L) * n + + -0.7495871200135646262318L) * n + 1.L) * n + + -0.3333333333333333333333L) / + ((((((((((((((1.934107788297951760651e-9L * n + + 1.934107788297951760651e-9L) * n + + -2.688409825734152947305e-7L) * n + + -2.688409825734152947305e-7L) * n + + 0.00001416347133370590074325L) * n + + 0.00001416347133370590074325L) * n + + -0.0003564502630599476156327L) * n + + -0.0003564502630599476156327L) * n + + 0.004431381345961347923161L) * n + + 0.004431381345961347923161L) * n + + -0.02514429867388714313808L) * n + -0.02514429867388714313808L) * n + + 0.04912943239522925144335L) * n + 0.04912943239522925144335L) * n + 0); + temp5 = + (((((((((((((0.00001012603538711833284953L * n + + -0.00005063017693559166424767L) * n + + -0.0005603072914205477510075L) * n + + 0.003206577872587472069019L) * n + + 0.007261717510615460430829L) * n + + -0.06252826851545570534587L) * n + + 0.03303787812303808064375L) * n + 0.3720035373616952333376L) * n + + -0.7991244354735271681529L) * n + 0.2505876475869657672497L) * n + + 1.L) * n + -1.407687686065900238299L) * n + + 0.7548048037911876489371L) * n + + -0.1509609607582375297874L) / + ((((((((((((((6.394260206712529962582e-9L * n + + 6.394260206712529962582e-9L) * n + + -8.888021687330416647989e-7L) * n + + -8.888021687330416647989e-7L) * n + + 0.00004682516749375585691599L) * n + + 0.00004682516749375585691599L) * n + + -0.001178442973316499134514L) * n + + -0.001178442973316499134514L) * n + + 0.01465037552337478754955L) * n + 0.01465037552337478754955L) * n + + -0.08312834962399880412747L) * n + -0.08312834962399880412747L) * n + + 0.1624244400668290010975L) * n + 0.1624244400668290010975L) * n + 0); + temp7 = + (((((((((((((-0.00003463502914186507936508L * n + + 0.0002424452039930555555556L) * n + + 0.0009005107576884920634921L) * n + + -0.01018269856770833333333L) * n + + 0.01585591634114583333333L) * n + + 0.06356913248697916666667L) * n + + -0.2757937891953656462585L) * n + 0.3764689127604166666667L) * n + + -0.02229803176153273809524L) * n + -0.5844938247922867063492L) * n + + 0.8224988180493551587302L) * n + -0.5482725113157242063492L) * n + + 0.1884630475725446428571L) * n + + -0.02692329251036352040816L) / + ((((((((((((((3.936759889140841521794e-8L * n + + 3.936759889140841521794e-8L) * n + + -5.472096245905769715294e-6L) * n + + -5.472096245905769715294e-6L) * n + + 0.000288288926681783824641L) * n + + 0.000288288926681783824641L) * n + + -0.007255330372889896699421L) * n + + -0.007255330372889896699421L) * n + + 0.09019809775762156714538L) * n + 0.09019809775762156714538L) * n + + -0.5117970521541950113379L) * n + -0.5117970521541950113379L) * n + + 1.L) * n + 1.L) * n + 0); + a1 = temp1 * sum1 + temp3 * sum3 + temp5 * sum5 + temp7 * sum7; + temp0 = + ((((((((-0.0001859213287177625696098L * n + + 0.0003718426574355251392197L) * n + + 0.01413002098254995529035L) * n + + -0.02863188462253543571991L) * n + -0.2547122203433347203655L) * n + + 0.5380563253092048764509L) * n + 0.7309718373453975617746L) * n + + -2.L) * n + + 1.L) / + (((((((((2.093132034434014938836e-6L * n + 0) * n + + -0.0002511758441320817926603L) * n + 0) * n + + 0.009142800726407777252834L) * n + 0) * n + + -0.1098475691670971039901L) * n + 0) * n + + 0.3086448772695021068209L) * n + 0); + temp2 = + (((((((((((((((2.907035769636459306965e-8L * n + + -8.721107308909377920894e-8L) * n + + -3.808216858223761692124e-6L) * n + + 0.00001165721343624220182093L) * n + + 0.0001822033119215811478295L) * n + + -0.0005777733592152462872592L) * n + + -0.003840198404598005082299L) * n + + 0.01307171197951817296085L) * n + + 0.03386432961953086642377L) * n + + -0.1369679263925491130715L) * n + + -0.06637878548524752764394L) * n + 0.5761758060138590557227L) * n + + -0.2899724038752902814882L) * n + -0.7922314209304587950595L) * n + + 1.L) * n + + -0.3333333333333333333333L) / + ((((((((((((((((1.239692171397643443435e-11L * n + + 1.239692171397643443435e-11L) * n + + -2.516575107937216190174e-9L) * n + + -2.516575107937216190174e-9L) * n + + 2.010656732789837900908e-7L) * n + + 2.010656732789837900908e-7L) * n + + -8.094805574653478416165e-6L) * n + + -8.094805574653478416165e-6L) * n + + 0.0001746253202966674271062L) * n + + 0.0001746253202966674271062L) * n + + -0.001978991622769635885772L) * n + + -0.001978991622769635885772L) * n + + 0.01062950865162535549051L) * n + 0.01062950865162535549051L) * n + + -0.02015370538302360300337L) * n + -0.02015370538302360300337L) * n + + 0); + temp4 = + (((((((((((((((((-2.235636043117803801125e-9L * n + + 1.117818021558901900563e-8L) * n + + 3.293837103526897600324e-7L) * n + + -1.736343993488160952207e-6L) * n + + -0.00001771965127775171292772L) * n + + 0.0001026142039550784492691L) * n + + 0.0004018675021426551948725L) * n + + -0.002849930701229455222776L) * n + + -0.00256109814976605918425L) * n + + 0.03679077137120065566686L) * n + + -0.02951292740341023677588L) * n + + -0.1808843091932901600277L) * n + 0.3839023783254539528365L) * n + + 0.003067715633496984703623L) * n + -0.7871532932439296676973L) * n + + 1.L) * n + -0.5266058383445087915378L) * n + + 0.1053211676689017583076L) / + ((((((((((((((((((2.053426984376011052788e-13L * n + + 2.053426984376011052788e-13L) * n + + -5.174636000627547853025e-11L) * n + + -5.174636000627547853025e-11L) * n + + 5.372997047318270520724e-9L) * n + + 5.372997047318270520724e-9L) * n + + -2.972746245281151201121e-7L) * n + + -2.972746245281151201121e-7L) * n + + 9.462533439597557537085e-6L) * n + + 9.462533439597557537085e-6L) * n + + -0.0001745122877837504377052L) * n + + -0.0001745122877837504377052L) * n + + 0.001782288782619464326554L) * n + + 0.001782288782619464326554L) * n + + -0.008961121663901469417774L) * n + + -0.008961121663901469417774L) * n + 0.01635747976595173398762L) * n + + 0.01635747976595173398762L) * n + 0); + temp6 = + (((((((((((((((((1.477007533447384197714e-8L * n + + -1.0339052734131689384e-7L) * n + + -1.65424843746107030144e-6L) * n + + 0.00001323398749968856241152L) * n + + 0.00005399939542283636626843L) * n + + -0.0005947023132672547733676L) * n + + -0.0000818515374821298968539L) * n + + 0.01074398911950162423564L) * n + + -0.02132257449536476211806L) * n + + -0.05391133623369223322256L) * n + + 0.2576468309225081836345L) * n + -0.2953114683102378870021L) * n + + -0.222364783927133124664L) * n + 1.L) * n + + -1.242029932308829142537L) * n + 0.8009968332283279444221L) * n + + -0.2728092437680916542761L) * n + + 0.0389727491097273791823L) / + ((((((((((((((((((8.721181930624189192967e-13L * n + + 8.721181930624189192967e-13L) * n + + -2.197737846517295676628e-10L) * n + + -2.197737846517295676628e-10L) * n + + 2.281984463967125344232e-8L) * n + + 2.281984463967125344232e-8L) * n + + -1.262565508096463869466e-6L) * n + + -1.262565508096463869466e-6L) * n + + 0.00004018865841310771272869L) * n + + 0.00004018865841310771272869L) * n + + -0.0007411772721755768563554L) * n + + -0.0007411772721755768563554L) * n + + 0.00756962134246931395039L) * n + 0.00756962134246931395039L) * n + + -0.03805909483413695286741L) * n + -0.03805909483413695286741L) * n + + 0.0694724273377166515584L) * n + 0.0694724273377166515584L) * n + 0); + temp8 = + (((((((((((((((((-8.336141647134544276625e-8L * n + + 7.502527482421089848962e-7L) * n + + 6.168744818879562764702e-6L) * n + + -0.00007552544332303897114622L) * n + + -2.345234516727185123157e-6L) * n + + 0.002137820197690948148829L) * n + + -0.006691636845919472080946L) * n + + -0.007860872012529084341704L) * n + + 0.08620809293177708186115L) * n + + -0.1937384007253249853951L) * n + + 0.1213772567378385216418L) * n + 0.2955045174480470177062L) * n + + -0.8225621414622500373987L) * n + 1.L) * n + + -0.7227062444527046169362L) * n + 0.3204463358237717934192L) * n + + -0.08104915417354655714389L) * n + + 0.009005461574838506349321L) / + ((((((((((((((((((9.908707468758719379982e-12L * n + + 9.908707468758719379982e-12L) * n + + -2.496994282127197283756e-9L) * n + + -2.496994282127197283756e-9L) * n + + 2.592712396275406512966e-7L) * n + + 2.592712396275406512966e-7L) * n + + -0.0000143448358025219980464L) * n + + -0.0000143448358025219980464L) * n + + 0.0004566097381583372722974L) * n + + 0.0004566097381583372722974L) * n + + -0.00842100168406270449132L) * n + + -0.00842100168406270449132L) * n + + 0.08600343867202510407327L) * n + 0.08600343867202510407327L) * n + + -0.4324143679573697203116L) * n + -0.4324143679573697203116L) * n + + 0.7893218661300897807312L) * n + 0.7893218661300897807312L) * n + 0); + a2 = + temp0 * sum0 + temp2 * sum2 + temp4 * sum4 + temp6 * sum6 + temp8 * sum8; + temp1 = + (((((((((((((-1.649242420494146014028e-6L * n + + 4.947727261482438042085e-6L) * n + + 0.0001352378784805199731503L) * n + + -0.0004189075748055130875632L) * n + + -0.003756424486412166571285L) * n + + 0.0123907583051725190034L) * n + 0.0388677746591388959767L) * n + + -0.150019174406522078369L) * n + -0.09621672427627512159432L) * n + + 0.6998399213892527039133L) * n + -0.4179053066259727879713L) * n + + -0.7495871200135646262318L) * n + 1.L) * n + + -0.3333333333333333333333L) / + ((((((((((((((1.934107788297951760651e-9L * n + + 1.934107788297951760651e-9L) * n + + -2.688409825734152947305e-7L) * n + + -2.688409825734152947305e-7L) * n + + 0.00001416347133370590074325L) * n + + 0.00001416347133370590074325L) * n + + -0.0003564502630599476156327L) * n + + -0.0003564502630599476156327L) * n + + 0.004431381345961347923161L) * n + + 0.004431381345961347923161L) * n + + -0.02514429867388714313808L) * n + -0.02514429867388714313808L) * n + + 0.04912943239522925144335L) * n + 0.04912943239522925144335L) * n + 0); + temp3 = + (((((((((((((3.849737062958599927625e-6L * n + + -0.00001924868531479299963812L) * n + + -0.0002130187841503758626619L) * n + + 0.001219083403270223310415L) * n + + 0.0030194771030471952099L) * n + + -0.02506563801692344412877L) * n + + 0.00985019389842340434815L) * n + 0.1653282414144447267585L) * n + + -0.2908612375108113449185L) * n + -0.1751694525930545610401L) * n + + 1.L) * n + -1.176184499931987978554L) * n + + 0.6101153124574924865965L) * n + + -0.1220230624914984973193L) / + ((((((((((((((5.745959963953541658851e-10L * n + + 5.745959963953541658851e-10L) * n + + -7.986884349895422905803e-8L) * n + + -7.986884349895422905803e-8L) * n + + 4.207766481603178556777e-6L) * n + + 4.207766481603178556777e-6L) * n + + -0.0001058963183476745867101L) * n + + -0.0001058963183476745867101L) * n + + 0.001316500556637121976376L) * n + + 0.001316500556637121976376L) * n + + -0.007470014565681931600839L) * n + + -0.007470014565681931600839L) * n + 0.01459565766203622838015L) * n + + 0.01459565766203622838015L) * n + 0); + temp5 = + (((((((((((((-0.00001186718249353238554102L * n + + 0.00008307027745472669878717L) * n + + 0.0003085467448318420240666L) * n + + -0.003488951653098521349061L) * n + + 0.003382147010656729879192L) * n + + 0.03613557069280611397242L) * n + + -0.1166306695464362850972L) * n + + 0.05425675836043006669357L) * n + 0.3601096527662402392424L) * n + + -0.8897420074525906059383L) * n + 1.L) * n + + -0.6253293143141955236988L) * n + 0.2110815750124605416182L) * n + + -0.03015451071606579165974L) / + ((((((((((((((8.758914154660031738831e-10L * n + + 8.758914154660031738831e-10L) * n + + -1.217489067497744411697e-7L) * n + + -1.217489067497744411697e-7L) * n + + 6.414152835457541242346e-6L) * n + + 6.414152835457541242346e-6L) * n + + -0.0001614241601961379869371L) * n + + -0.0001614241601961379869371L) * n + + 0.002006821389721735287925L) * n + + 0.002006821389721735287925L) * n + + -0.01138699481467481748595L) * n + -0.01138699481467481748595L) * n + + 0.02224904337910122622171L) * n + 0.02224904337910122622171L) * n + 0); + temp7 = + (((((((((((((0.00006794678407870955467678L * n + + -0.000611521056708385992091L) * n + + 0.0004076807044722573280607L) * n + + 0.01263810183863997716988L) * n + + -0.05553064173472669538551L) * n + + 0.07904928859717069591096L) * n + + 0.0833299359941293978556L) * n + -0.5260168236237378884857L) * n + + 1.L) * n + -1.097299794800712082297L) * n + + 0.7620639515131748814329L) * n + -0.3324228464266786253007L) * n + + 0.08361531248725997798524L) * n + + -0.009290590276362219776138L) / + ((((((((((((((8.581234431814923840236e-9L * n + + 8.581234431814923840236e-9L) * n + + -1.192791586022274413793e-6L) * n + + -1.192791586022274413793e-6L) * n + + 0.00006284037974418068728205L) * n + + 0.00006284037974418068728205L) * n + + -0.001581495762080195018984L) * n + + -0.001581495762080195018984L) * n + + 0.01966111838054798994458L) * n + 0.01966111838054798994458L) * n + + -0.1115600293063703720477L) * n + -0.1115600293063703720477L) * n + + 0.2179770845431899694201L) * n + 0.2179770845431899694201L) * n + 0); + a3 = temp1 * sum1 + temp3 * sum3 + temp5 * sum5 + temp7 * sum7; + temp0 = + ((((((((0.0003900156006240249609984L * n + + -0.001560062402496099843994L) * n + + -0.01716068642745709828393L) * n + + 0.07644305772230889235569L) * n + 0.05330213208528341133645L) * n + + -0.6016640665626625065003L) * n + 1.L) * n + + -0.6796671866874674986999L) * n + + 0.169916796671866874675L) / + (((((((((1.125861017399536083141e-6L * n + 0) * n + + -0.0001351033220879443299769L) * n + 0) * n + + 0.004917760924001173611158L) * n + 0) * n + + -0.05908518619312765364322L) * n + 0) * n + + 0.1660149621816659926756L) * n + 0); + temp2 = + (((((((((((((((((-2.235636043117803801125e-9L * n + + 1.117818021558901900563e-8L) * n + + 3.293837103526897600324e-7L) * n + + -1.736343993488160952207e-6L) * n + + -0.00001771965127775171292772L) * n + + 0.0001026142039550784492691L) * n + + 0.0004018675021426551948725L) * n + + -0.002849930701229455222776L) * n + + -0.00256109814976605918425L) * n + + 0.03679077137120065566686L) * n + + -0.02951292740341023677588L) * n + + -0.1808843091932901600277L) * n + 0.3839023783254539528365L) * n + + 0.003067715633496984703623L) * n + -0.7871532932439296676973L) * n + + 1.L) * n + -0.5266058383445087915378L) * n + + 0.1053211676689017583076L) / + ((((((((((((((((((2.053426984376011052788e-13L * n + + 2.053426984376011052788e-13L) * n + + -5.174636000627547853025e-11L) * n + + -5.174636000627547853025e-11L) * n + + 5.372997047318270520724e-9L) * n + + 5.372997047318270520724e-9L) * n + + -2.972746245281151201121e-7L) * n + + -2.972746245281151201121e-7L) * n + + 9.462533439597557537085e-6L) * n + + 9.462533439597557537085e-6L) * n + + -0.0001745122877837504377052L) * n + + -0.0001745122877837504377052L) * n + + 0.001782288782619464326554L) * n + + 0.001782288782619464326554L) * n + + -0.008961121663901469417774L) * n + + -0.008961121663901469417774L) * n + 0.01635747976595173398762L) * n + + 0.01635747976595173398762L) * n + 0); + temp4 = + (((((((((((((((((7.172829528324198352378e-9L * n + + -5.020980669826938846665e-8L) * n + + -8.033569071723102154663e-7L) * n + + 6.426855257378481723731e-6L) * n + + 0.00002699853034461228259835L) * n + + -0.0002942294672518586164145L) * n + + -0.0000835491183459202624085L) * n + + 0.005610988935508774106338L) * n + + -0.01018887523405301392398L) * n + + -0.03389754427852223300283L) * n + + 0.136897640480511866887L) * n + -0.08242189383988505798903L) * n + + -0.3856243699924504534648L) * n + 1.L) * n + + -1.137082613408388291314L) * n + 0.7138187630834203804015L) * n + + -0.2412280455109721482185L) * n + + 0.03446114935871030688836L) / + ((((((((((((((((((1.303166131150053917726e-13L * n + + 1.303166131150053917726e-13L) * n + + -3.283978650498135872669e-11L) * n + + -3.283978650498135872669e-11L) * n + + 3.409864498767231081121e-9L) * n + + 3.409864498767231081121e-9L) * n + + -1.886593608065933056692e-7L) * n + + -1.886593608065933056692e-7L) * n + + 6.005206509500284936858e-6L) * n + + 6.005206509500284936858e-6L) * n + + -0.0001107507131442524098051L) * n + + -0.0001107507131442524098051L) * n + + 0.001131093725323833108652L) * n + + 0.001131093725323833108652L) * n + + -0.005686995611903889577031L) * n + + -0.005686995611903889577031L) * n + 0.01038094550434585132946L) * n + + 0.01038094550434585132946L) * n + 0); + temp6 = + (((((((((((((((((-2.8899737405040713006e-8L * n + + 2.60097636645366417054e-7L) * n + + 2.138580567973012762444e-6L) * n + + -0.00002618316208896688598343L) * n + + -8.442576620592560292819e-6L) * n + + 0.0008098053217741268272837L) * n + + -0.002112042902438544043714L) * n + + -0.006426619565078295611707L) * n + + 0.04097160470173141679163L) * n + + -0.05882615532123794036596L) * n + + -0.08939300297822583194242L) * n + + 0.4890490899378285343823L) * n + -0.9153879807664463906846L) * n + + 1.L) * n + -0.6933265369885099537766L) * n + + 0.3022331570779450848654L) * n + -0.07600394537673734287545L) * n + + 0.008444882819637482541717L) / + ((((((((((((((((((3.208657423462353966006e-13L * n + + 3.208657423462353966006e-13L) * n + + -8.085816707125131994335e-11L) * n + + -8.085816707125131994335e-11L) * n + + 8.395773014231595387451e-9L) * n + + 8.395773014231595387451e-9L) * n + + -4.645173351946449836587e-7L) * n + + -4.645173351946449836587e-7L) * n + + 0.00001478602764877553355729L) * n + + 0.00001478602764877553355729L) * n + + -0.0002726905567829992272833L) * n + + -0.0002726905567829992272833L) * n + + 0.002784980511417318761018L) * n + + 0.002784980511417318761018L) * n + + -0.01400252834320485665981L) * n + -0.01400252834320485665981L) * n + + 0.02555997816309276924571L) * n + 0.02555997816309276924571L) * n + 0); + temp8 = + (((((((((((((((((1.98314118458046912659e-7L * n + + -2.181455303038516039249e-6L) * n + + -6.610470615268230421967e-6L) * n + + 0.0001599733888894911762116L) * n + + -0.0004653771313148834217065L) * n + + -0.001960401165663946413939L) * n + + 0.01563534951805702932325L) * n + + -0.03617434613852003197352L) * n + + -0.001214343452024773928515L) * n + + 0.2136735469326226460445L) * n + + -0.6185821915508137621537L) * n + 1.L) * n + + -1.070617542232313619764L) * n + 0.7918021702968286399433L) * n + + -0.4030311387540426333048L) * n + 0.1354974603893990262512L) * n + + -0.02718602313823366638647L) * n + + 0.002471456648930333307861L) / + ((((((((((((((((((4.285908211833905339403e-12L * n + + 4.285908211833905339403e-12L) * n + + -1.080048869382144145529e-9L) * n + + -1.080048869382144145529e-9L) * n + + 1.121450742708459671108e-7L) * n + + 1.121450742708459671108e-7L) * n + + -6.204709318271944759853e-6L) * n + + -6.204709318271944759853e-6L) * n + + 0.0001975017864384790614921L) * n + + 0.0001975017864384790614921L) * n + + -0.00364241656980844872836L) * n + + -0.00364241656980844872836L) * n + + 0.0371998916319366889949L) * n + 0.0371998916319366889949L) * n + + -0.187036331064037699915L) * n + -0.187036331064037699915L) * n + + 0.3414129520417463272704L) * n + 0.3414129520417463272704L) * n + 0); + a4 = + temp0 * sum0 + temp2 * sum2 + temp4 * sum4 + temp6 * sum6 + temp8 * sum8; + temp1 = + (((((((((((((0.00001012603538711833284953L * n + + -0.00005063017693559166424767L) * n + + -0.0005603072914205477510075L) * n + + 0.003206577872587472069019L) * n + + 0.007261717510615460430829L) * n + + -0.06252826851545570534587L) * n + + 0.03303787812303808064375L) * n + 0.3720035373616952333376L) * n + + -0.7991244354735271681529L) * n + 0.2505876475869657672497L) * n + + 1.L) * n + -1.407687686065900238299L) * n + + 0.7548048037911876489371L) * n + + -0.1509609607582375297874L) / + ((((((((((((((6.394260206712529962582e-9L * n + + 6.394260206712529962582e-9L) * n + + -8.888021687330416647989e-7L) * n + + -8.888021687330416647989e-7L) * n + + 0.00004682516749375585691599L) * n + + 0.00004682516749375585691599L) * n + + -0.001178442973316499134514L) * n + + -0.001178442973316499134514L) * n + + 0.01465037552337478754955L) * n + 0.01465037552337478754955L) * n + + -0.08312834962399880412747L) * n + -0.08312834962399880412747L) * n + + 0.1624244400668290010975L) * n + 0.1624244400668290010975L) * n + 0); + temp3 = + (((((((((((((-0.00001186718249353238554102L * n + + 0.00008307027745472669878717L) * n + + 0.0003085467448318420240666L) * n + + -0.003488951653098521349061L) * n + + 0.003382147010656729879192L) * n + + 0.03613557069280611397242L) * n + + -0.1166306695464362850972L) * n + + 0.05425675836043006669357L) * n + 0.3601096527662402392424L) * n + + -0.8897420074525906059383L) * n + 1.L) * n + + -0.6253293143141955236988L) * n + 0.2110815750124605416182L) * n + + -0.03015451071606579165974L) / + ((((((((((((((8.758914154660031738831e-10L * n + + 8.758914154660031738831e-10L) * n + + -1.217489067497744411697e-7L) * n + + -1.217489067497744411697e-7L) * n + + 6.414152835457541242346e-6L) * n + + 6.414152835457541242346e-6L) * n + + -0.0001614241601961379869371L) * n + + -0.0001614241601961379869371L) * n + + 0.002006821389721735287925L) * n + + 0.002006821389721735287925L) * n + + -0.01138699481467481748595L) * n + -0.01138699481467481748595L) * n + + 0.02224904337910122622171L) * n + 0.02224904337910122622171L) * n + 0); + temp5 = + (((((((((((((0.00003568497305784534132677L * n + + -0.0003211647575206080719409L) * n + + 0.0002141098383470720479606L) * n + + 0.006637404988759233486779L) * n + + -0.02539580582616660124422L) * n + + 0.007600899261321057702601L) * n + + 0.179424044534846376191L) * n + -0.5927987724369268101203L) * n + + 1.L) * n + -1.05110088141883452878L) * n + + 0.7167683688398815258894L) * n + -0.3102451557649073974949L) * n + + 0.07782892623916068943368L) * n + + -0.00864765847101785438152L) / + ((((((((((((((1.238126017627523389601e-9L * n + + 1.238126017627523389601e-9L) * n + + -1.720995164502257511545e-7L) * n + + -1.720995164502257511545e-7L) * n + + 9.066796827086353782047e-6L) * n + + 9.066796827086353782047e-6L) * n + + -0.0002281829106706996781333L) * n + + -0.0002281829106706996781333L) * n + + 0.002836764616563758529692L) * n + + 0.002836764616563758529692L) * n + + -0.01609621271962998323566L) * n + -0.01609621271962998323566L) * n + + 0.03145038184936729813328L) * n + 0.03145038184936729813328L) * n + 0); + temp7 = + (((((((((((((-0.0001548706829797119405297L * n + + 0.001703577512776831345826L) * n + + -0.006298074441174952248206L) * n + + 0.001135718341851220897217L) * n + + 0.07098239636570130607609L) * n + + -0.2947189097103918228279L) * n + + 0.6609880749574105621806L) * n + -0.9744463373083475298126L) * n + + 1.L) * n + -0.7240204429301533219761L) * n + + 0.3645655877342419080068L) * n + -0.1219348510660265345104L) * n + + 0.02441794434980124929018L) * n + + -0.002219813122709204480925L) / + ((((((((((((((8.890524703760046188512e-9L * n + + 8.890524703760046188512e-9L) * n + + -1.235782933822646420203e-6L) * n + + -1.235782933822646420203e-6L) * n + + 0.00006510531240563481823848L) * n + + 0.00006510531240563481823848L) * n + + -0.001638497031328865232404L) * n + + -0.001638497031328865232404L) * n + + 0.02036975682866212758601L) * n + 0.02036975682866212758601L) * n + + -0.1155809463523431451121L) * n + -0.1155809463523431451121L) * n + + 0.2258335523150311892621L) * n + 0.2258335523150311892621L) * n + 0); + a5 = temp1 * sum1 + temp3 * sum3 + temp5 * sum5 + temp7 * sum7; + temp0 = + ((((((((-0.002747252747252747252747L * n + + 0.01648351648351648351648L) * n + + 0.02564102564102564102564L) * n + -0.3461538461538461538462L) * n + + 0.9615384615384615384615L) * n + -1.320512820512820512821L) * n + + 1.L) * n + -0.4010989010989010989011L) * n + + 0.06684981684981684981685L) / + (((((((((5.551360862716174071485e-6L * n + 0) * n + + -0.0006661633035259408885783L) * n + 0) * n + + 0.02424834424834424834425L) * n + 0) * n + + -0.2913354180753448152716L) * n + 0) * n + + 0.818581467372676163885L) * n + 0); + temp2 = + (((((((((((((((((1.477007533447384197714e-8L * n + + -1.0339052734131689384e-7L) * n + + -1.65424843746107030144e-6L) * n + + 0.00001323398749968856241152L) * n + + 0.00005399939542283636626843L) * n + + -0.0005947023132672547733676L) * n + + -0.0000818515374821298968539L) * n + + 0.01074398911950162423564L) * n + + -0.02132257449536476211806L) * n + + -0.05391133623369223322256L) * n + + 0.2576468309225081836345L) * n + -0.2953114683102378870021L) * n + + -0.222364783927133124664L) * n + 1.L) * n + + -1.242029932308829142537L) * n + 0.8009968332283279444221L) * n + + -0.2728092437680916542761L) * n + + 0.0389727491097273791823L) / + ((((((((((((((((((8.721181930624189192967e-13L * n + + 8.721181930624189192967e-13L) * n + + -2.197737846517295676628e-10L) * n + + -2.197737846517295676628e-10L) * n + + 2.281984463967125344232e-8L) * n + + 2.281984463967125344232e-8L) * n + + -1.262565508096463869466e-6L) * n + + -1.262565508096463869466e-6L) * n + + 0.00004018865841310771272869L) * n + + 0.00004018865841310771272869L) * n + + -0.0007411772721755768563554L) * n + + -0.0007411772721755768563554L) * n + + 0.00756962134246931395039L) * n + 0.00756962134246931395039L) * n + + -0.03805909483413695286741L) * n + -0.03805909483413695286741L) * n + + 0.0694724273377166515584L) * n + 0.0694724273377166515584L) * n + 0); + temp4 = + (((((((((((((((((-2.8899737405040713006e-8L * n + + 2.60097636645366417054e-7L) * n + + 2.138580567973012762444e-6L) * n + + -0.00002618316208896688598343L) * n + + -8.442576620592560292819e-6L) * n + + 0.0008098053217741268272837L) * n + + -0.002112042902438544043714L) * n + + -0.006426619565078295611707L) * n + + 0.04097160470173141679163L) * n + + -0.05882615532123794036596L) * n + + -0.08939300297822583194242L) * n + + 0.4890490899378285343823L) * n + -0.9153879807664463906846L) * n + + 1.L) * n + -0.6933265369885099537766L) * n + + 0.3022331570779450848654L) * n + -0.07600394537673734287545L) * n + + 0.008444882819637482541717L) / + ((((((((((((((((((3.208657423462353966006e-13L * n + + 3.208657423462353966006e-13L) * n + + -8.085816707125131994335e-11L) * n + + -8.085816707125131994335e-11L) * n + + 8.395773014231595387451e-9L) * n + + 8.395773014231595387451e-9L) * n + + -4.645173351946449836587e-7L) * n + + -4.645173351946449836587e-7L) * n + + 0.00001478602764877553355729L) * n + + 0.00001478602764877553355729L) * n + + -0.0002726905567829992272833L) * n + + -0.0002726905567829992272833L) * n + + 0.002784980511417318761018L) * n + + 0.002784980511417318761018L) * n + + -0.01400252834320485665981L) * n + -0.01400252834320485665981L) * n + + 0.02555997816309276924571L) * n + 0.02555997816309276924571L) * n + 0); + temp6 = + (((((((((((((((((1.173357280251692958996e-7L * n + + -1.290693008276862254895e-6L) * n + + -3.91119093417230986332e-6L) * n + + 0.00009465082060696989869233L) * n + + -0.0002570434681938042042174L) * n + + -0.00136125089272933072483L) * n + + 0.00936073148657327264208L) * n + + -0.01455729620935197041888L) * n + + -0.04400832927221341335108L) * n + + 0.2659576198995136825192L) * n + + -0.6535191722668402192457L) * n + 1.L) * n + + -1.044802222808031708807L) * n + 0.7634574302067533751622L) * n + + -0.3862493478089117267673L) * n + 0.1294812274568732531643L) * n + + -0.02595110385541735145101L) * n + + 0.002359191259583395586456L) / + ((((((((((((((((((7.698044171494585837518e-13L * n + + 7.698044171494585837518e-13L) * n + + -1.939907131216635631055e-10L) * n + + -1.939907131216635631055e-10L) * n + + 2.014270237913273330245e-8L) * n + + 2.014270237913273330245e-8L) * n + + -1.114445854707271191698e-6L) * n + + -1.114445854707271191698e-6L) * n + + 0.00003547386926660160538783L) * n + + 0.00003547386926660160538783L) * n + + -0.0006542250150842909322673L) * n + + -0.0006542250150842909322673L) * n + + 0.006681580537977190684495L) * n + + 0.006681580537977190684495L) * n + + -0.03359413844257673603737L) * n + -0.03359413844257673603737L) * n + + 0.06132217153603332293699L) * n + 0.06132217153603332293699L) * n + 0); + temp8 = + (((((((((((((((((-6.455552872914695033227e-7L * n + + 8.392218734789103543195e-6L) * n + + -6.455552872914695033227e-6L) * n + + -0.000386042061800298762987L) * n + + 0.002361441240912195443154L) * n + + -0.003910773930411722251129L) * n + + -0.01659980865741284680844L) * n + + 0.1165007804763423353866L) * n + + -0.3552258346061531747763L) * n + + 0.6986354252337232917639L) * n + + -0.9750247570452676278555L) * n + 1.L) * n + + -0.7609560415582671746756L) * n + 0.4263001806263693841532L) * n + + -0.1713187532519847597308L) * n + 0.04683503609299611246606L) * n + + -0.007813155642088655398714L) * n + + 0.0006010119724683581075934L) / + ((((((((((((((((((8.048975132446690337892e-12L * n + + 8.048975132446690337892e-12L) * n + + -2.028341733376565965149e-9L) * n + + -2.028341733376565965149e-9L) * n + + 2.106094833156000993813e-7L) * n + + 2.106094833156000993813e-7L) * n + + -0.00001165250129924307360217L) * n + + -0.00001165250129924307360217L) * n + + 0.0003709101756467390145095L) * n + + 0.0003709101756467390145095L) * n + + -0.006840491896548377897518L) * n + + -0.006840491896548377897518L) * n + + 0.06986173942046470517805L) * n + 0.06986173942046470517805L) * n + + -0.3512559539753502323735L) * n + -0.3512559539753502323735L) * n + + 0.641176671327586215364L) * n + 0.641176671327586215364L) * n + 0); + a6 = + temp0 * sum0 + temp2 * sum2 + temp4 * sum4 + temp6 * sum6 + temp8 * sum8; + temp1 = + (((((((((((((-0.00003463502914186507936508L * n + + 0.0002424452039930555555556L) * n + + 0.0009005107576884920634921L) * n + + -0.01018269856770833333333L) * n + + 0.01585591634114583333333L) * n + + 0.06356913248697916666667L) * n + + -0.2757937891953656462585L) * n + 0.3764689127604166666667L) * n + + -0.02229803176153273809524L) * n + -0.5844938247922867063492L) * n + + 0.8224988180493551587302L) * n + -0.5482725113157242063492L) * n + + 0.1884630475725446428571L) * n + + -0.02692329251036352040816L) / + ((((((((((((((3.936759889140841521794e-8L * n + + 3.936759889140841521794e-8L) * n + + -5.472096245905769715294e-6L) * n + + -5.472096245905769715294e-6L) * n + + 0.000288288926681783824641L) * n + + 0.000288288926681783824641L) * n + + -0.007255330372889896699421L) * n + + -0.007255330372889896699421L) * n + + 0.09019809775762156714538L) * n + 0.09019809775762156714538L) * n + + -0.5117970521541950113379L) * n + -0.5117970521541950113379L) * n + + 1.L) * n + 1.L) * n + 0); + temp3 = + (((((((((((((0.00006794678407870955467678L * n + + -0.000611521056708385992091L) * n + + 0.0004076807044722573280607L) * n + + 0.01263810183863997716988L) * n + + -0.05553064173472669538551L) * n + + 0.07904928859717069591096L) * n + + 0.0833299359941293978556L) * n + -0.5260168236237378884857L) * n + + 1.L) * n + -1.097299794800712082297L) * n + + 0.7620639515131748814329L) * n + -0.3324228464266786253007L) * n + + 0.08361531248725997798524L) * n + + -0.009290590276362219776138L) / + ((((((((((((((8.581234431814923840236e-9L * n + + 8.581234431814923840236e-9L) * n + + -1.192791586022274413793e-6L) * n + + -1.192791586022274413793e-6L) * n + + 0.00006284037974418068728205L) * n + + 0.00006284037974418068728205L) * n + + -0.001581495762080195018984L) * n + + -0.001581495762080195018984L) * n + + 0.01966111838054798994458L) * n + 0.01966111838054798994458L) * n + + -0.1115600293063703720477L) * n + -0.1115600293063703720477L) * n + + 0.2179770845431899694201L) * n + 0.2179770845431899694201L) * n + 0); + temp5 = + (((((((((((((-0.0001548706829797119405297L * n + + 0.001703577512776831345826L) * n + + -0.006298074441174952248206L) * n + + 0.001135718341851220897217L) * n + + 0.07098239636570130607609L) * n + + -0.2947189097103918228279L) * n + + 0.6609880749574105621806L) * n + -0.9744463373083475298126L) * n + + 1.L) * n + -0.7240204429301533219761L) * n + + 0.3645655877342419080068L) * n + -0.1219348510660265345104L) * n + + 0.02441794434980124929018L) * n + + -0.002219813122709204480925L) / + ((((((((((((((8.890524703760046188512e-9L * n + + 8.890524703760046188512e-9L) * n + + -1.235782933822646420203e-6L) * n + + -1.235782933822646420203e-6L) * n + + 0.00006510531240563481823848L) * n + + 0.00006510531240563481823848L) * n + + -0.001638497031328865232404L) * n + + -0.001638497031328865232404L) * n + + 0.02036975682866212758601L) * n + 0.02036975682866212758601L) * n + + -0.1155809463523431451121L) * n + -0.1155809463523431451121L) * n + + 0.2258335523150311892621L) * n + 0.2258335523150311892621L) * n + 0); + temp7 = + (((((((((((((0.0004245265000531462585034L * n + + -0.005518844500690901360544L) * n + + 0.03311306700414540816327L) * n + + -0.121414579015199829932L) * n + + 0.3035364475379995748299L) * n + + -0.5463656055683992346939L) * n + + 0.7284874740911989795918L) * n + -0.7284874740911989795918L) * n + + 0.5463656055683992346939L) * n + -0.3035364475379995748299L) * n + + 0.121414579015199829932L) * n + -0.03311306700414540816327L) * n + + 0.005518844500690901360544L) * n + + -0.0004245265000531462585034L) / + ((((((((((((((3.936759889140841521794e-8L * n + + 3.936759889140841521794e-8L) * n + + -5.472096245905769715294e-6L) * n + + -5.472096245905769715294e-6L) * n + + 0.000288288926681783824641L) * n + + 0.000288288926681783824641L) * n + + -0.007255330372889896699421L) * n + + -0.007255330372889896699421L) * n + + 0.09019809775762156714538L) * n + 0.09019809775762156714538L) * n + + -0.5117970521541950113379L) * n + -0.5117970521541950113379L) * n + + 1.L) * n + 1.L) * n + 0); + a7 = temp1 * sum1 + temp3 * sum3 + temp5 * sum5 + temp7 * sum7; + temp0 = + ((((((((0.001584831625223159790039L * n + + -0.01267865300178527832031L) * n + + 0.04437528550624847412109L) * n + + -0.08875057101249694824219L) * n + 0.1109382137656211853027L) * n + + -0.08875057101249694824219L) * n + 0.04437528550624847412109L) * n + + -0.01267865300178527832031L) * n + + 0.001584831625223159790039L) / + (((((((((6.781684027777777777778e-6L * n + 0) * n + + -0.0008138020833333333333333L) * n + 0) * n + + 0.02962239583333333333333L) * n + 0) * n + + -0.3559027777777777777778L) * n + 0) * n + 1.L) * n + 0); + temp2 = + (((((((((((((((((-8.336141647134544276625e-8L * n + + 7.502527482421089848962e-7L) * n + + 6.168744818879562764702e-6L) * n + + -0.00007552544332303897114622L) * n + + -2.345234516727185123157e-6L) * n + + 0.002137820197690948148829L) * n + + -0.006691636845919472080946L) * n + + -0.007860872012529084341704L) * n + + 0.08620809293177708186115L) * n + + -0.1937384007253249853951L) * n + + 0.1213772567378385216418L) * n + 0.2955045174480470177062L) * n + + -0.8225621414622500373987L) * n + 1.L) * n + + -0.7227062444527046169362L) * n + 0.3204463358237717934192L) * n + + -0.08104915417354655714389L) * n + + 0.009005461574838506349321L) / + ((((((((((((((((((9.908707468758719379982e-12L * n + + 9.908707468758719379982e-12L) * n + + -2.496994282127197283756e-9L) * n + + -2.496994282127197283756e-9L) * n + + 2.592712396275406512966e-7L) * n + + 2.592712396275406512966e-7L) * n + + -0.0000143448358025219980464L) * n + + -0.0000143448358025219980464L) * n + + 0.0004566097381583372722974L) * n + + 0.0004566097381583372722974L) * n + + -0.00842100168406270449132L) * n + + -0.00842100168406270449132L) * n + + 0.08600343867202510407327L) * n + 0.08600343867202510407327L) * n + + -0.4324143679573697203116L) * n + -0.4324143679573697203116L) * n + + 0.7893218661300897807312L) * n + 0.7893218661300897807312L) * n + 0); + temp4 = + (((((((((((((((((1.98314118458046912659e-7L * n + + -2.181455303038516039249e-6L) * n + + -6.610470615268230421967e-6L) * n + + 0.0001599733888894911762116L) * n + + -0.0004653771313148834217065L) * n + + -0.001960401165663946413939L) * n + + 0.01563534951805702932325L) * n + + -0.03617434613852003197352L) * n + + -0.001214343452024773928515L) * n + + 0.2136735469326226460445L) * n + + -0.6185821915508137621537L) * n + 1.L) * n + + -1.070617542232313619764L) * n + 0.7918021702968286399433L) * n + + -0.4030311387540426333048L) * n + 0.1354974603893990262512L) * n + + -0.02718602313823366638647L) * n + + 0.002471456648930333307861L) / + ((((((((((((((((((4.285908211833905339403e-12L * n + + 4.285908211833905339403e-12L) * n + + -1.080048869382144145529e-9L) * n + + -1.080048869382144145529e-9L) * n + + 1.121450742708459671108e-7L) * n + + 1.121450742708459671108e-7L) * n + + -6.204709318271944759853e-6L) * n + + -6.204709318271944759853e-6L) * n + + 0.0001975017864384790614921L) * n + + 0.0001975017864384790614921L) * n + + -0.00364241656980844872836L) * n + + -0.00364241656980844872836L) * n + + 0.0371998916319366889949L) * n + 0.0371998916319366889949L) * n + + -0.187036331064037699915L) * n + -0.187036331064037699915L) * n + + 0.3414129520417463272704L) * n + 0.3414129520417463272704L) * n + 0); + temp6 = + (((((((((((((((((-6.455552872914695033227e-7L * n + + 8.392218734789103543195e-6L) * n + + -6.455552872914695033227e-6L) * n + + -0.000386042061800298762987L) * n + + 0.002361441240912195443154L) * n + + -0.003910773930411722251129L) * n + + -0.01659980865741284680844L) * n + + 0.1165007804763423353866L) * n + + -0.3552258346061531747763L) * n + + 0.6986354252337232917639L) * n + + -0.9750247570452676278555L) * n + 1.L) * n + + -0.7609560415582671746756L) * n + 0.4263001806263693841532L) * n + + -0.1713187532519847597308L) * n + 0.04683503609299611246606L) * n + + -0.007813155642088655398714L) * n + + 0.0006010119724683581075934L) / + ((((((((((((((((((8.048975132446690337892e-12L * n + + 8.048975132446690337892e-12L) * n + + -2.028341733376565965149e-9L) * n + + -2.028341733376565965149e-9L) * n + + 2.106094833156000993813e-7L) * n + + 2.106094833156000993813e-7L) * n + + -0.00001165250129924307360217L) * n + + -0.00001165250129924307360217L) * n + + 0.0003709101756467390145095L) * n + + 0.0003709101756467390145095L) * n + + -0.006840491896548377897518L) * n + + -0.006840491896548377897518L) * n + + 0.06986173942046470517805L) * n + 0.06986173942046470517805L) * n + + -0.3512559539753502323735L) * n + -0.3512559539753502323735L) * n + + 0.641176671327586215364L) * n + 0.641176671327586215364L) * n + 0); + temp8 = + (((((((((((((((0.00005011027123405687567765L * n + + -0.0007516540685108531351648L) * n + + 0.005261578479575971946153L) * n + + -0.02280017341149587843333L) * n + + 0.06840052023448763529999L) * n + + -0.15048114451587279766L) * n + + 0.2508019075264546627666L) * n + + -0.3224595953911559949857L) * n + + 0.3224595953911559949857L) * n + -0.2508019075264546627666L) * n + + 0.15048114451587279766L) * n + -0.06840052023448763529999L) * n + + 0.02280017341149587843333L) * n + -0.005261578479575971946153L) * n + + 0.0007516540685108531351648L) * n + + -0.00005011027123405687567765L) / + ((((((((((((((((1.166274201402604273497e-9L * n + + 1.166274201402604273497e-9L) * n + + -2.3675366288472866752e-7L) * n + + -2.3675366288472866752e-7L) * n + + 0.00001891580127254883871185L) * n + + 0.00001891580127254883871185L) * n + + -0.0007615408990156571098613L) * n + + -0.0007615408990156571098613L) * n + + 0.01642835299541014187567L) * n + + 0.01642835299541014187567L) * n + + -0.1861790311885233542957L) * n + -0.1861790311885233542957L) * n + + 1.L) * n + 1.L) * n + -1.896014768278297133675L) * n + + -1.896014768278297133675L) * n + 0); + a8 = + temp0 * sum0 + temp2 * sum2 + temp4 * sum4 + temp6 * sum6 + temp8 * sum8; + for (i = 0; i < nn; i++) + { + z = n1 * i - 1.L; + y[i] = + x[i] - + ((((((((a8 * z + a7) * z + a6) * z + a5) * z + a4) * z + a3) * z + + a2) * z + a1) * z + a0); + } + a[0] = a0; + a[1] = a1; + a[2] = a2; + a[3] = a3; + a[4] = a4; + a[5] = a5; + a[6] = a6; + a[7] = a7; + a[8] = a8; +} + +void +polyreg9 (double *x, int nn, double *y, double *a) +{ + +/* +polynominal detrending of a time series, order 9 +machine-generated file, do not edit! +made by polyregz.m (Mathematica ) +Gerhard Heinzel AEI 17.01.2008 + +x[]: input, read-only: time series to be detrended +nn: input, read-only: length of x[] +y[]: output: time series with trend subtracted +a[]: fitting coefficients in for z^0, z^1, z^2,... with + z = 2*i/(nn-1)-1 ; i=0,...,nn-1 +*/ + + long double n = nn, n1 = 2.L / (n - 1), z; + long double a0, temp0, sum0 = 0; + long double a1, temp1, sum1 = 0; + long double a2, temp2, sum2 = 0; + long double a3, temp3, sum3 = 0; + long double a4, temp4, sum4 = 0; + long double a5, temp5, sum5 = 0; + long double a6, temp6, sum6 = 0; + long double a7, temp7, sum7 = 0; + long double a8, temp8, sum8 = 0; + long double a9, temp9, sum9 = 0; + int i; + for (i = 0; i < nn; i++) + { + z = n1 * i - 1.L; + sum0 += x[i]; + sum1 += x[i] * z; + sum2 += x[i] * z * z; + sum3 += x[i] * z * z * z; + sum4 += x[i] * z * z * z * z; + sum5 += x[i] * z * z * z * z * z; + sum6 += x[i] * z * z * z * z * z * z; + sum7 += x[i] * z * z * z * z * z * z * z; + sum8 += x[i] * z * z * z * z * z * z * z * z; + sum9 += x[i] * z * z * z * z * z * z * z * z * z; +/* the above code is efficiently optimized by GCC4 */ + + } + temp0 = + ((((((((0.00002402547524106132193656L * n + 0) * n + + -0.002530683392058459243985L) * n + 0) * n + + 0.07643624863026189369711L) * n + 0) * n + + -0.6802962043638957971664L) * n + 0) * n + + 1.L) / + (((((((((3.967078723603413440248e-6L * n + 0) * n + + -0.0004760494468324096128298L) * n + 0) * n + + 0.01732819986469970990701L) * n + 0) * n + + -0.2081922914147071373442L) * n + 0) * n + + 0.5849695602676649322453L) * n + 0); + temp2 = + ((((((((-0.0001859213287177625696098L * n + + 0.0003718426574355251392197L) * n + + 0.01413002098254995529035L) * n + + -0.02863188462253543571991L) * n + -0.2547122203433347203655L) * n + + 0.5380563253092048764509L) * n + 0.7309718373453975617746L) * n + + -2.L) * n + + 1.L) / + (((((((((2.093132034434014938836e-6L * n + 0) * n + + -0.0002511758441320817926603L) * n + 0) * n + + 0.009142800726407777252834L) * n + 0) * n + + -0.1098475691670971039901L) * n + 0) * n + + 0.3086448772695021068209L) * n + 0); + temp4 = + ((((((((0.0003900156006240249609984L * n + + -0.001560062402496099843994L) * n + + -0.01716068642745709828393L) * n + + 0.07644305772230889235569L) * n + 0.05330213208528341133645L) * n + + -0.6016640665626625065003L) * n + 1.L) * n + + -0.6796671866874674986999L) * n + + 0.169916796671866874675L) / + (((((((((1.125861017399536083141e-6L * n + 0) * n + + -0.0001351033220879443299769L) * n + 0) * n + + 0.004917760924001173611158L) * n + 0) * n + + -0.05908518619312765364322L) * n + 0) * n + + 0.1660149621816659926756L) * n + 0); + temp6 = + ((((((((-0.002747252747252747252747L * n + + 0.01648351648351648351648L) * n + + 0.02564102564102564102564L) * n + -0.3461538461538461538462L) * n + + 0.9615384615384615384615L) * n + -1.320512820512820512821L) * n + + 1.L) * n + -0.4010989010989010989011L) * n + + 0.06684981684981684981685L) / + (((((((((5.551360862716174071485e-6L * n + 0) * n + + -0.0006661633035259408885783L) * n + 0) * n + + 0.02424834424834424834425L) * n + 0) * n + + -0.2913354180753448152716L) * n + 0) * n + + 0.818581467372676163885L) * n + 0); + temp8 = + ((((((((0.001584831625223159790039L * n + + -0.01267865300178527832031L) * n + + 0.04437528550624847412109L) * n + + -0.08875057101249694824219L) * n + 0.1109382137656211853027L) * n + + -0.08875057101249694824219L) * n + 0.04437528550624847412109L) * n + + -0.01267865300178527832031L) * n + + 0.001584831625223159790039L) / + (((((((((6.781684027777777777778e-6L * n + 0) * n + + -0.0008138020833333333333333L) * n + 0) * n + + 0.02962239583333333333333L) * n + 0) * n + + -0.3559027777777777777778L) * n + 0) * n + 1.L) * n + 0); + a0 = + temp0 * sum0 + temp2 * sum2 + temp4 * sum4 + temp6 * sum6 + temp8 * sum8; + temp1 = + (((((((((((((((((((2.655291552689262283907e-12L * n + + -2.655291552689262283907e-12L) * n + + -7.859662995960216360365e-10L) * n + + 7.859662995960216360365e-10L) * n + + 9.589142893945155861284e-8L) * n + + -9.589142893945155861284e-8L) * n + + -6.229869317870886043758e-6L) * n + + 6.229869317870886043758e-6L) * n + + 0.000232760850361211808505L) * n + + -0.000232760850361211808505L) * n + + -0.0050497738497004110997L) * n + + 0.0050497738497004110997L) * n + + 0.06129071553991380198028L) * n + + -0.06129071553991380198028L) * n + + -0.3806583458291565161388L) * n + 0.3806583458291565161388L) * n + + 1.L) * n + -1.L) * n + -0.9692940806392735152991L) * n + + 0.9692940806392735152991L) / + ((((((((((((((((((((1.08704351615751512052e-14L * n + + 1.08704351615751512052e-14L) * n + + -3.782911436228152619408e-12L) * n + + -3.782911436228152619408e-12L) * n + + 5.526311827441575369698e-10L) * n + + 5.526311827441575369698e-10L) * n + + -4.410218160358266815097e-8L) * n + + -4.410218160358266815097e-8L) * n + + 2.09631977611259418569e-6L) * n + + 2.09631977611259418569e-6L) * n + + -0.00006073446596403159727594L) * n + + -0.00006073446596403159727594L) * n + + 0.001054729948761179883762L) * n + + 0.001054729948761179883762L) * n + + -0.01036501269461093932389L) * n + + -0.01036501269461093932389L) * n + 0.05088070980118913424413L) * n + + 0.05088070980118913424413L) * n + -0.09161212768182950391467L) * n + + -0.09161212768182950391467L) * n + 0); + temp3 = + (((((((((((((((((((-1.449164894319203640895e-11L * n + + 4.347494682957610922685e-11L) * n + + 3.758167625934468108721e-9L) * n + + -1.139043606934894061743e-8L) * n + + -3.926753808640268798945e-7L) * n + + 1.208439283174192993427e-6L) * n + + 0.0000211078333507190359717L) * n + + -0.00006655614252081566001549L) * n + + -0.0006176111379085936924572L) * n + + 0.002031394007937509021446L) * n + + 0.009526377872902801706509L) * n + + -0.03405570450461233849141L) * n + + -0.06625374200602241887988L) * n + + 0.2914019616590014704073L) * n + 0.08938317799564637662579L) * n + + -1.07610167695792112222L) * n + 0.7129739509593723300109L) * n + + 1.L) * n + -1.392365231609764623754L) * n + + 0.4641217438699215412514L) / + ((((((((((((((((((((5.704520978907055535235e-15L * n + + 5.704520978907055535235e-15L) * n + + -1.985173300659655326262e-12L) * n + + -1.985173300659655326262e-12L) * n + + 2.900064375256768893003e-10L) * n + + 2.900064375256768893003e-10L) * n + + -2.314367515502032124267e-8L) * n + + -2.314367515502032124267e-8L) * n + + 1.100093967130495348142e-6L) * n + + 1.100093967130495348142e-6L) * n + + -0.00003187186438121689399375L) * n + + -0.00003187186438121689399375L) * n + + 0.0005534947801406946092437L) * n + + 0.0005534947801406946092437L) * n + + -0.005439288444684338773957L) * n + + -0.005439288444684338773957L) * n + + 0.02670087003586959875545L) * n + 0.02670087003586959875545L) * n + + -0.04807565626540950492197L) * n + -0.04807565626540950492197L) * n + + 0); + temp5 = + (((((((((((((((((((5.714462590525686107484e-11L * n + + -2.857231295262843053742e-10L) * n + + -1.257181769915650943646e-8L) * n + + 6.514487353199282162531e-8L) * n + + 1.062737656168696931029e-6L) * n + + -5.838047368150121612368e-6L) * n + + -0.00004248547164038565142952L) * n + + 0.0002598673027717816963623L) * n + + 0.000763647373426254953019L) * n + + -0.005963927679260653303292L) * n + + -0.002974413170786850658476L) * n + + 0.06561801787005971396473L) * n + + -0.06790987685850609413593L) * n + + -0.2578306716773211508194L) * n + 0.6405140719610564024352L) * n + + -0.2702805506265212817876L) * n + -0.6690543956200478716487L) * n + + 1.L) * n + -0.5413682005474940160439L) * n + + 0.1082736401094988032088L) / + ((((((((((((((((((((6.99829576208847951039e-15L * n + + 6.99829576208847951039e-15L) * n + + -2.435406925206790869616e-12L) * n + + -2.435406925206790869616e-12L) * n + + 3.557793599530541213492e-10L) * n + + 3.557793599530541213492e-10L) * n + + -2.839261777727088009809e-8L) * n + + -2.839261777727088009809e-8L) * n + + 1.349593239561278488333e-6L) * n + + 1.349593239561278488333e-6L) * n + + -0.00003910034413996728841782L) * n + + -0.00003910034413996728841782L) * n + + 0.0006790263702279969364801L) * n + + 0.0006790263702279969364801L) * n + + -0.006672908980782530837924L) * n + + -0.006672908980782530837924L) * n + + 0.03275657786289754364661L) * n + 0.03275657786289754364661L) * n + + -0.05897912598549137167L) * n + -0.05897912598549137167L) * n + 0); + temp7 = + (((((((((((((((((((-6.062531955892827184005e-10L * n + + 4.243772369124979028803e-9L) * n + + 1.079130688148923238753e-7L) * n + + -8.232918396102459315879e-7L) * n + + -6.558447069884860447656e-6L) * n + + 0.00005928549999667595703238L) * n + + 0.0001340385975952193937519L) * n + + -0.001927200095862903155042L) * n + + 0.001065282133009676623514L) * n + + 0.02639126618461293151243L) * n + + -0.06551456156428281940877L) * n + + -0.0686707808294353514037L) * n + + 0.5129055986621819740122L) * n + -0.7879520176484434686378L) * n + + 0.1720729014919064993562L) * n + 0.9842650834524745649782L) * n + + -1.476943604508380444958L) * n + 1.L) * n + + -0.3451910247182262221901L) * n + + 0.04931300353117517459859L) / + ((((((((((((((((((((5.895977080872073890621e-14L * n + + 5.895977080872073890621e-14L) * n + + -2.051800024143481713936e-11L) * n + + -2.051800024143481713936e-11L) * n + + 2.997396828373744924514e-9L) * n + + 2.997396828373744924514e-9L) * n + + -2.392042711135615005187e-7L) * n + + -2.392042711135615005187e-7L) * n + + 0.0000113701550769819974843L) * n + + 0.0000113701550769819974843L) * n + + -0.0003294155330678108902593L) * n + + -0.0003294155330678108902593L) * n + + 0.00572071265958794854203L) * n + + 0.00572071265958794854203L) * n + + -0.05621842767287978773751L) * n + + -0.05621842767287978773751L) * n + 0.275970091709598834999L) * n + + 0.275970091709598834999L) * n + -0.4968917960628586841432L) * n + + -0.4968917960628586841432L) * n + 0); + temp9 = + (((((((((((((((((((9.48621464808249608894e-10L * n + + -8.537593183274246480046e-9L) * n + + -1.264828619744332811859e-7L) * n + + 1.366014909323879436807e-6L) * n + + 3.749710926094049054036e-6L) * n + + -0.00007134316422812698998601L) * n + + 0.00009869392671536013508103L) * n + + 0.001209634823471062027338L) * n + + -0.004989351983601536889084L) * n + + 0.001473683499786556613603L) * n + + 0.03384931128653701151254L) * n + + -0.09759459492160789457305L) * n + + 0.112213008424637987651L) * n + + -0.001403545518474262870105L) * n + + -0.1726586244666029654872L) * n + 0.2553101393034701097327L) * n + + -0.1964387156176969902114L) * n + 0.08921252223762199711287L) * n + + -0.02274277441953378689267L) * n + + 0.002526974935503754099185L) / + ((((((((((((((((((((2.136455093502075714739e-13L * n + + 2.136455093502075714739e-13L) * n + + -7.43486372538722348729e-11L) * n + + -7.43486372538722348729e-11L) * n + + 1.086131040434585251859e-8L) * n + + 1.086131040434585251859e-8L) * n + + -8.667760684925027332449e-7L) * n + + -8.667760684925027332449e-7L) * n + + 0.00004120067869146748907533L) * n + + 0.00004120067869146748907533L) * n + + -0.001193663889543698359902L) * n + + -0.001193663889543698359902L) * n + + 0.02072946609594132992549L) * n + + 0.02072946609594132992549L) * n + + -0.2037120302588368838511L) * n + -0.2037120302588368838511L) * n + + 1.L) * n + 1.L) * n + -1.800527705682447746874L) * n + + -1.800527705682447746874L) * n + 0); + a1 = + temp1 * sum1 + temp3 * sum3 + temp5 * sum5 + temp7 * sum7 + temp9 * sum9; + temp0 = + ((((((((-0.0001859213287177625696098L * n + + 0.0003718426574355251392197L) * n + + 0.01413002098254995529035L) * n + + -0.02863188462253543571991L) * n + -0.2547122203433347203655L) * n + + 0.5380563253092048764509L) * n + 0.7309718373453975617746L) * n + + -2.L) * n + + 1.L) / + (((((((((2.093132034434014938836e-6L * n + 0) * n + + -0.0002511758441320817926603L) * n + 0) * n + + 0.009142800726407777252834L) * n + 0) * n + + -0.1098475691670971039901L) * n + 0) * n + + 0.3086448772695021068209L) * n + 0); + temp2 = + (((((((((((((((2.907035769636459306965e-8L * n + + -8.721107308909377920894e-8L) * n + + -3.808216858223761692124e-6L) * n + + 0.00001165721343624220182093L) * n + + 0.0001822033119215811478295L) * n + + -0.0005777733592152462872592L) * n + + -0.003840198404598005082299L) * n + + 0.01307171197951817296085L) * n + + 0.03386432961953086642377L) * n + + -0.1369679263925491130715L) * n + + -0.06637878548524752764394L) * n + 0.5761758060138590557227L) * n + + -0.2899724038752902814882L) * n + -0.7922314209304587950595L) * n + + 1.L) * n + + -0.3333333333333333333333L) / + ((((((((((((((((1.239692171397643443435e-11L * n + + 1.239692171397643443435e-11L) * n + + -2.516575107937216190174e-9L) * n + + -2.516575107937216190174e-9L) * n + + 2.010656732789837900908e-7L) * n + + 2.010656732789837900908e-7L) * n + + -8.094805574653478416165e-6L) * n + + -8.094805574653478416165e-6L) * n + + 0.0001746253202966674271062L) * n + + 0.0001746253202966674271062L) * n + + -0.001978991622769635885772L) * n + + -0.001978991622769635885772L) * n + + 0.01062950865162535549051L) * n + 0.01062950865162535549051L) * n + + -0.02015370538302360300337L) * n + -0.02015370538302360300337L) * n + + 0); + temp4 = + (((((((((((((((-1.372930416088071838676e-7L * n + + 6.864652080440359193378e-7L) * n + + 0.00001350048242486603974698L) * n + + -0.00007299413378868248608958L) * n + + -0.0004266610089729697917324L) * n + + 0.002724946525504402049675L) * n + + 0.003772767019062818476952L) * n + + -0.04149522007410986857349L) * n + + 0.02758553116229405872142L) * n + 0.2260988031204511669016L) * n + + -0.460732592924163762957L) * n + -0.029477044855146917055L) * n + + 1.L) * n + -1.25598316897144309311L) * n + + 0.6599894806071519331936L) * n + + -0.1319978961214303866387L) / + ((((((((((((((((1.261033687815381532321e-11L * n + + 1.261033687815381532321e-11L) * n + + -2.559898386265224510611e-9L) * n + + -2.559898386265224510611e-9L) * n + + 2.045270538267767307271e-7L) * n + + 2.045270538267767307271e-7L) * n + + -8.234159060991218637779e-6L) * n + + -8.234159060991218637779e-6L) * n + + 0.0001776315255676602229447L) * n + + 0.0001776315255676602229447L) * n + + -0.002013060307869331605098L) * n + + -0.002013060307869331605098L) * n + + 0.01081249749243201995992L) * n + 0.01081249749243201995992L) * n + + -0.02050065492762316514009L) * n + -0.02050065492762316514009L) * n + + 0); + temp6 = + (((((((((((((((5.801019239080306409836e-7L * n + + -4.060713467356214486885e-6L) * n + + -0.00003654642120620593038197L) * n + + 0.0003207963639211409444639L) * n + + 0.0003300779947036694347197L) * n + + -0.007638202032097039449831L) * n + + 0.01295906262158832735483L) * n + + 0.04770352150872908370001L) * n + + -0.2024604608744042042473L) * n + 0.2200784877903047565457L) * n + + 0.1986425614980552083001L) * n + -0.8146562751075363941445L) * n + + 1.L) * n + -0.6426689826545381166328L) * n + + 0.2186676799113604260269L) * n + + -0.03123823998733720371812L) / + ((((((((((((((((3.425286806018358993775e-11L * n + + 3.425286806018358993775e-11L) * n + + -6.953332216217268757364e-9L) * n + + -6.953332216217268757364e-9L) * n + + 5.555472670681176452004e-7L) * n + + 5.555472670681176452004e-7L) * n + + -0.00002236606100439001853806L) * n + + -0.00002236606100439001853806L) * n + + 0.0004824922020234691216437L) * n + + 0.0004824922020234691216437L) * n + + -0.005467981528875355193367L) * n + + -0.005467981528875355193367L) * n + + 0.02936948105256022151826L) * n + 0.02936948105256022151826L) * n + + -0.05568496981232380660242L) * n + -0.05568496981232380660242L) * n + + 0); + temp8 = + (((((((((((((((-4.878167760189272909095e-6L * n + + 0.00004390350984170345618186L) * n + + 0.0001219541940047318227274L) * n + + -0.002268348008488011902729L) * n + + 0.005838516386578534435799L) * n + + 0.01395253542769335837459L) * n + + -0.1054958599454806679373L) * n + + 0.223669427477325230929L) * n + -0.1245467311049398417383L) * n + + -0.3774384741091246127954L) * n + 1.L) * n + + -1.20206541622966413815L) * n + 0.8650679284860606356253L) * n + + -0.3829128004283495880852L) * n + 0.0967930228263407121428L) * n + + -0.01075478031403785690476L) / + ((((((((((((((((5.798406428933524525048e-10L * n + + 5.798406428933524525048e-10L) * n + + -1.177076505073505478585e-7L) * n + + -1.177076505073505478585e-7L) * n + + 9.404435387087283427175e-6L) * n + + 9.404435387087283427175e-6L) * n + + -0.0003786179647494294575596L) * n + + -0.0003786179647494294575596L) * n + + 0.008167741986474055022834L) * n + + 0.008167741986474055022834L) * n + + -0.09256328315226834511619L) * n + + -0.09256328315226834511619L) * n + 0.497173513909520383136L) * n + + 0.497173513909520383136L) * n + -0.9426483247692660260829L) * n + + -0.9426483247692660260829L) * n + 0); + a2 = + temp0 * sum0 + temp2 * sum2 + temp4 * sum4 + temp6 * sum6 + temp8 * sum8; + temp1 = + (((((((((((((((((((-1.449164894319203640895e-11L * n + + 4.347494682957610922685e-11L) * n + + 3.758167625934468108721e-9L) * n + + -1.139043606934894061743e-8L) * n + + -3.926753808640268798945e-7L) * n + + 1.208439283174192993427e-6L) * n + + 0.0000211078333507190359717L) * n + + -0.00006655614252081566001549L) * n + + -0.0006176111379085936924572L) * n + + 0.002031394007937509021446L) * n + + 0.009526377872902801706509L) * n + + -0.03405570450461233849141L) * n + + -0.06625374200602241887988L) * n + + 0.2914019616590014704073L) * n + 0.08938317799564637662579L) * n + + -1.07610167695792112222L) * n + 0.7129739509593723300109L) * n + + 1.L) * n + -1.392365231609764623754L) * n + + 0.4641217438699215412514L) / + ((((((((((((((((((((5.704520978907055535235e-15L * n + + 5.704520978907055535235e-15L) * n + + -1.985173300659655326262e-12L) * n + + -1.985173300659655326262e-12L) * n + + 2.900064375256768893003e-10L) * n + + 2.900064375256768893003e-10L) * n + + -2.314367515502032124267e-8L) * n + + -2.314367515502032124267e-8L) * n + + 1.100093967130495348142e-6L) * n + + 1.100093967130495348142e-6L) * n + + -0.00003187186438121689399375L) * n + + -0.00003187186438121689399375L) * n + + 0.0005534947801406946092437L) * n + + 0.0005534947801406946092437L) * n + + -0.005439288444684338773957L) * n + + -0.005439288444684338773957L) * n + + 0.02670087003586959875545L) * n + 0.02670087003586959875545L) * n + + -0.04807565626540950492197L) * n + -0.04807565626540950492197L) * n + + 0); + temp3 = + (((((((((((((((((((2.836148033634606484774e-11L * n + + -1.418074016817303242387e-10L) * n + + -6.239525673996134266502e-9L) * n + + 3.233208758343451392642e-8L) * n + + 5.303596822896714126527e-7L) * n + + -2.912043355014668554306e-6L) * n + + -0.0000214870734711940451376L) * n + + 0.0001310967831709770206692L) * n + + 0.0003985815391335633026088L) * n + + -0.003074974935572862597001L) * n + + -0.001873201075857982359171L) * n + + 0.03549594250129921368157L) * n + + -0.03239840273421355607501L) * n + + -0.1592591074446137831665L) * n + 0.3388168347620249254038L) * n + + 0.04688441654751067934778L) * n + -0.8056637146276147151216L) * n + + 1.L) * n + -0.5242920356715481606098L) * n + + 0.104858407134309632122L) / + ((((((((((((((((((((9.017293775197101392495e-16L * n + + 9.017293775197101392495e-16L) * n + + -3.138018233768591284588e-13L) * n + + -3.138018233768591284588e-13L) * n + + 4.584211809434702405917e-11L) * n + + 4.584211809434702405917e-11L) * n + + -3.658384616030155532906e-9L) * n + + -3.658384616030155532906e-9L) * n + + 1.738948900112253587181e-7L) * n + + 1.738948900112253587181e-7L) * n + + -5.03807357973353724621e-6L) * n + + -5.03807357973353724621e-6L) * n + + 0.00008749244772736408764224L) * n + + 0.00008749244772736408764224L) * n + + -0.0008598033387047124891328L) * n + + -0.0008598033387047124891328L) * n + + 0.004220680229892386672968L) * n + 0.004220680229892386672968L) * n + + -0.007599451690747405086417L) * n + -0.007599451690747405086417L) * n + + 0); + temp5 = + (((((((((((((((((((-1.544484504579271975016e-10L * n + + 1.081139153205490382511e-9L) * n + + 2.749182418151104115528e-8L) * n + + -2.097409957218651342071e-7L) * n + + -1.711597727974749202712e-6L) * n + + 0.00001538893470672695010466L) * n + + 0.0000383803075544088017844L) * n + + -0.0005251676682261797752662L) * n + + 0.0001621439548223151757794L) * n + + 0.008048974117287159012173L) * n + + -0.01706541316643963541452L) * n + + -0.03777673173267932911092L) * n + + 0.1824829793261294904678L) * n + -0.1682613518575436169289L) * n + + -0.3184802232918485395056L) * n + 1.L) * n + + -1.180678618204004883855L) * n + 0.7500654271032353015598L) * n + + -0.2543612107199151391915L) * n + + 0.03633731581713073417021L) / + ((((((((((((((((((((1.403016681566119086744e-15L * n + + 1.403016681566119086744e-15L) * n + + -4.882498051850094421868e-13L) * n + + -4.882498051850094421868e-13L) * n + + 7.132656205745836213188e-11L) * n + + 7.132656205745836213188e-11L) * n + + -5.69214530638154415997e-9L) * n + + -5.69214530638154415997e-9L) * n + + 2.705661339280495779104e-7L) * n + + 2.705661339280495779104e-7L) * n + + -7.838827758685483792833e-6L) * n + + -7.838827758685483792833e-6L) * n + + 0.0001361310463347528431249L) * n + + 0.0001361310463347528431249L) * n + + -0.001337783216497887408538L) * n + + -0.001337783216497887408538L) * n + + 0.006567030993692898597972L) * n + 0.006567030993692898597972L) * n + + -0.0118241212482193996927L) * n + -0.0118241212482193996927L) * n + 0); + temp7 = + (((((((((((((((((((8.385452957532784300517e-10L * n + + -7.546907661779505870465e-9L) * n + + -1.118060394337704573402e-7L) * n + + 1.207505225884720939274e-6L) * n + + 3.720457768198145738453e-6L) * n + + -0.00006671734707507724238589L) * n + + 0.00005945021006854372556268L) * n + + 0.001416799806677365553544L) * n + + -0.004733220347333422516943L) * n + + -0.005559357845406304604934L) * n + + 0.05962935852535036766177L) * n + + -0.1194847722938455945267L) * n + + 0.007776173804005795252536L) * n + + 0.3989103188407051958732L) * n + -0.8719573999915008115502L) * n + + 1.L) * n + -0.7071142695458509780452L) * n + + 0.3107833586915489591643L) * n + -0.07837259845042836204124L) * n + + 0.008708066494492040226805L) / + ((((((((((((((((((((5.750377545038217102977e-15L * n + + 5.750377545038217102977e-15L) * n + + -2.001131385673299551836e-12L) * n + + -2.001131385673299551836e-12L) * n + + 2.923376936346528810811e-10L) * n + + 2.923376936346528810811e-10L) * n + + -2.332971872891346969128e-8L) * n + + -2.332971872891346969128e-8L) * n + + 1.108937221794776839867e-6L) * n + + 1.108937221794776839867e-6L) * n + + -0.00003212807068883235036194L) * n + + -0.00003212807068883235036194L) * n + + 0.0005579441230535569227842L) * n + + 0.0005579441230535569227842L) * n + + -0.005483012903090646315445L) * n + + -0.005483012903090646315445L) * n + + 0.02691550860361030196016L) * n + 0.02691550860361030196016L) * n + + -0.04846211895333463990518L) * n + -0.04846211895333463990518L) * n + + 0); + temp9 = + (((((((((((((((((((-7.870922679053298103593e-9L * n + + 8.658014946958627913952e-8L) * n + + 6.76899350398583636909e-7L) * n + + -0.00001090909883316787117158L) * n + + 8.264468813005963008773e-6L) * n + + 0.0003724678030181601728582L) * n + + -0.001625899496258774666706L) * n + + -0.0007145995708078814961018L) * n + + 0.02366203551546066564074L) * n + + -0.07463578292916074163285L) * n + + 0.08249395396386228967415L) * n + + 0.1072365607182978849951L) * n + + -0.5460605326981549704932L) * n + 1.L) * n + + -1.125048757836057302629L) * n + 0.85174044739528384103L) * n + + -0.4385706793163458387505L) * n + 0.1482468800443970413004L) * n + + -0.02980362502930054038884L) * n + + 0.002709420457209140035349L) / + ((((((((((((((((((((1.208634663709582809809e-13L * n + + 1.208634663709582809809e-13L) * n + + -4.206048629709348178136e-11L) * n + + -4.206048629709348178136e-11L) * n + + 6.144456903366777088508e-9L) * n + + 6.144456903366777088508e-9L) * n + + -4.90352268690421938769e-7L) * n + + -4.90352268690421938769e-7L) * n + + 0.00002330803422282182508967L) * n + + 0.00002330803422282182508967L) * n + + -0.0006752791379087878688636L) * n + + -0.0006752791379087878688636L) * n + + 0.01172706665351817548763L) * n + + 0.01172706665351817548763L) * n + + -0.1152439018888493483997L) * n + -0.1152439018888493483997L) * n + + 0.5657196668376444567469L) * n + 0.5657196668376444567469L) * n + + -1.018593933790622693308L) * n + -1.018593933790622693308L) * n + 0); + a3 = + temp1 * sum1 + temp3 * sum3 + temp5 * sum5 + temp7 * sum7 + temp9 * sum9; + temp0 = + ((((((((0.0003900156006240249609984L * n + + -0.001560062402496099843994L) * n + + -0.01716068642745709828393L) * n + + 0.07644305772230889235569L) * n + 0.05330213208528341133645L) * n + + -0.6016640665626625065003L) * n + 1.L) * n + + -0.6796671866874674986999L) * n + + 0.169916796671866874675L) / + (((((((((1.125861017399536083141e-6L * n + 0) * n + + -0.0001351033220879443299769L) * n + 0) * n + + 0.004917760924001173611158L) * n + 0) * n + + -0.05908518619312765364322L) * n + 0) * n + + 0.1660149621816659926756L) * n + 0); + temp2 = + (((((((((((((((-1.372930416088071838676e-7L * n + + 6.864652080440359193378e-7L) * n + + 0.00001350048242486603974698L) * n + + -0.00007299413378868248608958L) * n + + -0.0004266610089729697917324L) * n + + 0.002724946525504402049675L) * n + + 0.003772767019062818476952L) * n + + -0.04149522007410986857349L) * n + + 0.02758553116229405872142L) * n + 0.2260988031204511669016L) * n + + -0.460732592924163762957L) * n + -0.029477044855146917055L) * n + + 1.L) * n + -1.25598316897144309311L) * n + + 0.6599894806071519331936L) * n + + -0.1319978961214303866387L) / + ((((((((((((((((1.261033687815381532321e-11L * n + + 1.261033687815381532321e-11L) * n + + -2.559898386265224510611e-9L) * n + + -2.559898386265224510611e-9L) * n + + 2.045270538267767307271e-7L) * n + + 2.045270538267767307271e-7L) * n + + -8.234159060991218637779e-6L) * n + + -8.234159060991218637779e-6L) * n + + 0.0001776315255676602229447L) * n + + 0.0001776315255676602229447L) * n + + -0.002013060307869331605098L) * n + + -0.002013060307869331605098L) * n + + 0.01081249749243201995992L) * n + 0.01081249749243201995992L) * n + + -0.02050065492762316514009L) * n + -0.02050065492762316514009L) * n + + 0); + temp4 = + (((((((((((((((3.077643719036980659164e-7L * n + + -2.154350603325886461415e-6L) * n + + -0.00001938915542993297815273L) * n + + 0.0001701936976627450304517L) * n + + 0.0002083564797788035906254L) * n + + -0.004285003350015188171753L) * n + + 0.00662462810522710086885L) * n + + 0.03078536235715501383555L) * n + + -0.1125669733743808934954L) * n + + 0.05404188488442986188458L) * n + 0.3580810768306055664111L) * n + + -0.8884212580238018809943L) * n + 1.L) * n + + -0.6256729652697139237834L) * n + 0.2112319223054998416552L) * n + + -0.03017598890078569166503L) / + ((((((((((((((((5.591490837135102783745e-12L * n + + 5.591490837135102783745e-12L) * n + + -1.1350726399384258651e-9L) * n + + -1.1350726399384258651e-9L) * n + + 9.068838988749423204956e-8L) * n + + 9.068838988749423204956e-8L) * n + + -3.651070180433270929599e-6L) * n + + -3.651070180433270929599e-6L) * n + + 0.00007876276876619909067074L) * n + + 0.00007876276876619909067074L) * n + + -0.0008926017103913915672379L) * n + + -0.0008926017103913915672379L) * n + + 0.00479431923505687610696L) * n + 0.00479431923505687610696L) * n + + -0.009090100073508545719781L) * n + -0.009090100073508545719781L) * n + + 0); + temp6 = + (((((((((((((((-1.523380075711989762886e-6L * n + + 0.00001371042068140790786597L) * n + + 0.00003808450189279974407215L) * n + + -0.0007083717352060752397419L) * n + + 0.001421110493295858183471L) * n + + 0.007976722752443120796423L) * n + + -0.04169684228699972833055L) * n + + 0.05209563780115319871731L) * n + + 0.1165742228857388774212L) * n + -0.5481928903851866521438L) * n + + 1.L) * n + -1.082406331167594659029L) * n + + 0.7475265639400702278215L) * n + -0.3253179167269671279969L) * n + + 0.08176255074759877215566L) * n + + -0.009084727860844308017295L) / + ((((((((((((((((1.691366506269828413014e-11L * n + + 1.691366506269828413014e-11L) * n + + -3.433474007727751678419e-9L) * n + + -3.433474007727751678419e-9L) * n + + 2.743227336519034703068e-7L) * n + + 2.743227336519034703068e-7L) * n + + -0.00001104409896232503589018L) * n + + -0.00001104409896232503589018L) * n + + 0.0002382489981875395667415L) * n + + 0.0002382489981875395667415L) * n + + -0.002700025235432006231466L) * n + + -0.002700025235432006231466L) * n + + 0.01450230575481931101869L) * n + 0.01450230575481931101869L) * n + + -0.02749658588522475098626L) * n + -0.02749658588522475098626L) * n + + 0); + temp8 = + (((((((((((((((9.007142664132657197157e-6L * n + + -0.00009907856930545922916873L) * n + + 0.0001411119017380782960888L) * n + + 0.002410911853099507909772L) * n + + -0.01422227826666546571431L) * n + + 0.02909607318603652696588L) * n + + 0.01324350209716305029889L) * n + + -0.217279302486872089567L) * n + 0.5937778658476171604082L) * n + + -0.9419399583870008917071L) * n + 1.L) * n + + -0.7364930389799110694781L) * n + 0.3740876515076455629314L) * n + + -0.1256406330219864352431L) * n + 0.02519898279335513061858L) * n + + -0.002290816617577739147144L) / + ((((((((((((((((1.946598003688388663139e-10L * n + + 1.946598003688388663139e-10L) * n + + -3.951593947487428986172e-8L) * n + + -3.951593947487428986172e-8L) * n + + 3.157187302182197572745e-6L) * n + + 3.157187302182197572745e-6L) * n + + -0.0001271068151870403456981L) * n + + -0.0001271068151870403456981L) * n + + 0.002742013765398732137249L) * n + + 0.002742013765398732137249L) * n + + -0.03107465894421426093871L) * n + + -0.03107465894421426093871L) * n + 0.1669074049093547871587L) * n + + 0.1669074049093547871587L) * n + -0.3164589046431422301798L) * n + + -0.3164589046431422301798L) * n + 0); + a4 = + temp0 * sum0 + temp2 * sum2 + temp4 * sum4 + temp6 * sum6 + temp8 * sum8; + temp1 = + (((((((((((((((((((5.714462590525686107484e-11L * n + + -2.857231295262843053742e-10L) * n + + -1.257181769915650943646e-8L) * n + + 6.514487353199282162531e-8L) * n + + 1.062737656168696931029e-6L) * n + + -5.838047368150121612368e-6L) * n + + -0.00004248547164038565142952L) * n + + 0.0002598673027717816963623L) * n + + 0.000763647373426254953019L) * n + + -0.005963927679260653303292L) * n + + -0.002974413170786850658476L) * n + + 0.06561801787005971396473L) * n + + -0.06790987685850609413593L) * n + + -0.2578306716773211508194L) * n + 0.6405140719610564024352L) * n + + -0.2702805506265212817876L) * n + -0.6690543956200478716487L) * n + + 1.L) * n + -0.5413682005474940160439L) * n + + 0.1082736401094988032088L) / + ((((((((((((((((((((6.99829576208847951039e-15L * n + + 6.99829576208847951039e-15L) * n + + -2.435406925206790869616e-12L) * n + + -2.435406925206790869616e-12L) * n + + 3.557793599530541213492e-10L) * n + + 3.557793599530541213492e-10L) * n + + -2.839261777727088009809e-8L) * n + + -2.839261777727088009809e-8L) * n + + 1.349593239561278488333e-6L) * n + + 1.349593239561278488333e-6L) * n + + -0.00003910034413996728841782L) * n + + -0.00003910034413996728841782L) * n + + 0.0006790263702279969364801L) * n + + 0.0006790263702279969364801L) * n + + -0.006672908980782530837924L) * n + + -0.006672908980782530837924L) * n + + 0.03275657786289754364661L) * n + 0.03275657786289754364661L) * n + + -0.05897912598549137167L) * n + -0.05897912598549137167L) * n + 0); + temp3 = + (((((((((((((((((((-1.544484504579271975016e-10L * n + + 1.081139153205490382511e-9L) * n + + 2.749182418151104115528e-8L) * n + + -2.097409957218651342071e-7L) * n + + -1.711597727974749202712e-6L) * n + + 0.00001538893470672695010466L) * n + + 0.0000383803075544088017844L) * n + + -0.0005251676682261797752662L) * n + + 0.0001621439548223151757794L) * n + + 0.008048974117287159012173L) * n + + -0.01706541316643963541452L) * n + + -0.03777673173267932911092L) * n + + 0.1824829793261294904678L) * n + -0.1682613518575436169289L) * n + + -0.3184802232918485395056L) * n + 1.L) * n + + -1.180678618204004883855L) * n + 0.7500654271032353015598L) * n + + -0.2543612107199151391915L) * n + + 0.03633731581713073417021L) / + ((((((((((((((((((((1.403016681566119086744e-15L * n + + 1.403016681566119086744e-15L) * n + + -4.882498051850094421868e-13L) * n + + -4.882498051850094421868e-13L) * n + + 7.132656205745836213188e-11L) * n + + 7.132656205745836213188e-11L) * n + + -5.69214530638154415997e-9L) * n + + -5.69214530638154415997e-9L) * n + + 2.705661339280495779104e-7L) * n + + 2.705661339280495779104e-7L) * n + + -7.838827758685483792833e-6L) * n + + -7.838827758685483792833e-6L) * n + + 0.0001361310463347528431249L) * n + + 0.0001361310463347528431249L) * n + + -0.001337783216497887408538L) * n + + -0.001337783216497887408538L) * n + + 0.006567030993692898597972L) * n + 0.006567030993692898597972L) * n + + -0.0118241212482193996927L) * n + -0.0118241212482193996927L) * n + 0); + temp5 = + (((((((((((((((((((4.9790996213727828646e-10L * n + + -4.48118965923550457814e-9L) * n + + -6.638799495163710486134e-8L) * n + + 7.169903454776807325024e-7L) * n + + 2.289456393902157198248e-6L) * n + + -0.00004033827516454402783322L) * n + + 0.00003000359697887161159758L) * n + + 0.0009082137950324166362482L) * n + + -0.002848638966651322607082L) * n + + -0.004841894290834330378878L) * n + + 0.03996159001558722828626L) * n + + -0.06097622570643350798099L) * n + + -0.08360618575998087975704L) * n + + 0.4828240931514239239454L) * n + -0.9122041618987750418403L) * n + + 1.L) * n + -0.6943757505161722815992L) * n + + 0.3028864291842652293657L) * n + -0.07618507920533305435095L) * n + + 0.00846500880059256159455L) / + ((((((((((((((((((((1.228479056429057224655e-15L * n + + 1.228479056429057224655e-15L) * n + + -4.275107116373119141799e-13L) * n + + -4.275107116373119141799e-13L) * n + + 6.245341827074041118701e-11L) * n + + 6.245341827074041118701e-11L) * n + + -4.984032896340973768774e-9L) * n + + -4.984032896340973768774e-9L) * n + + 2.369072536889321231099e-7L) * n + + 2.369072536889321231099e-7L) * n + + -6.863664456042339214242e-6L) * n + + -6.863664456042339214242e-6L) * n + + 0.0001191961161611721744173L) * n + + 0.0001191961161611721744173L) * n + + -0.001171360743676592273701L) * n + + -0.001171360743676592273701L) * n + + 0.005750081338781313691098L) * n + 0.005750081338781313691098L) * n + + -0.01035318076040337629111L) * n + -0.01035318076040337629111L) * n + + 0); + temp7 = + (((((((((((((((((((-3.02894205219023718573e-9L * n + + 3.331836257409260904303e-8L) * n + + 2.604890164883603979728e-7L) * n + + -4.198113684335668739421e-6L) * n + + 2.025352585564538598191e-6L) * n + + 0.0001560409980553337190182L) * n + + -0.0005934220253202274887781L) * n + + -0.001138157733557860865103L) * n + + 0.01259350102641119879248L) * n + + -0.0285962078110841823878L) * n + + -0.0141661952740978298846L) * n + + 0.2283636269730593313672L) * n + + -0.6280163871715211878801L) * n + 1.L) * n + + -1.063877418171284488174L) * n + 0.7844492298124054064622L) * n + + -0.398692125729640813259L) * n + 0.1339442832180845674927L) * n + + -0.02686737474173223572901L) * n + + 0.002442488612884748702637L) / + ((((((((((((((((((((5.455052702747709592293e-15L * n + + 5.455052702747709592293e-15L) * n + + -1.898358340556202938118e-12L) * n + + -1.898358340556202938118e-12L) * n + + 2.77323969302288060253e-10L) * n + + 2.77323969302288060253e-10L) * n + + -2.213156339905286664186e-8L) * n + + -2.213156339905286664186e-8L) * n + + 1.05198501168829426282e-6L) * n + + 1.05198501168829426282e-6L) * n + + -0.00003047805426209099419481L) * n + + -0.00003047805426209099419481L) * n + + 0.0005292895244890009118268L) * n + + 0.0005292895244890009118268L) * n + + -0.005201419232379534568781L) * n + + -0.005201419232379534568781L) * n + + 0.02553319617781336544217L) * n + 0.02553319617781336544217L) * n + + -0.04597322713277814299995L) * n + -0.04597322713277814299995L) * n + + 0); + temp9 = + (((((((((((((((((((2.209649545457411303047e-8L * n + + -2.872544409094634693961e-7L) * n + + -7.954738363646680690969e-7L) * n + + 0.00002642740856367063918444L) * n + + -0.000100347551357705905309L) * n + + -0.0003523654475156085224592L) * n + + 0.003886891398435344210662L) * n + + -0.01176249484636071014483L) * n + + 0.005089191178112661132801L) * n + + 0.07712226379833335857244L) * n + + -0.3058980201363300737958L) * n + + 0.6568762202053064940068L) * n + + -0.9545717855329471415885L) * n + 1.L) * n + + -0.7699893589170289558958L) * n + 0.434254440968387457275L) * n + + -0.1751628747410953627588L) * n + 0.04797618345441525395915L) * n + + -0.008009419824398266762681L) * n + + 0.0006161092172614051355909L) / + ((((((((((((((((((((8.700179076151578638301e-14L * n + + 8.700179076151578638301e-14L) * n + + -3.027662318500749366129e-11L) * n + + -3.027662318500749366129e-11L) * n + + 4.42299703873393954814e-9L) * n + + 4.42299703873393954814e-9L) * n + + -3.529728772555674205556e-7L) * n + + -3.529728772555674205556e-7L) * n + + 0.00001677794603616841191808L) * n + + 0.00001677794603616841191808L) * n + + -0.0004860897674541130610707L) * n + + -0.0004860897674541130610707L) * n + + 0.008441556657859473457225L) * n + + 0.008441556657859473457225L) * n + + -0.08295662982146214580096L) * n + + -0.08295662982146214580096L) * n + 0.4072249916514861588468L) * n + + 0.4072249916514861588468L) * n + -0.7332198799148043114509L) * n + + -0.7332198799148043114509L) * n + 0); + a5 = + temp1 * sum1 + temp3 * sum3 + temp5 * sum5 + temp7 * sum7 + temp9 * sum9; + temp0 = + ((((((((-0.002747252747252747252747L * n + + 0.01648351648351648351648L) * n + + 0.02564102564102564102564L) * n + -0.3461538461538461538462L) * n + + 0.9615384615384615384615L) * n + -1.320512820512820512821L) * n + + 1.L) * n + -0.4010989010989010989011L) * n + + 0.06684981684981684981685L) / + (((((((((5.551360862716174071485e-6L * n + 0) * n + + -0.0006661633035259408885783L) * n + 0) * n + + 0.02424834424834424834425L) * n + 0) * n + + -0.2913354180753448152716L) * n + 0) * n + + 0.818581467372676163885L) * n + 0); + temp2 = + (((((((((((((((5.801019239080306409836e-7L * n + + -4.060713467356214486885e-6L) * n + + -0.00003654642120620593038197L) * n + + 0.0003207963639211409444639L) * n + + 0.0003300779947036694347197L) * n + + -0.007638202032097039449831L) * n + + 0.01295906262158832735483L) * n + + 0.04770352150872908370001L) * n + + -0.2024604608744042042473L) * n + 0.2200784877903047565457L) * n + + 0.1986425614980552083001L) * n + -0.8146562751075363941445L) * n + + 1.L) * n + -0.6426689826545381166328L) * n + + 0.2186676799113604260269L) * n + + -0.03123823998733720371812L) / + ((((((((((((((((3.425286806018358993775e-11L * n + + 3.425286806018358993775e-11L) * n + + -6.953332216217268757364e-9L) * n + + -6.953332216217268757364e-9L) * n + + 5.555472670681176452004e-7L) * n + + 5.555472670681176452004e-7L) * n + + -0.00002236606100439001853806L) * n + + -0.00002236606100439001853806L) * n + + 0.0004824922020234691216437L) * n + + 0.0004824922020234691216437L) * n + + -0.005467981528875355193367L) * n + + -0.005467981528875355193367L) * n + + 0.02936948105256022151826L) * n + 0.02936948105256022151826L) * n + + -0.05568496981232380660242L) * n + -0.05568496981232380660242L) * n + + 0); + temp4 = + (((((((((((((((-1.523380075711989762886e-6L * n + + 0.00001371042068140790786597L) * n + + 0.00003808450189279974407215L) * n + + -0.0007083717352060752397419L) * n + + 0.001421110493295858183471L) * n + + 0.007976722752443120796423L) * n + + -0.04169684228699972833055L) * n + + 0.05209563780115319871731L) * n + + 0.1165742228857388774212L) * n + -0.5481928903851866521438L) * n + + 1.L) * n + -1.082406331167594659029L) * n + + 0.7475265639400702278215L) * n + -0.3253179167269671279969L) * n + + 0.08176255074759877215566L) * n + + -0.009084727860844308017295L) / + ((((((((((((((((1.691366506269828413014e-11L * n + + 1.691366506269828413014e-11L) * n + + -3.433474007727751678419e-9L) * n + + -3.433474007727751678419e-9L) * n + + 2.743227336519034703068e-7L) * n + + 2.743227336519034703068e-7L) * n + + -0.00001104409896232503589018L) * n + + -0.00001104409896232503589018L) * n + + 0.0002382489981875395667415L) * n + + 0.0002382489981875395667415L) * n + + -0.002700025235432006231466L) * n + + -0.002700025235432006231466L) * n + + 0.01450230575481931101869L) * n + 0.01450230575481931101869L) * n + + -0.02749658588522475098626L) * n + -0.02749658588522475098626L) * n + + 0); + temp6 = + (((((((((((((((5.461645593817417187799e-6L * n + + -0.00006007810153199158906579L) * n + + 0.00008556578096980620260885L) * n + + 0.001461900470611795333934L) * n + + -0.007771921680002184658238L) * n + + 0.008270751977570842094723L) * n + + 0.05489135876639631520977L) * n + + -0.2723340342445178732352L) * n + + 0.6412135776509462300991L) * n + -0.9647942325022529288074L) * n + + 1.L) * n + -0.7277515315364519329674L) * n + + 0.36741764293581656153L) * n + -0.1230454135831125918239L) * n + + 0.02465204766196054871333L) * n + + -0.002241095241996413519393L) / + ((((((((((((((((3.583221388564320207806e-11L * n + + 3.583221388564320207806e-11L) * n + + -7.273939418785570021847e-9L) * n + + -7.273939418785570021847e-9L) * n + + 5.811626770112470945041e-7L) * n + + 5.811626770112470945041e-7L) * n + + -0.00002339732486869455601771L) * n + + -0.00002339732486869455601771L) * n + + 0.0005047391579205251028208L) * n + + 0.0005047391579205251028208L) * n + + -0.005720101549486361311983L) * n + + -0.005720101549486361311983L) * n + + 0.03072366159051624655138L) * n + 0.03072366159051624655138L) * n + + -0.05825251611120347916199L) * n + -0.05825251611120347916199L) * n + + 0); + temp8 = + (((((((((((((((-0.000031931538780853849347L * n + + 0.000415110004151100041511L) * n + + -0.001883960788070377111473L) * n + + 0.001245330012453300124533L) * n + + 0.02449149024491490244915L) * n + + -0.132420091324200913242L) * n + + 0.3789954337899543378995L) * n + + -0.7260273972602739726027L) * n + 1.L) * n + + -1.018264840182648401826L) * n + 0.7716894977168949771689L) * n + + -0.4312992943129929431299L) * n + 0.1731008717310087173101L) * n + + -0.04729060893444455088291L) * n + 0.007887090078870900788709L) * n + + -0.000606699236836223137593L) / + ((((((((((((((((3.981319131723049926453e-10L * n + + 3.981319131723049926453e-10L) * n + + -8.0820778373977913507e-8L) * n + + -8.0820778373977913507e-8L) * n + + 6.457301499741614675714e-6L) * n + + 6.457301499741614675714e-6L) * n + + -0.0002599677972122068187426L) * n + + -0.0002599677972122068187426L) * n + + 0.00560815938521711183052L) * n + + 0.00560815938521711183052L) * n + + -0.06355607779929369693897L) * n + + -0.06355607779929369693897L) * n + 0.3413707622902889411511L) * n + + 0.3413707622902889411511L) * n + -0.6472440067608078400755L) * n + + -0.6472440067608078400755L) * n + 0); + a6 = + temp0 * sum0 + temp2 * sum2 + temp4 * sum4 + temp6 * sum6 + temp8 * sum8; + temp1 = + (((((((((((((((((((-6.062531955892827184005e-10L * n + + 4.243772369124979028803e-9L) * n + + 1.079130688148923238753e-7L) * n + + -8.232918396102459315879e-7L) * n + + -6.558447069884860447656e-6L) * n + + 0.00005928549999667595703238L) * n + + 0.0001340385975952193937519L) * n + + -0.001927200095862903155042L) * n + + 0.001065282133009676623514L) * n + + 0.02639126618461293151243L) * n + + -0.06551456156428281940877L) * n + + -0.0686707808294353514037L) * n + + 0.5129055986621819740122L) * n + -0.7879520176484434686378L) * n + + 0.1720729014919064993562L) * n + 0.9842650834524745649782L) * n + + -1.476943604508380444958L) * n + 1.L) * n + + -0.3451910247182262221901L) * n + + 0.04931300353117517459859L) / + ((((((((((((((((((((5.895977080872073890621e-14L * n + + 5.895977080872073890621e-14L) * n + + -2.051800024143481713936e-11L) * n + + -2.051800024143481713936e-11L) * n + + 2.997396828373744924514e-9L) * n + + 2.997396828373744924514e-9L) * n + + -2.392042711135615005187e-7L) * n + + -2.392042711135615005187e-7L) * n + + 0.0000113701550769819974843L) * n + + 0.0000113701550769819974843L) * n + + -0.0003294155330678108902593L) * n + + -0.0003294155330678108902593L) * n + + 0.00572071265958794854203L) * n + + 0.00572071265958794854203L) * n + + -0.05621842767287978773751L) * n + + -0.05621842767287978773751L) * n + 0.275970091709598834999L) * n + + 0.275970091709598834999L) * n + -0.4968917960628586841432L) * n + + -0.4968917960628586841432L) * n + 0); + temp3 = + (((((((((((((((((((8.385452957532784300517e-10L * n + + -7.546907661779505870465e-9L) * n + + -1.118060394337704573402e-7L) * n + + 1.207505225884720939274e-6L) * n + + 3.720457768198145738453e-6L) * n + + -0.00006671734707507724238589L) * n + + 0.00005945021006854372556268L) * n + + 0.001416799806677365553544L) * n + + -0.004733220347333422516943L) * n + + -0.005559357845406304604934L) * n + + 0.05962935852535036766177L) * n + + -0.1194847722938455945267L) * n + + 0.007776173804005795252536L) * n + + 0.3989103188407051958732L) * n + -0.8719573999915008115502L) * n + + 1.L) * n + -0.7071142695458509780452L) * n + + 0.3107833586915489591643L) * n + -0.07837259845042836204124L) * n + + 0.008708066494492040226805L) / + ((((((((((((((((((((5.750377545038217102977e-15L * n + + 5.750377545038217102977e-15L) * n + + -2.001131385673299551836e-12L) * n + + -2.001131385673299551836e-12L) * n + + 2.923376936346528810811e-10L) * n + + 2.923376936346528810811e-10L) * n + + -2.332971872891346969128e-8L) * n + + -2.332971872891346969128e-8L) * n + + 1.108937221794776839867e-6L) * n + + 1.108937221794776839867e-6L) * n + + -0.00003212807068883235036194L) * n + + -0.00003212807068883235036194L) * n + + 0.0005579441230535569227842L) * n + + 0.0005579441230535569227842L) * n + + -0.005483012903090646315445L) * n + + -0.005483012903090646315445L) * n + + 0.02691550860361030196016L) * n + 0.02691550860361030196016L) * n + + -0.04846211895333463990518L) * n + -0.04846211895333463990518L) * n + + 0); + temp5 = + (((((((((((((((((((-3.02894205219023718573e-9L * n + + 3.331836257409260904303e-8L) * n + + 2.604890164883603979728e-7L) * n + + -4.198113684335668739421e-6L) * n + + 2.025352585564538598191e-6L) * n + + 0.0001560409980553337190182L) * n + + -0.0005934220253202274887781L) * n + + -0.001138157733557860865103L) * n + + 0.01259350102641119879248L) * n + + -0.0285962078110841823878L) * n + + -0.0141661952740978298846L) * n + + 0.2283636269730593313672L) * n + + -0.6280163871715211878801L) * n + 1.L) * n + + -1.063877418171284488174L) * n + 0.7844492298124054064622L) * n + + -0.398692125729640813259L) * n + 0.1339442832180845674927L) * n + + -0.02686737474173223572901L) * n + + 0.002442488612884748702637L) / + ((((((((((((((((((((5.455052702747709592293e-15L * n + + 5.455052702747709592293e-15L) * n + + -1.898358340556202938118e-12L) * n + + -1.898358340556202938118e-12L) * n + + 2.77323969302288060253e-10L) * n + + 2.77323969302288060253e-10L) * n + + -2.213156339905286664186e-8L) * n + + -2.213156339905286664186e-8L) * n + + 1.05198501168829426282e-6L) * n + + 1.05198501168829426282e-6L) * n + + -0.00003047805426209099419481L) * n + + -0.00003047805426209099419481L) * n + + 0.0005292895244890009118268L) * n + + 0.0005292895244890009118268L) * n + + -0.005201419232379534568781L) * n + + -0.005201419232379534568781L) * n + + 0.02553319617781336544217L) * n + 0.02553319617781336544217L) * n + + -0.04597322713277814299995L) * n + -0.04597322713277814299995L) * n + + 0); + temp7 = + (((((((((((((((((((1.443834297182565281187e-8L * n + + -1.876984586337334865543e-7L) * n + + -5.197803469857235012273e-7L) * n + + 0.000017268258194303480763L) * n + + -0.00006239289276224925435103L) * n + + -0.0002715371034901344438819L) * n + + 0.002584251629593205077084L) * n + + -0.005951542726358421391664L) * n + + -0.01026022341044865148668L) * n + + 0.1044468094236330917503L) * n + + -0.3397835122555254046591L) * n + + 0.6854034455161138741715L) * n + -0.9684992703535251378L) * n + + 1.L) * n + -0.7638563959327842386582L) * n + + 0.4288574617712624188279L) * n + -0.1725555100865397700596L) * n + + 0.04720229768324851320201L) * n + -0.007876327853494480385116L) * n + + 0.0006058713733457292603936L) / + ((((((((((((((((((((1.853163016381112219742e-14L * n + + 1.853163016381112219742e-14L) * n + + -6.449007297006270524703e-12L) * n + + -6.449007297006270524703e-12L) * n + + 9.421110142678298302725e-10L) * n + + 9.421110142678298302725e-10L) * n + + -7.518423197847417240023e-8L) * n + + -7.518423197847417240023e-8L) * n + + 3.573750472595867214117e-6L) * n + + 3.573750472595867214117e-6L) * n + + -0.0001035385101619905238081L) * n + + -0.0001035385101619905238081L) * n + + 0.001798075701902756152609L) * n + + 0.001798075701902756152609L) * n + + -0.01766999931876732355899L) * n + + -0.01766999931876732355899L) * n + 0.0867400874475394978838L) * n + + 0.0867400874475394978838L) * n + -0.1561779306426131772638L) * n + + -0.1561779306426131772638L) * n + 0); + temp9 = + (((((((((((((((((((-7.751592541004553946962e-8L * n + + 1.162738881150683092044e-6L) * n + + -1.291932090167425657827e-6L) * n + + -0.00006743885510673961933857L) * n + + 0.0004924328354882159637374L) * n + + -0.001071941893853716416812L) * n + + -0.003716888623411683617569L) * n + + 0.03486330422600404834673L) * n + + -0.1310086319898458323171L) * n + + 0.3188425352247206353145L) * n + + -0.5603650536215487195862L) * n + + 0.7426565681896052665115L) * n + + -0.7562942033334126117555L) * n + 0.5948559196645993024642L) * n + + -0.3594022264226908968717L) * n + 0.1640613709074056436499L) * n + + -0.05482404259871782498785L) * n + 0.01266855688297275925809L) * n + + -0.00181077201757866380201L) * n + + 0.0001207181345052442534674L) / + ((((((((((((((((((((2.136455093502075714739e-13L * n + + 2.136455093502075714739e-13L) * n + + -7.43486372538722348729e-11L) * n + + -7.43486372538722348729e-11L) * n + + 1.086131040434585251859e-8L) * n + + 1.086131040434585251859e-8L) * n + + -8.667760684925027332449e-7L) * n + + -8.667760684925027332449e-7L) * n + + 0.00004120067869146748907533L) * n + + 0.00004120067869146748907533L) * n + + -0.001193663889543698359902L) * n + + -0.001193663889543698359902L) * n + + 0.02072946609594132992549L) * n + + 0.02072946609594132992549L) * n + + -0.2037120302588368838511L) * n + -0.2037120302588368838511L) * n + + 1.L) * n + 1.L) * n + -1.800527705682447746874L) * n + + -1.800527705682447746874L) * n + 0); + a7 = + temp1 * sum1 + temp3 * sum3 + temp5 * sum5 + temp7 * sum7 + temp9 * sum9; + temp0 = + ((((((((0.001584831625223159790039L * n + + -0.01267865300178527832031L) * n + + 0.04437528550624847412109L) * n + + -0.08875057101249694824219L) * n + 0.1109382137656211853027L) * n + + -0.08875057101249694824219L) * n + 0.04437528550624847412109L) * n + + -0.01267865300178527832031L) * n + + 0.001584831625223159790039L) / + (((((((((6.781684027777777777778e-6L * n + 0) * n + + -0.0008138020833333333333333L) * n + 0) * n + + 0.02962239583333333333333L) * n + 0) * n + + -0.3559027777777777777778L) * n + 0) * n + 1.L) * n + 0); + temp2 = + (((((((((((((((-4.878167760189272909095e-6L * n + + 0.00004390350984170345618186L) * n + + 0.0001219541940047318227274L) * n + + -0.002268348008488011902729L) * n + + 0.005838516386578534435799L) * n + + 0.01395253542769335837459L) * n + + -0.1054958599454806679373L) * n + + 0.223669427477325230929L) * n + -0.1245467311049398417383L) * n + + -0.3774384741091246127954L) * n + 1.L) * n + + -1.20206541622966413815L) * n + 0.8650679284860606356253L) * n + + -0.3829128004283495880852L) * n + 0.0967930228263407121428L) * n + + -0.01075478031403785690476L) / + ((((((((((((((((5.798406428933524525048e-10L * n + + 5.798406428933524525048e-10L) * n + + -1.177076505073505478585e-7L) * n + + -1.177076505073505478585e-7L) * n + + 9.404435387087283427175e-6L) * n + + 9.404435387087283427175e-6L) * n + + -0.0003786179647494294575596L) * n + + -0.0003786179647494294575596L) * n + + 0.008167741986474055022834L) * n + + 0.008167741986474055022834L) * n + + -0.09256328315226834511619L) * n + + -0.09256328315226834511619L) * n + 0.497173513909520383136L) * n + + 0.497173513909520383136L) * n + -0.9426483247692660260829L) * n + + -0.9426483247692660260829L) * n + 0); + temp4 = + (((((((((((((((9.007142664132657197157e-6L * n + + -0.00009907856930545922916873L) * n + + 0.0001411119017380782960888L) * n + + 0.002410911853099507909772L) * n + + -0.01422227826666546571431L) * n + + 0.02909607318603652696588L) * n + + 0.01324350209716305029889L) * n + + -0.217279302486872089567L) * n + 0.5937778658476171604082L) * n + + -0.9419399583870008917071L) * n + 1.L) * n + + -0.7364930389799110694781L) * n + 0.3740876515076455629314L) * n + + -0.1256406330219864352431L) * n + 0.02519898279335513061858L) * n + + -0.002290816617577739147144L) / + ((((((((((((((((1.946598003688388663139e-10L * n + + 1.946598003688388663139e-10L) * n + + -3.951593947487428986172e-8L) * n + + -3.951593947487428986172e-8L) * n + + 3.157187302182197572745e-6L) * n + + 3.157187302182197572745e-6L) * n + + -0.0001271068151870403456981L) * n + + -0.0001271068151870403456981L) * n + + 0.002742013765398732137249L) * n + + 0.002742013765398732137249L) * n + + -0.03107465894421426093871L) * n + + -0.03107465894421426093871L) * n + 0.1669074049093547871587L) * n + + 0.1669074049093547871587L) * n + -0.3164589046431422301798L) * n + + -0.3164589046431422301798L) * n + 0); + temp6 = + (((((((((((((((-0.000031931538780853849347L * n + + 0.000415110004151100041511L) * n + + -0.001883960788070377111473L) * n + + 0.001245330012453300124533L) * n + + 0.02449149024491490244915L) * n + + -0.132420091324200913242L) * n + + 0.3789954337899543378995L) * n + + -0.7260273972602739726027L) * n + 1.L) * n + + -1.018264840182648401826L) * n + 0.7716894977168949771689L) * n + + -0.4312992943129929431299L) * n + 0.1731008717310087173101L) * n + + -0.04729060893444455088291L) * n + 0.007887090078870900788709L) * n + + -0.000606699236836223137593L) / + ((((((((((((((((3.981319131723049926453e-10L * n + + 3.981319131723049926453e-10L) * n + + -8.0820778373977913507e-8L) * n + + -8.0820778373977913507e-8L) * n + + 6.457301499741614675714e-6L) * n + + 6.457301499741614675714e-6L) * n + + -0.0002599677972122068187426L) * n + + -0.0002599677972122068187426L) * n + + 0.00560815938521711183052L) * n + + 0.00560815938521711183052L) * n + + -0.06355607779929369693897L) * n + + -0.06355607779929369693897L) * n + 0.3413707622902889411511L) * n + + 0.3413707622902889411511L) * n + -0.6472440067608078400755L) * n + + -0.6472440067608078400755L) * n + 0); + temp8 = + (((((((((((((((0.00005011027123405687567765L * n + + -0.0007516540685108531351648L) * n + + 0.005261578479575971946153L) * n + + -0.02280017341149587843333L) * n + + 0.06840052023448763529999L) * n + + -0.15048114451587279766L) * n + + 0.2508019075264546627666L) * n + + -0.3224595953911559949857L) * n + + 0.3224595953911559949857L) * n + -0.2508019075264546627666L) * n + + 0.15048114451587279766L) * n + -0.06840052023448763529999L) * n + + 0.02280017341149587843333L) * n + -0.005261578479575971946153L) * n + + 0.0007516540685108531351648L) * n + + -0.00005011027123405687567765L) / + ((((((((((((((((1.166274201402604273497e-9L * n + + 1.166274201402604273497e-9L) * n + + -2.3675366288472866752e-7L) * n + + -2.3675366288472866752e-7L) * n + + 0.00001891580127254883871185L) * n + + 0.00001891580127254883871185L) * n + + -0.0007615408990156571098613L) * n + + -0.0007615408990156571098613L) * n + + 0.01642835299541014187567L) * n + + 0.01642835299541014187567L) * n + + -0.1861790311885233542957L) * n + -0.1861790311885233542957L) * n + + 1.L) * n + 1.L) * n + -1.896014768278297133675L) * n + + -1.896014768278297133675L) * n + 0); + a8 = + temp0 * sum0 + temp2 * sum2 + temp4 * sum4 + temp6 * sum6 + temp8 * sum8; + temp1 = + (((((((((((((((((((9.48621464808249608894e-10L * n + + -8.537593183274246480046e-9L) * n + + -1.264828619744332811859e-7L) * n + + 1.366014909323879436807e-6L) * n + + 3.749710926094049054036e-6L) * n + + -0.00007134316422812698998601L) * n + + 0.00009869392671536013508103L) * n + + 0.001209634823471062027338L) * n + + -0.004989351983601536889084L) * n + + 0.001473683499786556613603L) * n + + 0.03384931128653701151254L) * n + + -0.09759459492160789457305L) * n + + 0.112213008424637987651L) * n + + -0.001403545518474262870105L) * n + + -0.1726586244666029654872L) * n + 0.2553101393034701097327L) * n + + -0.1964387156176969902114L) * n + 0.08921252223762199711287L) * n + + -0.02274277441953378689267L) * n + + 0.002526974935503754099185L) / + ((((((((((((((((((((2.136455093502075714739e-13L * n + + 2.136455093502075714739e-13L) * n + + -7.43486372538722348729e-11L) * n + + -7.43486372538722348729e-11L) * n + + 1.086131040434585251859e-8L) * n + + 1.086131040434585251859e-8L) * n + + -8.667760684925027332449e-7L) * n + + -8.667760684925027332449e-7L) * n + + 0.00004120067869146748907533L) * n + + 0.00004120067869146748907533L) * n + + -0.001193663889543698359902L) * n + + -0.001193663889543698359902L) * n + + 0.02072946609594132992549L) * n + + 0.02072946609594132992549L) * n + + -0.2037120302588368838511L) * n + -0.2037120302588368838511L) * n + + 1.L) * n + 1.L) * n + -1.800527705682447746874L) * n + + -1.800527705682447746874L) * n + 0); + temp3 = + (((((((((((((((((((-7.870922679053298103593e-9L * n + + 8.658014946958627913952e-8L) * n + + 6.76899350398583636909e-7L) * n + + -0.00001090909883316787117158L) * n + + 8.264468813005963008773e-6L) * n + + 0.0003724678030181601728582L) * n + + -0.001625899496258774666706L) * n + + -0.0007145995708078814961018L) * n + + 0.02366203551546066564074L) * n + + -0.07463578292916074163285L) * n + + 0.08249395396386228967415L) * n + + 0.1072365607182978849951L) * n + + -0.5460605326981549704932L) * n + 1.L) * n + + -1.125048757836057302629L) * n + 0.85174044739528384103L) * n + + -0.4385706793163458387505L) * n + 0.1482468800443970413004L) * n + + -0.02980362502930054038884L) * n + + 0.002709420457209140035349L) / + ((((((((((((((((((((1.208634663709582809809e-13L * n + + 1.208634663709582809809e-13L) * n + + -4.206048629709348178136e-11L) * n + + -4.206048629709348178136e-11L) * n + + 6.144456903366777088508e-9L) * n + + 6.144456903366777088508e-9L) * n + + -4.90352268690421938769e-7L) * n + + -4.90352268690421938769e-7L) * n + + 0.00002330803422282182508967L) * n + + 0.00002330803422282182508967L) * n + + -0.0006752791379087878688636L) * n + + -0.0006752791379087878688636L) * n + + 0.01172706665351817548763L) * n + + 0.01172706665351817548763L) * n + + -0.1152439018888493483997L) * n + -0.1152439018888493483997L) * n + + 0.5657196668376444567469L) * n + 0.5657196668376444567469L) * n + + -1.018593933790622693308L) * n + -1.018593933790622693308L) * n + 0); + temp5 = + (((((((((((((((((((2.209649545457411303047e-8L * n + + -2.872544409094634693961e-7L) * n + + -7.954738363646680690969e-7L) * n + + 0.00002642740856367063918444L) * n + + -0.000100347551357705905309L) * n + + -0.0003523654475156085224592L) * n + + 0.003886891398435344210662L) * n + + -0.01176249484636071014483L) * n + + 0.005089191178112661132801L) * n + + 0.07712226379833335857244L) * n + + -0.3058980201363300737958L) * n + + 0.6568762202053064940068L) * n + + -0.9545717855329471415885L) * n + 1.L) * n + + -0.7699893589170289558958L) * n + 0.434254440968387457275L) * n + + -0.1751628747410953627588L) * n + 0.04797618345441525395915L) * n + + -0.008009419824398266762681L) * n + + 0.0006161092172614051355909L) / + ((((((((((((((((((((8.700179076151578638301e-14L * n + + 8.700179076151578638301e-14L) * n + + -3.027662318500749366129e-11L) * n + + -3.027662318500749366129e-11L) * n + + 4.42299703873393954814e-9L) * n + + 4.42299703873393954814e-9L) * n + + -3.529728772555674205556e-7L) * n + + -3.529728772555674205556e-7L) * n + + 0.00001677794603616841191808L) * n + + 0.00001677794603616841191808L) * n + + -0.0004860897674541130610707L) * n + + -0.0004860897674541130610707L) * n + + 0.008441556657859473457225L) * n + + 0.008441556657859473457225L) * n + + -0.08295662982146214580096L) * n + + -0.08295662982146214580096L) * n + 0.4072249916514861588468L) * n + + 0.4072249916514861588468L) * n + -0.7332198799148043114509L) * n + + -0.7332198799148043114509L) * n + 0); + temp7 = + (((((((((((((((((((-7.751592541004553946962e-8L * n + + 1.162738881150683092044e-6L) * n + + -1.291932090167425657827e-6L) * n + + -0.00006743885510673961933857L) * n + + 0.0004924328354882159637374L) * n + + -0.001071941893853716416812L) * n + + -0.003716888623411683617569L) * n + + 0.03486330422600404834673L) * n + + -0.1310086319898458323171L) * n + + 0.3188425352247206353145L) * n + + -0.5603650536215487195862L) * n + + 0.7426565681896052665115L) * n + + -0.7562942033334126117555L) * n + 0.5948559196645993024642L) * n + + -0.3594022264226908968717L) * n + 0.1640613709074056436499L) * n + + -0.05482404259871782498785L) * n + 0.01266855688297275925809L) * n + + -0.00181077201757866380201L) * n + + 0.0001207181345052442534674L) / + ((((((((((((((((((((2.136455093502075714739e-13L * n + + 2.136455093502075714739e-13L) * n + + -7.43486372538722348729e-11L) * n + + -7.43486372538722348729e-11L) * n + + 1.086131040434585251859e-8L) * n + + 1.086131040434585251859e-8L) * n + + -8.667760684925027332449e-7L) * n + + -8.667760684925027332449e-7L) * n + + 0.00004120067869146748907533L) * n + + 0.00004120067869146748907533L) * n + + -0.001193663889543698359902L) * n + + -0.001193663889543698359902L) * n + + 0.02072946609594132992549L) * n + + 0.02072946609594132992549L) * n + + -0.2037120302588368838511L) * n + -0.2037120302588368838511L) * n + + 1.L) * n + 1.L) * n + -1.800527705682447746874L) * n + + -1.800527705682447746874L) * n + 0); + temp9 = + (((((((((((((((((1.30112050823214173588e-6L * n + + -0.00002211904863994640950996L) * n + + 0.0001769523891195712760797L) * n + + -0.0008847619455978563803985L) * n + + 0.003096666809592497331395L) * n + + -0.008051333704940493061626L) * n + + 0.01610266740988098612325L) * n + + -0.0253041916440986924794L) * n + + 0.03163023955512336559925L) * n + + -0.03163023955512336559925L) * n + + 0.0253041916440986924794L) * n + + -0.01610266740988098612325L) * n + + 0.008051333704940493061626L) * n + + -0.003096666809592497331395L) * n + + 0.0008847619455978563803985L) * n + + -0.0001769523891195712760797L) * n + + 0.00002211904863994640950996L) * n + + -1.30112050823214173588e-6L) / + ((((((((((((((((((7.59405842812662330593e-12L * n + + 7.59405842812662330593e-12L) * n + + -2.156712593587961018884e-9L) * n + + -2.156712593587961018884e-9L) * n + + 2.480371363794717704183e-7L) * n + + 2.480371363794717704183e-7L) * n + + -0.00001493529546306405506876L) * n + + -0.00001493529546306405506876L) * n + + 0.0005086247680835308517554L) * n + + 0.0005086247680835308517554L) * n + + -0.009876958696001262873691L) * n + + -0.009876958696001262873691L) * n + + 0.1047063100574591976708L) * n + 0.1047063100574591976708L) * n + + -0.5397677311665406903502L) * n + -0.5397677311665406903502L) * n + + 1.L) * n + 1.L) * n + 0); + a9 = + temp1 * sum1 + temp3 * sum3 + temp5 * sum5 + temp7 * sum7 + temp9 * sum9; + for (i = 0; i < nn; i++) + { + z = n1 * i - 1.L; + y[i] = + x[i] - + (((((((((a9 * z + a8) * z + a7) * z + a6) * z + a5) * z + a4) * z + + a3) * z + a2) * z + a1) * z + a0); + } + a[0] = a0; + a[1] = a1; + a[2] = a2; + a[3] = a3; + a[4] = a4; + a[5] = a5; + a[6] = a6; + a[7] = a7; + a[8] = a8; + a[9] = a9; +} + +void +polyreg10 (double *x, int nn, double *y, double *a) +{ + +/* +polynominal detrending of a time series, order 10 +machine-generated file, do not edit! +made by polyregz.m (Mathematica ) +Gerhard Heinzel AEI 17.01.2008 + +x[]: input, read-only: time series to be detrended +nn: input, read-only: length of x[] +y[]: output: time series with trend subtracted +a[]: fitting coefficients in for z^0, z^1, z^2,... with + z = 2*i/(nn-1)-1 ; i=0,...,nn-1 +*/ + + long double n = nn, n1 = 2.L / (n - 1), z; + long double a0, temp0, sum0 = 0; + long double a1, temp1, sum1 = 0; + long double a2, temp2, sum2 = 0; + long double a3, temp3, sum3 = 0; + long double a4, temp4, sum4 = 0; + long double a5, temp5, sum5 = 0; + long double a6, temp6, sum6 = 0; + long double a7, temp7, sum7 = 0; + long double a8, temp8, sum8 = 0; + long double a9, temp9, sum9 = 0; + long double a10, temp10, sum10 = 0; + int i; + for (i = 0; i < nn; i++) + { + z = n1 * i - 1.L; + sum0 += x[i]; + sum1 += x[i] * z; + sum2 += x[i] * z * z; + sum3 += x[i] * z * z * z; + sum4 += x[i] * z * z * z * z; + sum5 += x[i] * z * z * z * z * z; + sum6 += x[i] * z * z * z * z * z * z; + sum7 += x[i] * z * z * z * z * z * z * z; + sum8 += x[i] * z * z * z * z * z * z * z * z; + sum9 += x[i] * z * z * z * z * z * z * z * z * z; + sum10 += x[i] * z * z * z * z * z * z * z * z * z * z; +/* the above code is efficiently optimized by GCC4 */ + + } + temp0 = + ((((((((((3.909277872420567708683e-7L * n + 0) * n + + -0.00007753401113634125955555L) * n + 0) * n + + 0.005026549488358365959825L) * n + 0) * n + + -0.1236599530652098637187L) * n + 0) * n + 1.L) * n + 0) * n + + -1.405331706026751432176L) / + (((((((((((5.334700012846550963277e-8L * n + 0) * n + + -0.00001173634002826241211921L) * n + 0) * n + + 0.0008731836981027234616692L) * n + 0) * n + + -0.02610162022285560455312L) * n + 0) * n + + 0.2878313919251300047412L) * n + 0) * n + + -0.786633525094301018841L) * n + 0); + temp2 = + ((((((((((-1.393796194554090482541e-6L * n + + 2.787592389108180965082e-6L) * n + + 0.0002160384101558840247939L) * n + + -0.0004348644127008762305528L) * n + + -0.009926616497614232416657L) * n + + 0.02028809740792934106387L) * n + 0.142197344390818541461L) * n + + -0.304682786189566423986L) * n + -0.347658606905216788007L) * n + + 1.L) * n + + -0.5L) / + (((((((((((8.778506477293449586854e-9L * n + 0) * n + + -1.931271425004558909108e-6L) * n + 0) * n + + 0.0001436865940203391828376L) * n + 0) * n + + -0.004295147649210139013856L) * n + 0) * n + + 0.04736404544395180633409L) * n + 0) * n + + -0.1294443451115782902279L) * n + 0); + temp4 = + ((((((((((0.00001073468160934346687277L * n + + -0.00004293872643737386749109L) * n + + -0.001170080295418437889132L) * n + + 0.004895014813860620893984L) * n + + 0.02936293242875749638599L) * n + -0.1420985586900825854838L) * n + + -0.03067972003950362832238L) * n + 0.8529634877696194197547L) * n + + -1.463240871942404854939L) * n + 1.L) * n + + -0.25L) / + (((((((((((1.126832272985846036237e-8L * n + 0) * n + + -2.479031000568861279722e-6L) * n + 0) * n + + 0.0001844399064423232792113L) * n + 0) * n + + -0.005513364945265147486102L) * n + 0) * n + + 0.06079773948275120911293L) * n + 0) * n + + -0.1661581796454009131194L) * n + 0); + temp6 = + ((((((((((-0.00004768565615462868769074L * n + + 0.0002861139369277721261445L) * n + + 0.002877034587995930824008L) * n + + -0.0206002034587995930824L) * n + + 0.002091810783316378433367L) * n + 0.2349059003051881993896L) * n + + -0.7123283316378433367243L) * n + 1.L) * n + + -0.7625731180061037639878L) * n + 0.3064661749745676500509L) * n + + -0.05107769582909460834181L) / + (((((((((((2.061137622362944823382e-8L * n + 0) * n + + -4.53450276919847861144e-6L) * n + 0) * n + + 0.0003373670060283668086911L) * n + 0) * n + + -0.01008473415869741643184L) * n + 0) * n + + 0.1112077735140388482498L) * n + 0) * n + + -0.3039271092431503918766L) * n + 0); + temp8 = + ((((((((((0.0004526199714624807083034L * n + + -0.003620959771699845666427L) * n + + -0.004073579743162326374731L) * n + + 0.1086287931509953699928L) * n + -0.4372308924327563642211L) * n + + 0.9124818624683611079397L) * n + -1.159612366886875574673L) * n + + 0.9342076210985601819383L) * n + -0.4684616704636675330941L) * n + + 0.1339755115528942896578L) * n + + -0.01674693894411178620723L) / + (((((((((((1.853411463275763902069e-7L * n + 0) * n + + -0.00004077505219206680584551L) * n + 0) * n + + 0.003033663883089770354906L) * n + 0) * n + + -0.09068371607515657620042L) * n + 0) * n + 1.L) * n + 0) * n + + -2.732966407287910419434L) * n + 0); + temp10 = + ((((((((((-0.0001728185345584017249886L * n + + 0.001728185345584017249886L) * n + + -0.007776834055128077624486L) * n + + 0.02073822414700820699863L) * n + + -0.0362918922572643622476L) * n + 0.04355027070871723469712L) * n + + -0.0362918922572643622476L) * n + 0.02073822414700820699863L) * n + + -0.007776834055128077624486L) * n + 0.001728185345584017249886L) * n + + -0.0001728185345584017249886L) / + (((((((((((1.853411463275763902069e-7L * n + 0) * n + + -0.00004077505219206680584551L) * n + 0) * n + + 0.003033663883089770354906L) * n + 0) * n + + -0.09068371607515657620042L) * n + 0) * n + 1.L) * n + 0) * n + + -2.732966407287910419434L) * n + 0); + a0 = + temp0 * sum0 + temp2 * sum2 + temp4 * sum4 + temp6 * sum6 + temp8 * sum8 + + temp10 * sum10; + temp1 = + (((((((((((((((((1.725519973349130188005e-10L * n + + -1.725519973349130188005e-10L) * n + + -4.003206338169982036171e-8L) * n + + 4.003206338169982036171e-8L) * n + + 3.669375740659370315798e-6L) * n + + -3.669375740659370315798e-6L) * n + + -0.0001700030263632345722748L) * n + + 0.0001700030263632345722748L) * n + + 0.004245583966255000963929L) * n + + -0.004245583966255000963929L) * n + + -0.05643813999503355310216L) * n + + 0.05643813999503355310216L) * n + 0.3708871574908914492847L) * n + + -0.3708871574908914492847L) * n + -1.L) * n + 1.L) * n + + 0.9842000062680351141608L) * n + + -0.9842000062680351141608L) / + ((((((((((((((((((7.064065326949682102477e-13L * n + + 7.064065326949682102477e-13L) * n + + -2.006194552853709717103e-10L) * n + + -2.006194552853709717103e-10L) * n + + 2.307265017088305168311e-8L) * n + + 2.307265017088305168311e-8L) * n + + -1.38929537910345553884e-6L) * n + + -1.38929537910345553884e-6L) * n + + 0.00004731275934537469456315L) * n + + 0.00004731275934537469456315L) * n + + -0.0009187640853765274369594L) * n + + -0.0009187640853765274369594L) * n + + 0.009739880478799594191751L) * n + + 0.009739880478799594191751L) * n + + -0.05020970737093043846783L) * n + -0.05020970737093043846783L) * n + + 0.09302095044180895127319L) * n + 0.09302095044180895127319L) * n + 0); + temp3 = + (((((((((((((((((-6.661079372773574194623e-10L * n + + 1.998323811832072258387e-9L) * n + + 1.301130837481771492683e-7L) * n + + -3.956681147427503071606e-7L) * n + + -9.722067380542123989525e-6L) * n + + 0.00003022309340210644574079L) * n + + 0.0003480082187082577223423L) * n + + -0.00112497186895055038026L) * n + + -0.006115939851140910792323L) * n + + 0.02137472694156612579541L) * n + + 0.04645934409098801487831L) * n + + -0.1973862732465215112288L) * n + + -0.07195199994019335535891L) * n + 0.7615554754691565848849L) * n + + -0.4964345765918953164026L) * n + -0.723410696691590450088L) * n + + 1.L) * n + + -0.3333333333333333333333L) / + ((((((((((((((((((2.622080287281795635935e-13L * n + + 2.622080287281795635935e-13L) * n + + -7.446708015880299606054e-11L) * n + + -7.446708015880299606054e-11L) * n + + 8.56423863431980090609e-9L) * n + + 8.56423863431980090609e-9L) * n + + -5.156866277639405731558e-7L) * n + + -5.156866277639405731558e-7L) * n + + 0.00001756182139810188851608L) * n + + 0.00001756182139810188851608L) * n + + -0.0003410321232078041474922L) * n + + -0.0003410321232078041474922L) * n + + 0.003615304703724904793599L) * n + + 0.003615304703724904793599L) * n + + -0.01863712718301733749371L) * n + -0.01863712718301733749371L) * n + + 0.03452804994981630759735L) * n + 0.03452804994981630759735L) * n + 0); + temp5 = + (((((((((((((((((5.398058163014688521716e-9L * n + + -2.699029081507344260858e-8L) * n + + -8.420970734302914093877e-7L) * n + + 4.426407693672044587807e-6L) * n + + 0.00004649527431076651713371L) * n + + -0.0002681899243603377649282L) * n + + -0.001037611541245401641162L) * n + + 0.007383714265327790752226L) * n + + 0.005729354906034877960593L) * n + + -0.0908133474235073586061L) * n + + 0.0857064433239907927809L) * n + 0.3864267487693772904306L) * n + + -0.9297647019794745659897L) * n + 0.3758289711751939129039L) * n + + 1.L) * n + -1.478482879128070714076L) * n + + 0.7990517994550441962973L) * n + + -0.1598103598910088392595L) / + ((((((((((((((((((6.610806697442673805042e-13L * n + + 6.610806697442673805042e-13L) * n + + -1.877469102073719360632e-10L) * n + + -1.877469102073719360632e-10L) * n + + 2.159221683518726118203e-8L) * n + + 2.159221683518726118203e-8L) * n + + -1.300152641831408611377e-6L) * n + + -1.300152641831408611377e-6L) * n + + 0.0000442769838440827899686L) * n + + 0.0000442769838440827899686L) * n + + -0.0008598125141630933417388L) * n + + -0.0008598125141630933417388L) * n + + 0.009114930867909024634825L) * n + + 0.009114930867909024634825L) * n + + -0.04698805212036625152626L) * n + -0.04698805212036625152626L) * n + + 0.08705235494314589220492L) * n + 0.08705235494314589220492L) * n + 0); + temp7 = + (((((((((((((((((-2.617501884470481724523e-8L * n + + 1.832251319129337207166e-7L) * n + + 2.983952148296349165957e-6L) * n + + -0.00002381926714868138369316L) * n + + -0.00009218841637105036633771L) * n + + 0.001035221995308075522049L) * n + + -0.0001129339884496821272058L) * n + + -0.01695277445514996898522L) * n + + 0.03876584606661373280141L) * n + + 0.05446696851349398128999L) * n + + -0.3475810591909835645486L) * n + 0.521020817358937457567L) * n + + -0.1004571571741303075151L) * n + -0.6745443028310279660557L) * n + + 1.L) * n + -0.6751301296670797109569L) * n + + 0.2328694317293473735436L) * n + + -0.03326706167562105336338L) / + ((((((((((((((((((2.545591715187033559108e-12L * n + + 2.545591715187033559108e-12L) * n + + -7.229480471131175307867e-10L) * n + + -7.229480471131175307867e-10L) * n + + 8.314411660143889010759e-8L) * n + + 8.314411660143889010759e-8L) * n + + -5.006435590992060396966e-6L) * n + + -5.006435590992060396966e-6L) * n + + 0.0001704952638995910805284L) * n + + 0.0001704952638995910805284L) * n + + -0.003310838923053662837718L) * n + + -0.003310838923053662837718L) * n + + 0.03509842832165639249484L) * n + 0.03509842832165639249484L) * n + + -0.1809346448394138433314L) * n + -0.1809346448394138433314L) * n + + 0.3352083394247738293797L) * n + 0.3352083394247738293797L) * n + 0); + temp9 = + (((((((((((((((((3.371887783571572577559e-8L * n + + -3.034699005214415319803e-7L) * n + + -2.337842196609623653774e-6L) * n + + 0.00002913311045005838707011L) * n + + -0.0000163379202739987929958L) * n + + -0.0006713833203625029590628L) * n + + 0.002462462030975711152892L) * n + + 0.00002810034939177589398349L) * n + + -0.01974961881266840060692L) * n + + 0.05418070100565105639107L) * n + + -0.06079727162446070917476L) * n + + -0.00144816735698907518147L) * n + + 0.09760112620243343119291L) * n + -0.1425719254919074835004L) * n + + 0.1092979968299971446188L) * n + -0.0495699154971682960729L) * n + + 0.0126311715991694070014L) * n + + -0.001403463511018823000155L) / + ((((((((((((((((((7.59405842812662330593e-12L * n + + 7.59405842812662330593e-12L) * n + + -2.156712593587961018884e-9L) * n + + -2.156712593587961018884e-9L) * n + + 2.480371363794717704183e-7L) * n + + 2.480371363794717704183e-7L) * n + + -0.00001493529546306405506876L) * n + + -0.00001493529546306405506876L) * n + + 0.0005086247680835308517554L) * n + + 0.0005086247680835308517554L) * n + + -0.009876958696001262873691L) * n + + -0.009876958696001262873691L) * n + + 0.1047063100574591976708L) * n + 0.1047063100574591976708L) * n + + -0.5397677311665406903502L) * n + -0.5397677311665406903502L) * n + + 1.L) * n + 1.L) * n + 0); + a1 = + temp1 * sum1 + temp3 * sum3 + temp5 * sum5 + temp7 * sum7 + temp9 * sum9; + temp0 = + ((((((((((-1.393796194554090482541e-6L * n + + 2.787592389108180965082e-6L) * n + + 0.0002160384101558840247939L) * n + + -0.0004348644127008762305528L) * n + + -0.009926616497614232416657L) * n + + 0.02028809740792934106387L) * n + 0.142197344390818541461L) * n + + -0.304682786189566423986L) * n + -0.347658606905216788007L) * n + + 1.L) * n + + -0.5L) / + (((((((((((8.778506477293449586854e-9L * n + 0) * n + + -1.931271425004558909108e-6L) * n + 0) * n + + 0.0001436865940203391828376L) * n + 0) * n + + -0.004295147649210139013856L) * n + 0) * n + + 0.04736404544395180633409L) * n + 0) * n + + -0.1294443451115782902279L) * n + 0); + temp2 = + (((((((((((((((((((7.265586658764369625757e-12L * n + + -2.179675997629310887727e-11L) * n + + -2.012567504477730386335e-9L) * n + + 6.09582720670330611601e-9L) * n + + 2.210578959551255339869e-7L) * n + + -6.794486019810087899223e-7L) * n + + -0.00001229129812864807763724L) * n + + 0.00003869118229593213374751L) * n + + 0.0003668763733535938378899L) * n + + -0.001204411368819929837275L) * n + + -0.005699863416980878891702L) * n + + 0.02034594798404883234904L) * n + + 0.03971752329167000867754L) * n + -0.174490550410175644188L) * n + + -0.05175248538787619378225L) * n + 0.6390115841024855052333L) * n + + -0.3661475167615092873858L) * n + -0.7668397166350524597603L) * n + + 1.L) * n + + -0.3333333333333333333333L) / + ((((((((((((((((((((1.173349626825812235627e-15L * n + + 1.173349626825812235627e-15L) * n + + -4.505662567011118984807e-13L) * n + + -4.505662567011118984807e-13L) * n + + 7.164707491323774673184e-11L) * n + + 7.164707491323774673184e-11L) * n + + -6.140030649013807454309e-9L) * n + + -6.140030649013807454309e-9L) * n + + 3.093506640581184070955e-7L) * n + + 3.093506640581184070955e-7L) * n + + -9.384783466859090167062e-6L) * n + + -9.384783466859090167062e-6L) * n + + 0.0001687858609432810647074L) * n + + 0.0001687858609432810647074L) * n + + -0.001701204615612448869092L) * n + + -0.001701204615612448869092L) * n + + 0.00849440083073295641406L) * n + 0.00849440083073295641406L) * n + + -0.0154508901653956014006L) * n + -0.0154508901653956014006L) * n + 0); + temp4 = + (((((((((((((((((((-4.499365524008844475172e-11L * n + + 2.249682762004422237586e-10L) * n + + 1.036353859030037177448e-8L) * n + + -5.361743916110539666247e-8L) * n + + -9.055962977483081452069e-7L) * n + + 4.95944064672382885224e-6L) * n + + 0.00003692269336312137953216L) * n + + -0.0002248941866481468781196L) * n + + -0.0006732184692025333713054L) * n + + 0.005221915671927051006285L) * n + + 0.002777983861864145916888L) * n + + -0.05828934309668829292317L) * n + + 0.05685615765228450251736L) * n + 0.2453964441963862358159L) * n + + -0.5590384960773200954298L) * n + 0.06133519352147041251501L) * n + + 1.L) * n + -1.306805353075718852449L) * n + + 0.6917533456723242827808L) * n + + -0.1383506691344648565562L) / + ((((((((((((((((((((1.017269595573876633683e-15L * n + + 1.017269595573876633683e-15L) * n + + -3.906315247003686273342e-13L) * n + + -3.906315247003686273342e-13L) * n + + 6.211651604493205500594e-11L) * n + + 6.211651604493205500594e-11L) * n + + -5.323278204835303627412e-9L) * n + + -5.323278204835303627412e-9L) * n + + 2.682005582327845592842e-7L) * n + + 2.682005582327845592842e-7L) * n + + -8.136411060790675798135e-6L) * n + + -8.136411060790675798135e-6L) * n + + 0.0001463338126802418696644L) * n + + 0.0001463338126802418696644L) * n + + -0.001474908835139041799585L) * n + + -0.001474908835139041799585L) * n + + 0.007364467930243707729022L) * n + 0.007364467930243707729022L) * n + + -0.01339559874606899302752L) * n + -0.01339559874606899302752L) * n + + 0); + temp6 = + (((((((((((((((((((2.235030309862229898129e-10L * n + + -1.56452121690356092869e-9L) * n + + -4.045404860850636115613e-8L) * n + + 3.082106797300015029519e-7L) * n + + 2.492326999133569804001e-6L) * n + + -0.00002245275688802638359982L) * n + + -0.00005215168638625444679039L) * n + + 0.0007394111437583761596733L) * n + + -0.0003538371121112016603862L) * n + + -0.01049407460723896513682L) * n + + 0.02427898675680455424684L) * n + + 0.03817743073206367516833L) * n + + -0.2231334594063266182393L) * n + 0.2800430982705663864868L) * n + + 0.1343215795382925782644L) * n + -0.7837414793808508381549L) * n + + 1.L) * n + -0.6499110106605874624371L) * n + + 0.2218360671640070148162L) * n + + -0.03169086673771528783089L) / + ((((((((((((((((((((1.910881507634349139317e-15L * n + + 1.910881507634349139317e-15L) * n + + -7.337784989315900694977e-13L) * n + + -7.337784989315900694977e-13L) * n + + 1.16682246619168627145e-10L) * n + + 1.16682246619168627145e-10L) * n + + -9.999467128351846685924e-9L) * n + + -9.999467128351846685924e-9L) * n + + 5.037990806902263585806e-7L) * n + + 5.037990806902263585806e-7L) * n + + -0.00001528377285846775005228L) * n + + -0.00001528377285846775005228L) * n + + 0.0002748795184766689978812L) * n + + 0.0002748795184766689978812L) * n + + -0.002770530084430343580944L) * n + + -0.002770530084430343580944L) * n + + 0.01383372278371306352979L) * n + 0.01383372278371306352979L) * n + + -0.02516284968992191571762L) * n + -0.02516284968992191571762L) * n + + 0); + temp8 = + (((((((((((((((((((-2.330735430362059731419e-9L * n + + 2.097661887325853758277e-8L) * n + + 3.006648705167057053531e-7L) * n + + -3.265360337937245683718e-6L) * n + + -8.713221332865524099937e-6L) * n + + 0.0001683667337243223260544L) * n + + -0.0002047906679207301856879L) * n + + -0.003114302311443200688103L) * n + + 0.01175434507785456112624L) * n + + 0.003675130929495651454344L) * n + + -0.1092021291824869163068L) * n + + 0.2675551359539219518826L) * n + + -0.2019725853011909041849L) * n + + -0.3178994814035088364193L) * n + 1.L) * n + + -1.246034266783949806262L) * n + 0.9085807246840069147406L) * n + + -0.4042978061449322864155L) * n + 0.1023787323982643873624L) * n + + -0.01137541471091826526249L) / + ((((((((((((((((((((1.794601097633786058858e-14L * n + + 1.794601097633786058858e-14L) * n + + -6.891268214913738466013e-12L) * n + + -6.891268214913738466013e-12L) * n + + 1.09581932223714244326e-9L) * n + + 1.09581932223714244326e-9L) * n + + -9.390982440616620137684e-8L) * n + + -9.390982440616620137684e-8L) * n + + 4.731420444341739738404e-6L) * n + + 4.731420444341739738404e-6L) * n + + -0.0001435372912355387425489L) * n + + -0.0001435372912355387425489L) * n + + 0.002581526293516628087489L) * n + + 0.002581526293516628087489L) * n + + -0.02601938587338886759227L) * n + + -0.02601938587338886759227L) * n + 0.1299191707744731801942L) * n + + 0.1299191707744731801942L) * n + -0.2363164722287363056747L) * n + + -0.2363164722287363056747L) * n + 0); + temp10 = + (((((((((((((((((((7.083955949472413492462e-9L * n + + -7.792351544419654841708e-8L) * n + + -5.26574058910782736273e-7L) * n + + 8.909255265786472035686e-6L) * n + + -0.0000133083919104088408145L) * n + + -0.000234290036435550955574L) * n + + 0.00120442768377872730849L) * n + + -0.0008299819162141003411304L) * n + + -0.01043610023159456691256L) * n + + 0.04124989047128472836542L) * n + + -0.06741263508454443084838L) * n + + 0.02339354136007203665546L) * n + + 0.1243452549428398311228L) * n + -0.2970604867756315160986L) * n + + 0.3627612717610614534167L) * n + -0.2844878509918991817806L) * n + + 0.1489494157015216696653L) * n + -0.05073632845434622685119L) * n + + 0.01022875493240717064245L) * n + + -0.0009298868120370155129496L) / + ((((((((((((((((((((1.381321237609371689526e-13L * n + + 1.381321237609371689526e-13L) * n + + -5.304273552419987287778e-11L) * n + + -5.304273552419987287778e-11L) * n + + 8.434623741090345410581e-9L) * n + + 8.434623741090345410581e-9L) * n + + -7.228326954855981989092e-7L) * n + + -7.228326954855981989092e-7L) * n + + 0.00003641818536969434070611L) * n + + 0.00003641818536969434070611L) * n + + -0.001104819945970139167695L) * n + + -0.001104819945970139167695L) * n + + 0.01987024915666912767279L) * n + + 0.01987024915666912767279L) * n + + -0.2002736448999966742205L) * n + -0.2002736448999966742205L) * n + + 1.L) * n + 1.L) * n + -1.818949973433545912704L) * n + + -1.818949973433545912704L) * n + 0); + a2 = + temp0 * sum0 + temp2 * sum2 + temp4 * sum4 + temp6 * sum6 + temp8 * sum8 + + temp10 * sum10; + temp1 = + (((((((((((((((((-6.661079372773574194623e-10L * n + + 1.998323811832072258387e-9L) * n + + 1.301130837481771492683e-7L) * n + + -3.956681147427503071606e-7L) * n + + -9.722067380542123989525e-6L) * n + + 0.00003022309340210644574079L) * n + + 0.0003480082187082577223423L) * n + + -0.00112497186895055038026L) * n + + -0.006115939851140910792323L) * n + + 0.02137472694156612579541L) * n + + 0.04645934409098801487831L) * n + + -0.1973862732465215112288L) * n + + -0.07195199994019335535891L) * n + 0.7615554754691565848849L) * n + + -0.4964345765918953164026L) * n + -0.723410696691590450088L) * n + + 1.L) * n + + -0.3333333333333333333333L) / + ((((((((((((((((((2.622080287281795635935e-13L * n + + 2.622080287281795635935e-13L) * n + + -7.446708015880299606054e-11L) * n + + -7.446708015880299606054e-11L) * n + + 8.56423863431980090609e-9L) * n + + 8.56423863431980090609e-9L) * n + + -5.156866277639405731558e-7L) * n + + -5.156866277639405731558e-7L) * n + + 0.00001756182139810188851608L) * n + + 0.00001756182139810188851608L) * n + + -0.0003410321232078041474922L) * n + + -0.0003410321232078041474922L) * n + + 0.003615304703724904793599L) * n + + 0.003615304703724904793599L) * n + + -0.01863712718301733749371L) * n + -0.01863712718301733749371L) * n + + 0.03452804994981630759735L) * n + 0.03452804994981630759735L) * n + 0); + temp3 = + (((((((((((((((((2.23029041667469529915e-9L * n + + -1.115145208337347649575e-8L) * n + + -3.479253050012524666674e-7L) * n + + 1.828838141673250145303e-6L) * n + + 0.00001943921127173664422739L) * n + + -0.0001119516577554030052361L) * n + + -0.0004455912092077151569474L) * n + + 0.003144284245471874396564L) * n + + 0.002825822266363116881303L) * n + + -0.04057572261695189842073L) * n + + 0.03354781731346132148533L) * n + 0.1944840869204295511418L) * n + + -0.4006856585368126534289L) * n + -0.07683795883644908390404L) * n + + 1.L) * n + -1.230732078182991703864L) * n + + 0.6442075488643698149153L) * n + + -0.1288415097728739629831L) / + ((((((((((((((((((7.091020515381706052547e-14L * n + + 7.091020515381706052547e-14L) * n + + -2.013849826368404518923e-11L) * n + + -2.013849826368404518923e-11L) * n + + 2.316069120733972830883e-9L) * n + + 2.316069120733972830883e-9L) * n + + -1.394596677576532434719e-7L) * n + + -1.394596677576532434719e-7L) * n + + 4.749329622950119964636e-6L) * n + + 4.749329622950119964636e-6L) * n + + -0.00009222699220158658720478L) * n + + -0.00009222699220158658720478L) * n + + 0.0009777046091157372548534L) * n + + 0.0009777046091157372548534L) * n + + -0.005040129848180775330272L) * n + + -0.005040129848180775330272L) * n + 0.009337590146947273921034L) * n + + 0.009337590146947273921034L) * n + 0); + temp5 = + (((((((((((((((((-8.343962939498709058211e-9L * n + + 5.840774057649096340748e-8L) * n + + 9.512117751028528326361e-7L) * n + + -7.593006274943825242972e-6L) * n + + -0.00003159024368894211249439L) * n + + 0.0003454233777693675575918L) * n + + 0.00005169204240490014528834L) * n + + -0.006264697438753267753159L) * n + + 0.01206799756684636974885L) * n + + 0.03389921848941195325981L) * n + + -0.1495944399727999204917L) * n + 0.128690080757490321295L) * n + + 0.284463402496868608055L) * n + -0.8540295203417039410629L) * n + + 1.L) * n + -0.6336312742907114771721L) * n + + 0.2147136825021862712628L) * n + + -0.03067338321459803875183L) / + ((((((((((((((((((7.579693522192473372434e-14L * n + + 7.579693522192473372434e-14L) * n + + -2.152632960302662437771e-11L) * n + + -2.152632960302662437771e-11L) * n + + 2.475679498218505652904e-9L) * n + + 2.475679498218505652904e-9L) * n + + -1.490704388764411492135e-7L) * n + + -1.490704388764411492135e-7L) * n + + 5.076626544761035321267e-6L) * n + + 5.076626544761035321267e-6L) * n + + -0.00009858275460426191973404L) * n + + -0.00009858275460426191973404L) * n + + 0.001045082478080147482824L) * n + + 0.001045082478080147482824L) * n + + -0.005387467075916128308424L) * n + + -0.005387467075916128308424L) * n + 0.009981084019737133351036L) * n + + 0.009981084019737133351036L) * n + 0); + temp7 = + (((((((((((((((((6.077618087147014372546e-8L * n + + -5.469856278432312935291e-7L) * n + + -4.213815207088596631632e-6L) * n + + 0.0000525106202729502041788L) * n + + -3.241396313145074332024e-8L) * n + + -0.001474867736444140271814L) * n + + 0.004306764561651112456013L) * n + + 0.008295441641960975496183L) * n + + -0.06742194820322163243936L) * n + + 0.1279764978300194547681L) * n + + 0.006818712417919857624538L) * n + + -0.4695349912297539955234L) * n + 1.L) * n + + -1.137972191912851411235L) * n + 0.8021728552007050833438L) * n + + -0.3521070793975488950048L) * n + 0.08875465722664631143871L) * n + + -0.009861628580738479048746L) / + ((((((((((((((((((4.167765146694125527556e-13L * n + + 4.167765146694125527556e-13L) * n + + -1.183645301661131649826e-10L) * n + + -1.183645301661131649826e-10L) * n + + 1.36127545221323527981e-8L) * n + + 1.36127545221323527981e-8L) * n + + -8.196777056124510228048e-7L) * n + + -8.196777056124510228048e-7L) * n + + 0.000027914304337092947648L) * n + + 0.000027914304337092947648L) * n + + -0.0005420664668060299477835L) * n + + -0.0005420664668060299477835L) * n + + 0.005746483436052259944177L) * n + + 0.005746483436052259944177L) * n + -0.0296234899765056499437L) * n + + -0.0296234899765056499437L) * n + 0.05488192099309763468199L) * n + + 0.05488192099309763468199L) * n + 0); + temp9 = + (((((((((((((((((-4.450350554113147492628e-7L * n + + 4.895385609524462241891e-6L) * n + + 9.790771219048924483782e-6L) * n + + -0.0003035139077905166589972L) * n + + 0.001093896166201011653688L) * n + + 0.001635058793581170388792L) * n + + -0.02192170629661450813433L) * n + + 0.06423911487698362190466L) * n + + -0.06509837160825539180102L) * n + + -0.1087279130691410276673L) * n + + 0.4980495385050051821153L) * n + -0.8952529890779496700955L) * n + + 1.L) * n + -0.7545285813592108078925L) * n + + 0.3878725912954449136244L) * n + -0.1310081056989620977206L) * n + + 0.02633041428482845403256L) * n + + -0.002393674025893495821142L) / + ((((((((((((((((((6.833821350672013840294e-12L * n + + 6.833821350672013840294e-12L) * n + + -1.940805263590851930643e-9L) * n + + -1.940805263590851930643e-9L) * n + + 2.232062729556493160517e-7L) * n + + 2.232062729556493160517e-7L) * n + + -0.00001344013112093745499582L) * n + + -0.00001344013112093745499582L) * n + + 0.0004577066179443778012328L) * n + + 0.0004577066179443778012328L) * n + + -0.008888181708800725577621L) * n + + -0.008888181708800725577621L) * n + + 0.09422421805059326300635L) * n + 0.09422421805059326300635L) * n + + -0.4857318758554319336521L) * n + -0.4857318758554319336521L) * n + + 0.8998905414476574955529L) * n + 0.8998905414476574955529L) * n + 0); + a3 = + temp1 * sum1 + temp3 * sum3 + temp5 * sum5 + temp7 * sum7 + temp9 * sum9; + temp0 = + ((((((((((0.00001073468160934346687277L * n + + -0.00004293872643737386749109L) * n + + -0.001170080295418437889132L) * n + + 0.004895014813860620893984L) * n + + 0.02936293242875749638599L) * n + -0.1420985586900825854838L) * n + + -0.03067972003950362832238L) * n + 0.8529634877696194197547L) * n + + -1.463240871942404854939L) * n + 1.L) * n + + -0.25L) / + (((((((((((1.126832272985846036237e-8L * n + 0) * n + + -2.479031000568861279722e-6L) * n + 0) * n + + 0.0001844399064423232792113L) * n + 0) * n + + -0.005513364945265147486102L) * n + 0) * n + + 0.06079773948275120911293L) * n + 0) * n + + -0.1661581796454009131194L) * n + 0); + temp2 = + (((((((((((((((((((-4.499365524008844475172e-11L * n + + 2.249682762004422237586e-10L) * n + + 1.036353859030037177448e-8L) * n + + -5.361743916110539666247e-8L) * n + + -9.055962977483081452069e-7L) * n + + 4.95944064672382885224e-6L) * n + + 0.00003692269336312137953216L) * n + + -0.0002248941866481468781196L) * n + + -0.0006732184692025333713054L) * n + + 0.005221915671927051006285L) * n + + 0.002777983861864145916888L) * n + + -0.05828934309668829292317L) * n + + 0.05685615765228450251736L) * n + 0.2453964441963862358159L) * n + + -0.5590384960773200954298L) * n + 0.06133519352147041251501L) * n + + 1.L) * n + -1.306805353075718852449L) * n + + 0.6917533456723242827808L) * n + + -0.1383506691344648565562L) / + ((((((((((((((((((((1.017269595573876633683e-15L * n + + 1.017269595573876633683e-15L) * n + + -3.906315247003686273342e-13L) * n + + -3.906315247003686273342e-13L) * n + + 6.211651604493205500594e-11L) * n + + 6.211651604493205500594e-11L) * n + + -5.323278204835303627412e-9L) * n + + -5.323278204835303627412e-9L) * n + + 2.682005582327845592842e-7L) * n + + 2.682005582327845592842e-7L) * n + + -8.136411060790675798135e-6L) * n + + -8.136411060790675798135e-6L) * n + + 0.0001463338126802418696644L) * n + + 0.0001463338126802418696644L) * n + + -0.001474908835139041799585L) * n + + -0.001474908835139041799585L) * n + + 0.007364467930243707729022L) * n + 0.007364467930243707729022L) * n + + -0.01339559874606899302752L) * n + -0.01339559874606899302752L) * n + + 0); + temp4 = + (((((((((((((((((((1.265206753401892020769e-10L * n + + -8.856447273813244145383e-10L) * n + + -2.290024223657424557592e-8L) * n + + 1.744720112941209096641e-7L) * n + + 1.430898229827403799809e-6L) * n + + -0.00001285035073641206472519L) * n + + -0.00003120961411021651161152L) * n + + 0.0004326236838762999639168L) * n + + -0.0001555074831311430248501L) * n + + -0.006485693476515495648435L) * n + + 0.01406302672283360584938L) * n + + 0.02880323237414927859729L) * n + + -0.1412641673701436962027L) * n + 0.1190431290854672861292L) * n + + 0.2919495340144958336559L) * n + -0.8571879233972453383862L) * n + + 1.L) * n + -0.6329349557254180221406L) * n + + 0.2144090431298703846865L) * n + + -0.03062986330426719781236L) / + ((((((((((((((((((((3.677822445772515661633e-16L * n + + 3.677822445772515661633e-16L) * n + + -1.412283819176646014067e-13L) * n + + -1.412283819176646014067e-13L) * n + + 2.245751941837613513306e-11L) * n + + 2.245751941837613513306e-11L) * n + + -1.924570649906256338588e-9L) * n + + -1.924570649906256338588e-9L) * n + + 9.696485939706032870425e-8L) * n + + 9.696485939706032870425e-8L) * n + + -2.941626817277125334366e-6L) * n + + -2.941626817277125334366e-6L) * n + + 0.00005290532452680383344879L) * n + + 0.00005290532452680383344879L) * n + + -0.0005332365031791246161171L) * n + + -0.0005332365031791246161171L) * n + + 0.002662539564031939537226L) * n + 0.002662539564031939537226L) * n + + -0.004843026269261661337775L) * n + -0.004843026269261661337775L) * n + + 0); + temp6 = + (((((((((((((((((((-7.980963746022312729209e-10L * n + + 7.182867371420081456288e-9L) * n + + 1.029544323236878342068e-7L) * n + + -1.118133020817726013362e-6L) * n + + -3.292626403058965339562e-6L) * n + + 0.00006043377291617999734062L) * n + + -0.00005748443436704993841259L) * n + + -0.001254337425061542165969L) * n + + 0.004178437165984310036766L) * n + + 0.005269273801010740483096L) * n + + -0.05263824829582289233346L) * n + + 0.0934032680396459744953L) * n + + 0.05301235658151802793857L) * n + + -0.5015344116406299640564L) * n + 1.L) * n + + -1.115887837506960425674L) * n + 0.7805280516352659749231L) * n + + -0.341510855074433207175L) * n + 0.08599011165129873336194L) * n + + -0.009554456850144303706883L) / + ((((((((((((((((((((8.339804195091752350874e-16L * n + + 8.339804195091752350874e-16L) * n + + -3.202484810915232902736e-13L) * n + + -3.202484810915232902736e-13L) * n + + 5.092451237606925820491e-11L) * n + + 5.092451237606925820491e-11L) * n + + -4.364142809092919161091e-9L) * n + + -4.364142809092919161091e-9L) * n + + 2.19876830135073951045e-7L) * n + + 2.19876830135073951045e-7L) * n + + -6.670412188962855609372e-6L) * n + + -6.670412188962855609372e-6L) * n + + 0.0001199677401334289344394L) * n + + 0.0001199677401334289344394L) * n + + -0.001209163327419745083631L) * n + + -0.001209163327419745083631L) * n + + 0.006037555905189226239576L) * n + 0.006037555905189226239576L) * n + + -0.01098201215334749131379L) * n + -0.01098201215334749131379L) * n + + 0); + temp8 = + (((((((((((((((((((5.496622938627333454403e-9L * n + + -6.046285232490066799843e-8L) * n + + -4.085823051046317867773e-7L) * n + + 6.912919449146976374487e-6L) * n + + -6.553440308960748766569e-6L) * n + + -0.0002232933444926798269627L) * n + + 0.0009488592985204235812553L) * n + + 0.0008586208732954494061121L) * n + + -0.01585418388444104359344L) * n + + 0.04427532097860668962395L) * n + + -0.0249900681031533237056L) * n + + -0.1618227874898439081184L) * n + + 0.5438202909881988927301L) * n + -0.9173098246845078047451L) * n + + 1.L) * n + -0.7460908556329530389951L) * n + + 0.3814342290010055052959L) * n + -0.1285029922410906727762L) * n + + 0.02580246714127479738105L) * n + + -0.002345678831024981580096L) / + ((((((((((((((((((((5.001745200081852388788e-15L * n + + 5.001745200081852388788e-15L) * n + + -1.920670156831431317295e-12L) * n + + -1.920670156831431317295e-12L) * n + + 3.054165654073980705642e-10L) * n + + 3.054165654073980705642e-10L) * n + + -2.617367247146992602011e-8L) * n + + -2.617367247146992602011e-8L) * n + + 1.318697482591459775463e-6L) * n + + 1.318697482591459775463e-6L) * n + + -0.00004000537826577280504604L) * n + + -0.00004000537826577280504604L) * n + + 0.0007194989886335618052419L) * n + + 0.0007194989886335618052419L) * n + + -0.007251881132408497211537L) * n + + -0.007251881132408497211537L) * n + + 0.03620986244110953231848L) * n + 0.03620986244110953231848L) * n + + -0.06586392832528853576167L) * n + -0.06586392832528853576167L) * n + + 0); + temp10 = + (((((((((((((((((((-5.82090628051506172805e-8L * n + + 7.567178164669580246465e-7L) * n + + 9.895540676875604937685e-7L) * n + + -0.0000552404006020879357992L) * n + + 0.0002572840575987657283798L) * n + + 0.0002149078598766160789996L) * n + + -0.005794085761862555186488L) * n + + 0.02200175068468548717565L) * n + + -0.03214040012643673687711L) * n + + -0.03382434950734787413462L) * n + + 0.2668791674432032830887L) * n + + -0.6533451900204919184699L) * n + 1.L) * n + + -1.074597940856066383877L) * n + 0.8388364014997714712194L) * n + + -0.476697576122513823017L) * n + 0.1930869647500661947918L) * n + + -0.05299716468644424351785L) * n + 0.00885493171738766019536L) * n + + -0.0006811485936452046304123L) / + ((((((((((((((((((((1.309656343600161221563e-13L * n + + 1.309656343600161221563e-13L) * n + + -5.029080359424619090803e-11L) * n + + -5.029080359424619090803e-11L) * n + + 7.997023565291304451109e-9L) * n + + 7.997023565291304451109e-9L) * n + + -6.853311157676032457608e-7L) * n + + -6.853311157676032457608e-7L) * n + + 0.00003452875854886022284577L) * n + + 0.00003452875854886022284577L) * n + + -0.001047500328945904053104L) * n + + -0.001047500328945904053104L) * n + + 0.01883935260561501718859L) * n + + 0.01883935260561501718859L) * n + + -0.1898831657385843079768L) * n + -0.1898831657385843079768L) * n + + 0.9481185896097278309941L) * n + 0.9481185896097278309941L) * n + + -1.724580283382465458009L) * n + -1.724580283382465458009L) * n + 0); + a4 = + temp0 * sum0 + temp2 * sum2 + temp4 * sum4 + temp6 * sum6 + temp8 * sum8 + + temp10 * sum10; + temp1 = + (((((((((((((((((5.398058163014688521716e-9L * n + + -2.699029081507344260858e-8L) * n + + -8.420970734302914093877e-7L) * n + + 4.426407693672044587807e-6L) * n + + 0.00004649527431076651713371L) * n + + -0.0002681899243603377649282L) * n + + -0.001037611541245401641162L) * n + + 0.007383714265327790752226L) * n + + 0.005729354906034877960593L) * n + + -0.0908133474235073586061L) * n + + 0.0857064433239907927809L) * n + 0.3864267487693772904306L) * n + + -0.9297647019794745659897L) * n + 0.3758289711751939129039L) * n + + 1.L) * n + -1.478482879128070714076L) * n + + 0.7990517994550441962973L) * n + + -0.1598103598910088392595L) / + ((((((((((((((((((6.610806697442673805042e-13L * n + + 6.610806697442673805042e-13L) * n + + -1.877469102073719360632e-10L) * n + + -1.877469102073719360632e-10L) * n + + 2.159221683518726118203e-8L) * n + + 2.159221683518726118203e-8L) * n + + -1.300152641831408611377e-6L) * n + + -1.300152641831408611377e-6L) * n + + 0.0000442769838440827899686L) * n + + 0.0000442769838440827899686L) * n + + -0.0008598125141630933417388L) * n + + -0.0008598125141630933417388L) * n + + 0.009114930867909024634825L) * n + + 0.009114930867909024634825L) * n + + -0.04698805212036625152626L) * n + -0.04698805212036625152626L) * n + + 0.08705235494314589220492L) * n + 0.08705235494314589220492L) * n + 0); + temp3 = + (((((((((((((((((-8.343962939498709058211e-9L * n + + 5.840774057649096340748e-8L) * n + + 9.512117751028528326361e-7L) * n + + -7.593006274943825242972e-6L) * n + + -0.00003159024368894211249439L) * n + + 0.0003454233777693675575918L) * n + + 0.00005169204240490014528834L) * n + + -0.006264697438753267753159L) * n + + 0.01206799756684636974885L) * n + + 0.03389921848941195325981L) * n + + -0.1495944399727999204917L) * n + 0.128690080757490321295L) * n + + 0.284463402496868608055L) * n + -0.8540295203417039410629L) * n + + 1.L) * n + -0.6336312742907114771721L) * n + + 0.2147136825021862712628L) * n + + -0.03067338321459803875183L) / + ((((((((((((((((((7.579693522192473372434e-14L * n + + 7.579693522192473372434e-14L) * n + + -2.152632960302662437771e-11L) * n + + -2.152632960302662437771e-11L) * n + + 2.475679498218505652904e-9L) * n + + 2.475679498218505652904e-9L) * n + + -1.490704388764411492135e-7L) * n + + -1.490704388764411492135e-7L) * n + + 5.076626544761035321267e-6L) * n + + 5.076626544761035321267e-6L) * n + + -0.00009858275460426191973404L) * n + + -0.00009858275460426191973404L) * n + + 0.001045082478080147482824L) * n + + 0.001045082478080147482824L) * n + + -0.005387467075916128308424L) * n + + -0.005387467075916128308424L) * n + 0.009981084019737133351036L) * n + + 0.009981084019737133351036L) * n + 0); + temp5 = + (((((((((((((((((3.452192717280633720214e-8L * n + + -3.106973445552570348192e-7L) * n + + -2.393520283981239379348e-6L) * n + + 0.00002982694507730467534265L) * n + + 5.551125889387259022104e-6L) * n + + -0.0008878763493428407477692L) * n + + 0.00243553167932469128695L) * n + + 0.006145713151317183210694L) * n + + -0.04163257899124196369214L) * n + + 0.05761931966352370551849L) * n + + 0.1061988133988173070063L) * n + -0.5400693180453914776364L) * n + + 1.L) * n + -1.088467909722196160298L) * n + + 0.7535336938729760483259L) * n + -0.3282718674818370756294L) * n + + 0.0825342417548834112127L) * n + + -0.009170471306098156801412L) / + ((((((((((((((((((8.517496685006894230596e-14L * n + + 8.517496685006894230596e-14L) * n + + -2.418969058541957961489e-11L) * n + + -2.418969058541957961489e-11L) * n + + 2.781984767256951793597e-9L) * n + + 2.781984767256951793597e-9L) * n + + -1.675142887037653893847e-7L) * n + + -1.675142887037653893847e-7L) * n + + 5.704735902502907576282e-6L) * n + + 5.704735902502907576282e-6L) * n + + -0.0001107799785152483167098L) * n + + -0.0001107799785152483167098L) * n + + 0.001174386077292428069762L) * n + + 0.001174386077292428069762L) * n + + -0.006054035407282021241823L) * n + + -0.006054035407282021241823L) * n + 0.01121600099027427909345L) * n + + 0.01121600099027427909345L) * n + 0); + temp7 = + (((((((((((((((((-1.811511430536487161315e-7L * n + + 1.992662573590135877447e-6L) * n + + 3.985325147180271754894e-6L) * n + + -0.0001235450795625884244017L) * n + + 0.0003761905404080771671665L) * n + + 0.001425417960974810531L) * n + + -0.01141444087263591887676L) * n + + 0.02315724838391375165963L) * n + + 0.02265199771803234165159L) * n + + -0.2281820053713326705885L) * n + + 0.6024939279143243656137L) * n + -0.9459647878408132317626L) * n + + 1.L) * n + -0.7350086459414998549784L) * n + + 0.3729622257598133096575L) * n + -0.1252039543818482260707L) * n + + 0.02510703181101292942801L) * n + + -0.002282457437364811766183L) / + ((((((((((((((((((3.262489065467861692124e-13L * n + + 3.262489065467861692124e-13L) * n + + -9.265468945928727205632e-11L) * n + + -9.265468945928727205632e-11L) * n + + 1.065594178563112985881e-8L) * n + + 1.065594178563112985881e-8L) * n + + -6.416363344968167332793e-7L) * n + + -6.416363344968167332793e-7L) * n + + 0.00002185106633039165645626L) * n + + 0.00002185106633039165645626L) * n + + -0.0004243247540265637778252L) * n + + -0.0004243247540265637778252L) * n + + 0.004498295540928808020489L) * n + + 0.004498295540928808020489L) * n + + -0.02318900147384897971349L) * n + -0.02318900147384897971349L) * n + + 0.04296107406000936499361L) * n + 0.04296107406000936499361L) * n + 0); + temp9 = + (((((((((((((((((1.462972174269245398953e-6L * n + + -0.00001901863826550019018638L) * n + + 0.00004096322087953887117067L) * n + + 0.0005325218714340053252187L) * n + + -0.00402219816445757868352L) * n + + 0.0107518701660961075187L) * n + + -0.00007607455306200076074553L) * n + + -0.09065550906555090655509L) * n + + 0.332078103207810320781L) * n + -0.695815899581589958159L) * n + + 1.L) * n + -1.041536705971852415367L) * n + + 0.799391403575503993914L) * n + -0.4500141420643512693722L) * n + + 0.1813363763154558133638L) * n + -0.04964157181730403487726L) * n + + 0.008285786737669582857867L) * n + + -0.0006373682105899679121436L) / + ((((((((((((((((((5.76024371183008985175e-12L * n + + 5.76024371183008985175e-12L) * n + + -1.635909214159745517897e-9L) * n + + -1.635909214159745517897e-9L) * n + + 1.881410801157943947379e-7L) * n + + 1.881410801157943947379e-7L) * n + + -0.00001132871739000593235216L) * n + + -0.00001132871739000593235216L) * n + + 0.0003858019594875501595613L) * n + + 0.0003858019594875501595613L) * n + + -0.00749186877597963001924L) * n + + -0.00749186877597963001924L) * n + + 0.07942180980113923154233L) * n + 0.07942180980113923154233L) * n + + -0.4094245137468433678082L) * n + -0.4094245137468433678082L) * n + + 0.7585198041794739226007L) * n + 0.7585198041794739226007L) * n + 0); + a5 = + temp1 * sum1 + temp3 * sum3 + temp5 * sum5 + temp7 * sum7 + temp9 * sum9; + temp0 = + ((((((((((-0.00004768565615462868769074L * n + + 0.0002861139369277721261445L) * n + + 0.002877034587995930824008L) * n + + -0.0206002034587995930824L) * n + + 0.002091810783316378433367L) * n + 0.2349059003051881993896L) * n + + -0.7123283316378433367243L) * n + 1.L) * n + + -0.7625731180061037639878L) * n + 0.3064661749745676500509L) * n + + -0.05107769582909460834181L) / + (((((((((((2.061137622362944823382e-8L * n + 0) * n + + -4.53450276919847861144e-6L) * n + 0) * n + + 0.0003373670060283668086911L) * n + 0) * n + + -0.01008473415869741643184L) * n + 0) * n + + 0.1112077735140388482498L) * n + 0) * n + + -0.3039271092431503918766L) * n + 0); + temp2 = + (((((((((((((((((((2.235030309862229898129e-10L * n + + -1.56452121690356092869e-9L) * n + + -4.045404860850636115613e-8L) * n + + 3.082106797300015029519e-7L) * n + + 2.492326999133569804001e-6L) * n + + -0.00002245275688802638359982L) * n + + -0.00005215168638625444679039L) * n + + 0.0007394111437583761596733L) * n + + -0.0003538371121112016603862L) * n + + -0.01049407460723896513682L) * n + + 0.02427898675680455424684L) * n + + 0.03817743073206367516833L) * n + + -0.2231334594063266182393L) * n + 0.2800430982705663864868L) * n + + 0.1343215795382925782644L) * n + -0.7837414793808508381549L) * n + + 1.L) * n + -0.6499110106605874624371L) * n + + 0.2218360671640070148162L) * n + + -0.03169086673771528783089L) / + ((((((((((((((((((((1.910881507634349139317e-15L * n + + 1.910881507634349139317e-15L) * n + + -7.337784989315900694977e-13L) * n + + -7.337784989315900694977e-13L) * n + + 1.16682246619168627145e-10L) * n + + 1.16682246619168627145e-10L) * n + + -9.999467128351846685924e-9L) * n + + -9.999467128351846685924e-9L) * n + + 5.037990806902263585806e-7L) * n + + 5.037990806902263585806e-7L) * n + + -0.00001528377285846775005228L) * n + + -0.00001528377285846775005228L) * n + + 0.0002748795184766689978812L) * n + + 0.0002748795184766689978812L) * n + + -0.002770530084430343580944L) * n + + -0.002770530084430343580944L) * n + + 0.01383372278371306352979L) * n + 0.01383372278371306352979L) * n + + -0.02516284968992191571762L) * n + -0.02516284968992191571762L) * n + + 0); + temp4 = + (((((((((((((((((((-7.980963746022312729209e-10L * n + + 7.182867371420081456288e-9L) * n + + 1.029544323236878342068e-7L) * n + + -1.118133020817726013362e-6L) * n + + -3.292626403058965339562e-6L) * n + + 0.00006043377291617999734062L) * n + + -0.00005748443436704993841259L) * n + + -0.001254337425061542165969L) * n + + 0.004178437165984310036766L) * n + + 0.005269273801010740483096L) * n + + -0.05263824829582289233346L) * n + + 0.0934032680396459744953L) * n + + 0.05301235658151802793857L) * n + + -0.5015344116406299640564L) * n + 1.L) * n + + -1.115887837506960425674L) * n + 0.7805280516352659749231L) * n + + -0.341510855074433207175L) * n + 0.08599011165129873336194L) * n + + -0.009554456850144303706883L) / + ((((((((((((((((((((8.339804195091752350874e-16L * n + + 8.339804195091752350874e-16L) * n + + -3.202484810915232902736e-13L) * n + + -3.202484810915232902736e-13L) * n + + 5.092451237606925820491e-11L) * n + + 5.092451237606925820491e-11L) * n + + -4.364142809092919161091e-9L) * n + + -4.364142809092919161091e-9L) * n + + 2.19876830135073951045e-7L) * n + + 2.19876830135073951045e-7L) * n + + -6.670412188962855609372e-6L) * n + + -6.670412188962855609372e-6L) * n + + 0.0001199677401334289344394L) * n + + 0.0001199677401334289344394L) * n + + -0.001209163327419745083631L) * n + + -0.001209163327419745083631L) * n + + 0.006037555905189226239576L) * n + 0.006037555905189226239576L) * n + + -0.01098201215334749131379L) * n + -0.01098201215334749131379L) * n + + 0); + temp6 = + (((((((((((((((((((3.545065269494643229881e-9L * n + + -3.899571796444107552869e-8L) * n + + -2.635165183657684800878e-7L) * n + + 4.458510420601096302113e-6L) * n + + -3.415552218315772263882e-6L) * n + + -0.0001529360064274759727468L) * n + + 0.0006171070004495953872653L) * n + + 0.0008541518074349934674269L) * n + + -0.01134603783245669601195L) * n + + 0.02608564687146204199553L) * n + + 0.01427264595157697258805L) * n + + -0.2155241399051836994277L) * n + + 0.5908862144611042493784L) * n + -0.9401911641336248557287L) * n + + 1.L) * n + -0.7372742111841094418271L) * n + + 0.3746984073772344658181L) * n + -0.1258807406714056364337L) * n + + 0.0252497435002056883738L) * n + + -0.0022954312272914262158L) / + ((((((((((((((((((((1.287646055776080901142e-15L * n + + 1.287646055776080901142e-15L) * n + + -4.944560854180150660387e-13L) * n + + -4.944560854180150660387e-13L) * n + + 7.862624345779905198556e-11L) * n + + 7.862624345779905198556e-11L) * n + + -6.738133346439099956235e-9L) * n + + -6.738133346439099956235e-9L) * n + + 3.394846287237807834298e-7L) * n + + 3.394846287237807834298e-7L) * n + + -0.00001029895875801700366154L) * n + + -0.00001029895875801700366154L) * n + + 0.0001852273552106820277641L) * n + + 0.0001852273552106820277641L) * n + + -0.001866919597773586846923L) * n + + -0.001866919597773586846923L) * n + + 0.009321843614050177249854L) * n + 0.009321843614050177249854L) * n + + -0.01695596719412823952701L) * n + -0.01695596719412823952701L) * n + + 0); + temp8 = + (((((((((((((((((((-2.596166956796977978585e-8L * n + + 3.37501704383607137216e-7L) * n + + 4.413483826554862563594e-7L) * n + + -0.00002463762442000332101677L) * n + + 0.0001010428179585383829265L) * n + + 0.0002740513839594889954194L) * n + + -0.003320289844386791076372L) * n + + 0.009402797484127294842839L) * n + + 0.001847484329795865469121L) * n + + -0.09271644321803825109317L) * n + + 0.3336886101274811437798L) * n + + -0.6966001428307212951425L) * n + 1.L) * n + + -1.041112069154410768236L) * n + 0.7989326846100572807893L) * n + + -0.449722474944652316648L) * n + 0.1812124276227594949354L) * n + + -0.04960680532205918409119L) * n + 0.008279929313643033897321L) * n + + -0.0006369176395110026074862L) / + ((((((((((((((((((((8.017283220551543548957e-15L * n + + 8.017283220551543548957e-15L) * n + + -3.0786367566917927228e-12L) * n + + -3.0786367566917927228e-12L) * n + + 4.895513480133183521864e-10L) * n + + 4.895513480133183521864e-10L) * n + + -4.195370550308993664969e-8L) * n + + -4.195370550308993664969e-8L) * n + + 2.113736461423716122932e-6L) * n + + 2.113736461423716122932e-6L) * n + + -0.00006412450756123062294542L) * n + + -0.00006412450756123062294542L) * n + + 0.001153282891875672086617L) * n + + 0.001153282891875672086617L) * n + + -0.01162401973601964317438L) * n + + -0.01162401973601964317438L) * n + 0.05804068599152876457636L) * n + + 0.05804068599152876457636L) * n + -0.1055731042423560267371L) * n + + -0.1055731042423560267371L) * n + 0); + temp10 = + (((((((((((((((((((1.84182854686282750804e-7L * n + + -2.76274282029424126206e-6L) * n + + 7.919862751510158284572e-6L) * n + + 0.0000874868559759843066319L) * n + + -0.0008186068370816732287068L) * n + + 0.002707487963888356436819L) * n + + -0.001119095025073853993885L) * n + + -0.02559429506434543276206L) * n + + 0.1201354771633841596049L) * n + + -0.3148672943421109431916L) * n + + 0.5727844887260905565325L) * n + + -0.7733023980059299336502L) * n + + 0.7959963042632455765077L) * n + -0.6301467653552958290084L) * n + + 0.3822358571007125849532L) * n + -0.1749051959300253160805L) * n + + 0.05853005732220120054358L) * n + -0.01353504544233086050833L) * n + + 0.001935209254188772862698L) * n + + -0.0001290139502792515241798L) / + ((((((((((((((((((((1.381321237609371689526e-13L * n + + 1.381321237609371689526e-13L) * n + + -5.304273552419987287778e-11L) * n + + -5.304273552419987287778e-11L) * n + + 8.434623741090345410581e-9L) * n + + 8.434623741090345410581e-9L) * n + + -7.228326954855981989092e-7L) * n + + -7.228326954855981989092e-7L) * n + + 0.00003641818536969434070611L) * n + + 0.00003641818536969434070611L) * n + + -0.001104819945970139167695L) * n + + -0.001104819945970139167695L) * n + + 0.01987024915666912767279L) * n + + 0.01987024915666912767279L) * n + + -0.2002736448999966742205L) * n + -0.2002736448999966742205L) * n + + 1.L) * n + 1.L) * n + -1.818949973433545912704L) * n + + -1.818949973433545912704L) * n + 0); + a6 = + temp0 * sum0 + temp2 * sum2 + temp4 * sum4 + temp6 * sum6 + temp8 * sum8 + + temp10 * sum10; + temp1 = + (((((((((((((((((-2.617501884470481724523e-8L * n + + 1.832251319129337207166e-7L) * n + + 2.983952148296349165957e-6L) * n + + -0.00002381926714868138369316L) * n + + -0.00009218841637105036633771L) * n + + 0.001035221995308075522049L) * n + + -0.0001129339884496821272058L) * n + + -0.01695277445514996898522L) * n + + 0.03876584606661373280141L) * n + + 0.05446696851349398128999L) * n + + -0.3475810591909835645486L) * n + 0.521020817358937457567L) * n + + -0.1004571571741303075151L) * n + -0.6745443028310279660557L) * n + + 1.L) * n + -0.6751301296670797109569L) * n + + 0.2328694317293473735436L) * n + + -0.03326706167562105336338L) / + ((((((((((((((((((2.545591715187033559108e-12L * n + + 2.545591715187033559108e-12L) * n + + -7.229480471131175307867e-10L) * n + + -7.229480471131175307867e-10L) * n + + 8.314411660143889010759e-8L) * n + + 8.314411660143889010759e-8L) * n + + -5.006435590992060396966e-6L) * n + + -5.006435590992060396966e-6L) * n + + 0.0001704952638995910805284L) * n + + 0.0001704952638995910805284L) * n + + -0.003310838923053662837718L) * n + + -0.003310838923053662837718L) * n + + 0.03509842832165639249484L) * n + 0.03509842832165639249484L) * n + + -0.1809346448394138433314L) * n + -0.1809346448394138433314L) * n + + 0.3352083394247738293797L) * n + 0.3352083394247738293797L) * n + 0); + temp3 = + (((((((((((((((((6.077618087147014372546e-8L * n + + -5.469856278432312935291e-7L) * n + + -4.213815207088596631632e-6L) * n + + 0.0000525106202729502041788L) * n + + -3.241396313145074332024e-8L) * n + + -0.001474867736444140271814L) * n + + 0.004306764561651112456013L) * n + + 0.008295441641960975496183L) * n + + -0.06742194820322163243936L) * n + + 0.1279764978300194547681L) * n + + 0.006818712417919857624538L) * n + + -0.4695349912297539955234L) * n + 1.L) * n + + -1.137972191912851411235L) * n + 0.8021728552007050833438L) * n + + -0.3521070793975488950048L) * n + 0.08875465722664631143871L) * n + + -0.009861628580738479048746L) / + ((((((((((((((((((4.167765146694125527556e-13L * n + + 4.167765146694125527556e-13L) * n + + -1.183645301661131649826e-10L) * n + + -1.183645301661131649826e-10L) * n + + 1.36127545221323527981e-8L) * n + + 1.36127545221323527981e-8L) * n + + -8.196777056124510228048e-7L) * n + + -8.196777056124510228048e-7L) * n + + 0.000027914304337092947648L) * n + + 0.000027914304337092947648L) * n + + -0.0005420664668060299477835L) * n + + -0.0005420664668060299477835L) * n + + 0.005746483436052259944177L) * n + + 0.005746483436052259944177L) * n + -0.0296234899765056499437L) * n + + -0.0296234899765056499437L) * n + 0.05488192099309763468199L) * n + + 0.05488192099309763468199L) * n + 0); + temp5 = + (((((((((((((((((-1.811511430536487161315e-7L * n + + 1.992662573590135877447e-6L) * n + + 3.985325147180271754894e-6L) * n + + -0.0001235450795625884244017L) * n + + 0.0003761905404080771671665L) * n + + 0.001425417960974810531L) * n + + -0.01141444087263591887676L) * n + + 0.02315724838391375165963L) * n + + 0.02265199771803234165159L) * n + + -0.2281820053713326705885L) * n + + 0.6024939279143243656137L) * n + -0.9459647878408132317626L) * n + + 1.L) * n + -0.7350086459414998549784L) * n + + 0.3729622257598133096575L) * n + -0.1252039543818482260707L) * n + + 0.02510703181101292942801L) * n + + -0.002282457437364811766183L) / + ((((((((((((((((((3.262489065467861692124e-13L * n + + 3.262489065467861692124e-13L) * n + + -9.265468945928727205632e-11L) * n + + -9.265468945928727205632e-11L) * n + + 1.065594178563112985881e-8L) * n + + 1.065594178563112985881e-8L) * n + + -6.416363344968167332793e-7L) * n + + -6.416363344968167332793e-7L) * n + + 0.00002185106633039165645626L) * n + + 0.00002185106633039165645626L) * n + + -0.0004243247540265637778252L) * n + + -0.0004243247540265637778252L) * n + + 0.004498295540928808020489L) * n + + 0.004498295540928808020489L) * n + + -0.02318900147384897971349L) * n + -0.02318900147384897971349L) * n + + 0.04296107406000936499361L) * n + 0.04296107406000936499361L) * n + 0); + temp7 = + (((((((((((((((((9.424537726424518877349e-7L * n + + -0.00001225189904435187454055L) * n + + 0.00002638870563398865285658L) * n + + 0.0003430531732418524871355L) * n + + -0.002383779742270308308044L) * n + + 0.004230989136649514008005L) * n + + 0.01612349914236706689537L) * n + + -0.1176999101527403414196L) * n + + 0.3621743036837376460018L) * n + + -0.715094339622641509434L) * n + 1.L) * n + + -1.026758147512864493997L) * n + 0.7818181818181818181818L) * n + + -0.4381492721115362624797L) * n + 0.1761169647962100792289L) * n + + -0.04815184815184815184815L) * n + 0.00803316180674671240709L) * n + + -0.0006179355235959009543915L) / + ((((((((((((((((((1.209640524205532649685e-12L * n + + 1.209640524205532649685e-12L) * n + + -3.435379088743712725107e-10L) * n + + -3.435379088743712725107e-10L) * n + + 3.950927880160110740402e-8L) * n + + 3.950927880160110740402e-8L) * n + + -2.379009696079214706397e-6L) * n + + -2.379009696079214706397e-6L) * n + + 0.0000810176978372625450688L) * n + + 0.0000810176978372625450688L) * n + + -0.0015732785845229143506L) * n + + -0.0015732785845229143506L) * n + + 0.01667843314405166714917L) * n + 0.01667843314405166714917L) * n + + -0.08597839053479540016727L) * n + -0.08597839053479540016727L) * n + + 0.1592877557703935942716L) * n + 0.1592877557703935942716L) * n + 0); + temp9 = + (((((((((((((((((-2.755314017432770734805e-6L * n + + 0.00004132971026149156102207L) * n + + -0.0002222619974062435059409L) * n + + 0.0002479782615689493661324L) * n + + 0.003278823680744997174418L) * n + + -0.02223171036865921613556L) * n + + 0.07772740843177846242885L) * n + + -0.1836086154936849762259L) * n + + 0.3178346562909282134955L) * n + + -0.4176504987624593879817L) * n + + 0.4231666374253597949928L) * n + -0.331804098359312361121L) * n + + 0.2000853933179329452201L) * n + -0.09122844711719903902939L) * n + + 0.03046458865274833509116L) * n + -0.007037072000523296456692L) * n + + 0.001005689616362961318204L) * n + + -0.00006704597442419742121359L) / + ((((((((((((((((((7.59405842812662330593e-12L * n + + 7.59405842812662330593e-12L) * n + + -2.156712593587961018884e-9L) * n + + -2.156712593587961018884e-9L) * n + + 2.480371363794717704183e-7L) * n + + 2.480371363794717704183e-7L) * n + + -0.00001493529546306405506876L) * n + + -0.00001493529546306405506876L) * n + + 0.0005086247680835308517554L) * n + + 0.0005086247680835308517554L) * n + + -0.009876958696001262873691L) * n + + -0.009876958696001262873691L) * n + + 0.1047063100574591976708L) * n + 0.1047063100574591976708L) * n + + -0.5397677311665406903502L) * n + -0.5397677311665406903502L) * n + + 1.L) * n + 1.L) * n + 0); + a7 = + temp1 * sum1 + temp3 * sum3 + temp5 * sum5 + temp7 * sum7 + temp9 * sum9; + temp0 = + ((((((((((0.0004526199714624807083034L * n + + -0.003620959771699845666427L) * n + + -0.004073579743162326374731L) * n + + 0.1086287931509953699928L) * n + -0.4372308924327563642211L) * n + + 0.9124818624683611079397L) * n + -1.159612366886875574673L) * n + + 0.9342076210985601819383L) * n + -0.4684616704636675330941L) * n + + 0.1339755115528942896578L) * n + + -0.01674693894411178620723L) / + (((((((((((1.853411463275763902069e-7L * n + 0) * n + + -0.00004077505219206680584551L) * n + 0) * n + + 0.003033663883089770354906L) * n + 0) * n + + -0.09068371607515657620042L) * n + 0) * n + 1.L) * n + 0) * n + + -2.732966407287910419434L) * n + 0); + temp2 = + (((((((((((((((((((-2.330735430362059731419e-9L * n + + 2.097661887325853758277e-8L) * n + + 3.006648705167057053531e-7L) * n + + -3.265360337937245683718e-6L) * n + + -8.713221332865524099937e-6L) * n + + 0.0001683667337243223260544L) * n + + -0.0002047906679207301856879L) * n + + -0.003114302311443200688103L) * n + + 0.01175434507785456112624L) * n + + 0.003675130929495651454344L) * n + + -0.1092021291824869163068L) * n + + 0.2675551359539219518826L) * n + + -0.2019725853011909041849L) * n + + -0.3178994814035088364193L) * n + 1.L) * n + + -1.246034266783949806262L) * n + 0.9085807246840069147406L) * n + + -0.4042978061449322864155L) * n + 0.1023787323982643873624L) * n + + -0.01137541471091826526249L) / + ((((((((((((((((((((1.794601097633786058858e-14L * n + + 1.794601097633786058858e-14L) * n + + -6.891268214913738466013e-12L) * n + + -6.891268214913738466013e-12L) * n + + 1.09581932223714244326e-9L) * n + + 1.09581932223714244326e-9L) * n + + -9.390982440616620137684e-8L) * n + + -9.390982440616620137684e-8L) * n + + 4.731420444341739738404e-6L) * n + + 4.731420444341739738404e-6L) * n + + -0.0001435372912355387425489L) * n + + -0.0001435372912355387425489L) * n + + 0.002581526293516628087489L) * n + + 0.002581526293516628087489L) * n + + -0.02601938587338886759227L) * n + + -0.02601938587338886759227L) * n + 0.1299191707744731801942L) * n + + 0.1299191707744731801942L) * n + -0.2363164722287363056747L) * n + + -0.2363164722287363056747L) * n + 0); + temp4 = + (((((((((((((((((((5.496622938627333454403e-9L * n + + -6.046285232490066799843e-8L) * n + + -4.085823051046317867773e-7L) * n + + 6.912919449146976374487e-6L) * n + + -6.553440308960748766569e-6L) * n + + -0.0002232933444926798269627L) * n + + 0.0009488592985204235812553L) * n + + 0.0008586208732954494061121L) * n + + -0.01585418388444104359344L) * n + + 0.04427532097860668962395L) * n + + -0.0249900681031533237056L) * n + + -0.1618227874898439081184L) * n + + 0.5438202909881988927301L) * n + -0.9173098246845078047451L) * n + + 1.L) * n + -0.7460908556329530389951L) * n + + 0.3814342290010055052959L) * n + -0.1285029922410906727762L) * n + + 0.02580246714127479738105L) * n + + -0.002345678831024981580096L) / + ((((((((((((((((((((5.001745200081852388788e-15L * n + + 5.001745200081852388788e-15L) * n + + -1.920670156831431317295e-12L) * n + + -1.920670156831431317295e-12L) * n + + 3.054165654073980705642e-10L) * n + + 3.054165654073980705642e-10L) * n + + -2.617367247146992602011e-8L) * n + + -2.617367247146992602011e-8L) * n + + 1.318697482591459775463e-6L) * n + + 1.318697482591459775463e-6L) * n + + -0.00004000537826577280504604L) * n + + -0.00004000537826577280504604L) * n + + 0.0007194989886335618052419L) * n + + 0.0007194989886335618052419L) * n + + -0.007251881132408497211537L) * n + + -0.007251881132408497211537L) * n + + 0.03620986244110953231848L) * n + 0.03620986244110953231848L) * n + + -0.06586392832528853576167L) * n + -0.06586392832528853576167L) * n + + 0); + temp6 = + (((((((((((((((((((-2.596166956796977978585e-8L * n + + 3.37501704383607137216e-7L) * n + + 4.413483826554862563594e-7L) * n + + -0.00002463762442000332101677L) * n + + 0.0001010428179585383829265L) * n + + 0.0002740513839594889954194L) * n + + -0.003320289844386791076372L) * n + + 0.009402797484127294842839L) * n + + 0.001847484329795865469121L) * n + + -0.09271644321803825109317L) * n + + 0.3336886101274811437798L) * n + + -0.6966001428307212951425L) * n + 1.L) * n + + -1.041112069154410768236L) * n + 0.7989326846100572807893L) * n + + -0.449722474944652316648L) * n + 0.1812124276227594949354L) * n + + -0.04960680532205918409119L) * n + 0.008279929313643033897321L) * n + + -0.0006369176395110026074862L) / + ((((((((((((((((((((8.017283220551543548957e-15L * n + + 8.017283220551543548957e-15L) * n + + -3.0786367566917927228e-12L) * n + + -3.0786367566917927228e-12L) * n + + 4.895513480133183521864e-10L) * n + + 4.895513480133183521864e-10L) * n + + -4.195370550308993664969e-8L) * n + + -4.195370550308993664969e-8L) * n + + 2.113736461423716122932e-6L) * n + + 2.113736461423716122932e-6L) * n + + -0.00006412450756123062294542L) * n + + -0.00006412450756123062294542L) * n + + 0.001153282891875672086617L) * n + + 0.001153282891875672086617L) * n + + -0.01162401973601964317438L) * n + + -0.01162401973601964317438L) * n + 0.05804068599152876457636L) * n + + 0.05804068599152876457636L) * n + -0.1055731042423560267371L) * n + + -0.1055731042423560267371L) * n + 0); + temp8 = + (((((((((((((((((((1.600736594951532897378e-7L * n + + -2.401104892427299346067e-6L) * n + + 6.883167358291591458726e-6L) * n + + 0.00007603498826019781262546L) * n + + -0.0006635586764939087703931L) * n + + 0.001634672210764505394802L) * n + + 0.004056266531607184361956L) * n + + -0.04403583686402468293143L) * n + + 0.1697853284167242398262L) * n + + -0.417477546467782614848L) * n + + 0.7375177228220004383884L) * n + + -0.9802766841189641825582L) * n + 1.L) * n + + -0.7873713834824899692509L) * n + 0.4760276889013248336354L) * n + + -0.2173857922461599929824L) * n + 0.07266036872860748935564L) * n + + -0.01679220710202006555337L) * n + 0.002400304524129823579618L) * n + + -0.0001600203016086549053079L) / + ((((((((((((((((((((4.128065488929734792224e-14L * n + + 4.128065488929734792224e-14L) * n + + -1.585177147749018160214e-11L) * n + + -1.585177147749018160214e-11L) * n + + 2.520679348850274658828e-9L) * n + + 2.520679348850274658828e-9L) * n + + -2.16017869215443206321e-7L) * n + + -2.16017869215443206321e-7L) * n + + 0.0000108835403453483405253L) * n + + 0.0000108835403453483405253L) * n + + -0.0003301743987035042166566L) * n + + -0.0003301743987035042166566L) * n + + 0.00593820521734983297674L) * n + + 0.00593820521734983297674L) * n + + -0.05985158986512608098157L) * n + + -0.05985158986512608098157L) * n + 0.2988490567244231289648L) * n + + 0.2988490567244231289648L) * n + -0.5435914837895297059296L) * n + + -0.5435914837895297059296L) * n + 0); + temp10 = + (((((((((((((((((((-2.236506092619147688334e-7L * n + + 3.802060357452551070168e-6L) * n + + -0.0000236324143786756605734L) * n + + 0.00003675325012204132701163L) * n + + 0.0003903448633651285765373L) * n + + -0.003229216596929700042263L) * n + + 0.01337818304442304303223L) * n + + -0.03763025871116038212515L) * n + + 0.0785226852090150530685L) * n + + -0.1264996175062563108393L) * n + + 0.1605711477228411051627L) * n + + -0.1621528048315413664079L) * n + + 0.1305526138473007302801L) * n + + -0.08342734307012884394901L) * n + + 0.04182773334578799850661L) * n + -0.01611566650178887980275L) * n + + 0.004609364506684976080734L) * n + -0.000922409662799223811592L) * n + + 0.0001153291641760607157951L) * n + + -6.784068480944747987948e-6L) / + ((((((((((((((((((((1.381321237609371689526e-13L * n + + 1.381321237609371689526e-13L) * n + + -5.304273552419987287778e-11L) * n + + -5.304273552419987287778e-11L) * n + + 8.434623741090345410581e-9L) * n + + 8.434623741090345410581e-9L) * n + + -7.228326954855981989092e-7L) * n + + -7.228326954855981989092e-7L) * n + + 0.00003641818536969434070611L) * n + + 0.00003641818536969434070611L) * n + + -0.001104819945970139167695L) * n + + -0.001104819945970139167695L) * n + + 0.01987024915666912767279L) * n + + 0.01987024915666912767279L) * n + + -0.2002736448999966742205L) * n + -0.2002736448999966742205L) * n + + 1.L) * n + 1.L) * n + -1.818949973433545912704L) * n + + -1.818949973433545912704L) * n + 0); + a8 = + temp0 * sum0 + temp2 * sum2 + temp4 * sum4 + temp6 * sum6 + temp8 * sum8 + + temp10 * sum10; + temp1 = + (((((((((((((((((3.371887783571572577559e-8L * n + + -3.034699005214415319803e-7L) * n + + -2.337842196609623653774e-6L) * n + + 0.00002913311045005838707011L) * n + + -0.0000163379202739987929958L) * n + + -0.0006713833203625029590628L) * n + + 0.002462462030975711152892L) * n + + 0.00002810034939177589398349L) * n + + -0.01974961881266840060692L) * n + + 0.05418070100565105639107L) * n + + -0.06079727162446070917476L) * n + + -0.00144816735698907518147L) * n + + 0.09760112620243343119291L) * n + -0.1425719254919074835004L) * n + + 0.1092979968299971446188L) * n + -0.0495699154971682960729L) * n + + 0.0126311715991694070014L) * n + + -0.001403463511018823000155L) / + ((((((((((((((((((7.59405842812662330593e-12L * n + + 7.59405842812662330593e-12L) * n + + -2.156712593587961018884e-9L) * n + + -2.156712593587961018884e-9L) * n + + 2.480371363794717704183e-7L) * n + + 2.480371363794717704183e-7L) * n + + -0.00001493529546306405506876L) * n + + -0.00001493529546306405506876L) * n + + 0.0005086247680835308517554L) * n + + 0.0005086247680835308517554L) * n + + -0.009876958696001262873691L) * n + + -0.009876958696001262873691L) * n + + 0.1047063100574591976708L) * n + 0.1047063100574591976708L) * n + + -0.5397677311665406903502L) * n + -0.5397677311665406903502L) * n + + 1.L) * n + 1.L) * n + 0); + temp3 = + (((((((((((((((((-4.450350554113147492628e-7L * n + + 4.895385609524462241891e-6L) * n + + 9.790771219048924483782e-6L) * n + + -0.0003035139077905166589972L) * n + + 0.001093896166201011653688L) * n + + 0.001635058793581170388792L) * n + + -0.02192170629661450813433L) * n + + 0.06423911487698362190466L) * n + + -0.06509837160825539180102L) * n + + -0.1087279130691410276673L) * n + + 0.4980495385050051821153L) * n + -0.8952529890779496700955L) * n + + 1.L) * n + -0.7545285813592108078925L) * n + + 0.3878725912954449136244L) * n + -0.1310081056989620977206L) * n + + 0.02633041428482845403256L) * n + + -0.002393674025893495821142L) / + ((((((((((((((((((6.833821350672013840294e-12L * n + + 6.833821350672013840294e-12L) * n + + -1.940805263590851930643e-9L) * n + + -1.940805263590851930643e-9L) * n + + 2.232062729556493160517e-7L) * n + + 2.232062729556493160517e-7L) * n + + -0.00001344013112093745499582L) * n + + -0.00001344013112093745499582L) * n + + 0.0004577066179443778012328L) * n + + 0.0004577066179443778012328L) * n + + -0.008888181708800725577621L) * n + + -0.008888181708800725577621L) * n + + 0.09422421805059326300635L) * n + 0.09422421805059326300635L) * n + + -0.4857318758554319336521L) * n + -0.4857318758554319336521L) * n + + 0.8998905414476574955529L) * n + 0.8998905414476574955529L) * n + 0); + temp5 = + (((((((((((((((((1.462972174269245398953e-6L * n + + -0.00001901863826550019018638L) * n + + 0.00004096322087953887117067L) * n + + 0.0005325218714340053252187L) * n + + -0.00402219816445757868352L) * n + + 0.0107518701660961075187L) * n + + -0.00007607455306200076074553L) * n + + -0.09065550906555090655509L) * n + + 0.332078103207810320781L) * n + -0.695815899581589958159L) * n + + 1.L) * n + -1.041536705971852415367L) * n + + 0.799391403575503993914L) * n + -0.4500141420643512693722L) * n + + 0.1813363763154558133638L) * n + -0.04964157181730403487726L) * n + + 0.008285786737669582857867L) * n + + -0.0006373682105899679121436L) / + ((((((((((((((((((5.76024371183008985175e-12L * n + + 5.76024371183008985175e-12L) * n + + -1.635909214159745517897e-9L) * n + + -1.635909214159745517897e-9L) * n + + 1.881410801157943947379e-7L) * n + + 1.881410801157943947379e-7L) * n + + -0.00001132871739000593235216L) * n + + -0.00001132871739000593235216L) * n + + 0.0003858019594875501595613L) * n + + 0.0003858019594875501595613L) * n + + -0.00749186877597963001924L) * n + + -0.00749186877597963001924L) * n + + 0.07942180980113923154233L) * n + 0.07942180980113923154233L) * n + + -0.4094245137468433678082L) * n + -0.4094245137468433678082L) * n + + 0.7585198041794739226007L) * n + 0.7585198041794739226007L) * n + 0); + temp7 = + (((((((((((((((((-2.755314017432770734805e-6L * n + + 0.00004132971026149156102207L) * n + + -0.0002222619974062435059409L) * n + + 0.0002479782615689493661324L) * n + + 0.003278823680744997174418L) * n + + -0.02223171036865921613556L) * n + + 0.07772740843177846242885L) * n + + -0.1836086154936849762259L) * n + + 0.3178346562909282134955L) * n + + -0.4176504987624593879817L) * n + + 0.4231666374253597949928L) * n + -0.331804098359312361121L) * n + + 0.2000853933179329452201L) * n + -0.09122844711719903902939L) * n + + 0.03046458865274833509116L) * n + -0.007037072000523296456692L) * n + + 0.001005689616362961318204L) * n + + -0.00006704597442419742121359L) / + ((((((((((((((((((7.59405842812662330593e-12L * n + + 7.59405842812662330593e-12L) * n + + -2.156712593587961018884e-9L) * n + + -2.156712593587961018884e-9L) * n + + 2.480371363794717704183e-7L) * n + + 2.480371363794717704183e-7L) * n + + -0.00001493529546306405506876L) * n + + -0.00001493529546306405506876L) * n + + 0.0005086247680835308517554L) * n + + 0.0005086247680835308517554L) * n + + -0.009876958696001262873691L) * n + + -0.009876958696001262873691L) * n + + 0.1047063100574591976708L) * n + 0.1047063100574591976708L) * n + + -0.5397677311665406903502L) * n + -0.5397677311665406903502L) * n + + 1.L) * n + 1.L) * n + 0); + temp9 = + (((((((((((((((((1.30112050823214173588e-6L * n + + -0.00002211904863994640950996L) * n + + 0.0001769523891195712760797L) * n + + -0.0008847619455978563803985L) * n + + 0.003096666809592497331395L) * n + + -0.008051333704940493061626L) * n + + 0.01610266740988098612325L) * n + + -0.0253041916440986924794L) * n + + 0.03163023955512336559925L) * n + + -0.03163023955512336559925L) * n + + 0.0253041916440986924794L) * n + + -0.01610266740988098612325L) * n + + 0.008051333704940493061626L) * n + + -0.003096666809592497331395L) * n + + 0.0008847619455978563803985L) * n + + -0.0001769523891195712760797L) * n + + 0.00002211904863994640950996L) * n + + -1.30112050823214173588e-6L) / + ((((((((((((((((((7.59405842812662330593e-12L * n + + 7.59405842812662330593e-12L) * n + + -2.156712593587961018884e-9L) * n + + -2.156712593587961018884e-9L) * n + + 2.480371363794717704183e-7L) * n + + 2.480371363794717704183e-7L) * n + + -0.00001493529546306405506876L) * n + + -0.00001493529546306405506876L) * n + + 0.0005086247680835308517554L) * n + + 0.0005086247680835308517554L) * n + + -0.009876958696001262873691L) * n + + -0.009876958696001262873691L) * n + + 0.1047063100574591976708L) * n + 0.1047063100574591976708L) * n + + -0.5397677311665406903502L) * n + -0.5397677311665406903502L) * n + + 1.L) * n + 1.L) * n + 0); + a9 = + temp1 * sum1 + temp3 * sum3 + temp5 * sum5 + temp7 * sum7 + temp9 * sum9; + temp0 = + ((((((((((-0.0001728185345584017249886L * n + + 0.001728185345584017249886L) * n + + -0.007776834055128077624486L) * n + + 0.02073822414700820699863L) * n + + -0.0362918922572643622476L) * n + 0.04355027070871723469712L) * n + + -0.0362918922572643622476L) * n + 0.02073822414700820699863L) * n + + -0.007776834055128077624486L) * n + 0.001728185345584017249886L) * n + + -0.0001728185345584017249886L) / + (((((((((((1.853411463275763902069e-7L * n + 0) * n + + -0.00004077505219206680584551L) * n + 0) * n + + 0.003033663883089770354906L) * n + 0) * n + + -0.09068371607515657620042L) * n + 0) * n + 1.L) * n + 0) * n + + -2.732966407287910419434L) * n + 0); + temp2 = + (((((((((((((((((((7.083955949472413492462e-9L * n + + -7.792351544419654841708e-8L) * n + + -5.26574058910782736273e-7L) * n + + 8.909255265786472035686e-6L) * n + + -0.0000133083919104088408145L) * n + + -0.000234290036435550955574L) * n + + 0.00120442768377872730849L) * n + + -0.0008299819162141003411304L) * n + + -0.01043610023159456691256L) * n + + 0.04124989047128472836542L) * n + + -0.06741263508454443084838L) * n + + 0.02339354136007203665546L) * n + + 0.1243452549428398311228L) * n + -0.2970604867756315160986L) * n + + 0.3627612717610614534167L) * n + -0.2844878509918991817806L) * n + + 0.1489494157015216696653L) * n + -0.05073632845434622685119L) * n + + 0.01022875493240717064245L) * n + + -0.0009298868120370155129496L) / + ((((((((((((((((((((1.381321237609371689526e-13L * n + + 1.381321237609371689526e-13L) * n + + -5.304273552419987287778e-11L) * n + + -5.304273552419987287778e-11L) * n + + 8.434623741090345410581e-9L) * n + + 8.434623741090345410581e-9L) * n + + -7.228326954855981989092e-7L) * n + + -7.228326954855981989092e-7L) * n + + 0.00003641818536969434070611L) * n + + 0.00003641818536969434070611L) * n + + -0.001104819945970139167695L) * n + + -0.001104819945970139167695L) * n + + 0.01987024915666912767279L) * n + + 0.01987024915666912767279L) * n + + -0.2002736448999966742205L) * n + -0.2002736448999966742205L) * n + + 1.L) * n + 1.L) * n + -1.818949973433545912704L) * n + + -1.818949973433545912704L) * n + 0); + temp4 = + (((((((((((((((((((-5.82090628051506172805e-8L * n + + 7.567178164669580246465e-7L) * n + + 9.895540676875604937685e-7L) * n + + -0.0000552404006020879357992L) * n + + 0.0002572840575987657283798L) * n + + 0.0002149078598766160789996L) * n + + -0.005794085761862555186488L) * n + + 0.02200175068468548717565L) * n + + -0.03214040012643673687711L) * n + + -0.03382434950734787413462L) * n + + 0.2668791674432032830887L) * n + + -0.6533451900204919184699L) * n + 1.L) * n + + -1.074597940856066383877L) * n + 0.8388364014997714712194L) * n + + -0.476697576122513823017L) * n + 0.1930869647500661947918L) * n + + -0.05299716468644424351785L) * n + 0.00885493171738766019536L) * n + + -0.0006811485936452046304123L) / + ((((((((((((((((((((1.309656343600161221563e-13L * n + + 1.309656343600161221563e-13L) * n + + -5.029080359424619090803e-11L) * n + + -5.029080359424619090803e-11L) * n + + 7.997023565291304451109e-9L) * n + + 7.997023565291304451109e-9L) * n + + -6.853311157676032457608e-7L) * n + + -6.853311157676032457608e-7L) * n + + 0.00003452875854886022284577L) * n + + 0.00003452875854886022284577L) * n + + -0.001047500328945904053104L) * n + + -0.001047500328945904053104L) * n + + 0.01883935260561501718859L) * n + + 0.01883935260561501718859L) * n + + -0.1898831657385843079768L) * n + -0.1898831657385843079768L) * n + + 0.9481185896097278309941L) * n + 0.9481185896097278309941L) * n + + -1.724580283382465458009L) * n + -1.724580283382465458009L) * n + 0); + temp6 = + (((((((((((((((((((1.84182854686282750804e-7L * n + + -2.76274282029424126206e-6L) * n + + 7.919862751510158284572e-6L) * n + + 0.0000874868559759843066319L) * n + + -0.0008186068370816732287068L) * n + + 0.002707487963888356436819L) * n + + -0.001119095025073853993885L) * n + + -0.02559429506434543276206L) * n + + 0.1201354771633841596049L) * n + + -0.3148672943421109431916L) * n + + 0.5727844887260905565325L) * n + + -0.7733023980059299336502L) * n + + 0.7959963042632455765077L) * n + -0.6301467653552958290084L) * n + + 0.3822358571007125849532L) * n + -0.1749051959300253160805L) * n + + 0.05853005732220120054358L) * n + -0.01353504544233086050833L) * n + + 0.001935209254188772862698L) * n + + -0.0001290139502792515241798L) / + ((((((((((((((((((((1.381321237609371689526e-13L * n + + 1.381321237609371689526e-13L) * n + + -5.304273552419987287778e-11L) * n + + -5.304273552419987287778e-11L) * n + + 8.434623741090345410581e-9L) * n + + 8.434623741090345410581e-9L) * n + + -7.228326954855981989092e-7L) * n + + -7.228326954855981989092e-7L) * n + + 0.00003641818536969434070611L) * n + + 0.00003641818536969434070611L) * n + + -0.001104819945970139167695L) * n + + -0.001104819945970139167695L) * n + + 0.01987024915666912767279L) * n + + 0.01987024915666912767279L) * n + + -0.2002736448999966742205L) * n + -0.2002736448999966742205L) * n + + 1.L) * n + 1.L) * n + -1.818949973433545912704L) * n + + -1.818949973433545912704L) * n + 0); + temp8 = + (((((((((((((((((((-2.236506092619147688334e-7L * n + + 3.802060357452551070168e-6L) * n + + -0.0000236324143786756605734L) * n + + 0.00003675325012204132701163L) * n + + 0.0003903448633651285765373L) * n + + -0.003229216596929700042263L) * n + + 0.01337818304442304303223L) * n + + -0.03763025871116038212515L) * n + + 0.0785226852090150530685L) * n + + -0.1264996175062563108393L) * n + + 0.1605711477228411051627L) * n + + -0.1621528048315413664079L) * n + + 0.1305526138473007302801L) * n + + -0.08342734307012884394901L) * n + + 0.04182773334578799850661L) * n + -0.01611566650178887980275L) * n + + 0.004609364506684976080734L) * n + -0.000922409662799223811592L) * n + + 0.0001153291641760607157951L) * n + + -6.784068480944747987948e-6L) / + ((((((((((((((((((((1.381321237609371689526e-13L * n + + 1.381321237609371689526e-13L) * n + + -5.304273552419987287778e-11L) * n + + -5.304273552419987287778e-11L) * n + + 8.434623741090345410581e-9L) * n + + 8.434623741090345410581e-9L) * n + + -7.228326954855981989092e-7L) * n + + -7.228326954855981989092e-7L) * n + + 0.00003641818536969434070611L) * n + + 0.00003641818536969434070611L) * n + + -0.001104819945970139167695L) * n + + -0.001104819945970139167695L) * n + + 0.01987024915666912767279L) * n + + 0.01987024915666912767279L) * n + + -0.2002736448999966742205L) * n + -0.2002736448999966742205L) * n + + 1.L) * n + 1.L) * n + -1.818949973433545912704L) * n + + -1.818949973433545912704L) * n + 0); + temp10 = + (((((((((((((((((((9.443025724391956906301e-8L * n + + -1.794174887634471812197e-6L) * n + + 0.00001614757398871024630977L) * n + + -0.00009150291926935806242205L) * n + + 0.0003660116770774322496882L) * n + + -0.001098035031232296749065L) * n + + 0.002562081739542025747817L) * n + + -0.004758151802006619245947L) * n + + 0.00713722770300992886892L) * n + + -0.008723278303678801950902L) * n + + 0.008723278303678801950902L) * n + + -0.00713722770300992886892L) * n + + 0.004758151802006619245947L) * n + + -0.002562081739542025747817L) * n + + 0.001098035031232296749065L) * n + + -0.0003660116770774322496882L) * n + + 0.00009150291926935806242205L) * n + + -0.00001614757398871024630977L) * n + + 1.794174887634471812197e-6L) * n + + -9.443025724391956906301e-8L) / + ((((((((((((((((((((1.381321237609371689526e-13L * n + + 1.381321237609371689526e-13L) * n + + -5.304273552419987287778e-11L) * n + + -5.304273552419987287778e-11L) * n + + 8.434623741090345410581e-9L) * n + + 8.434623741090345410581e-9L) * n + + -7.228326954855981989092e-7L) * n + + -7.228326954855981989092e-7L) * n + + 0.00003641818536969434070611L) * n + + 0.00003641818536969434070611L) * n + + -0.001104819945970139167695L) * n + + -0.001104819945970139167695L) * n + + 0.01987024915666912767279L) * n + + 0.01987024915666912767279L) * n + + -0.2002736448999966742205L) * n + -0.2002736448999966742205L) * n + + 1.L) * n + 1.L) * n + -1.818949973433545912704L) * n + + -1.818949973433545912704L) * n + 0); + a10 = + temp0 * sum0 + temp2 * sum2 + temp4 * sum4 + temp6 * sum6 + temp8 * sum8 + + temp10 * sum10; + for (i = 0; i < nn; i++) + { + z = n1 * i - 1.L; + y[i] = + x[i] - + ((((((((((a10 * z + a9) * z + a8) * z + a7) * z + a6) * z + a5) * z + + a4) * z + a3) * z + a2) * z + a1) * z + a0); + } + a[0] = a0; + a[1] = a1; + a[2] = a2; + a[3] = a3; + a[4] = a4; + a[5] = a5; + a[6] = a6; + a[7] = a7; + a[8] = a8; + a[9] = a9; + a[10] = a10; +}