Chebyshev coefficients: Difference between revisions
Content added Content deleted
m (→{{header|REXX}}: elided an extra ), add PRE HTML tags for 2nd output.) |
(EasyLang) |
||
| Line 473: | Line 473: | ||
0.900 0.62160996827066445648 0.62160996827066445674 2.71e-19 |
0.900 0.62160996827066445648 0.62160996827066445674 2.71e-19 |
||
0.950 0.58168308946388349416 0.58168308946388349403 -1.63e-19</pre> |
0.950 0.58168308946388349416 0.58168308946388349403 -1.63e-19</pre> |
||
=={{header|EasyLang}}== |
|||
<lang>fscale 15 |
|||
a = 0 |
|||
b = 1 |
|||
n = 10 |
|||
len coef[] n |
|||
len cheby[] n |
|||
for i range n |
|||
coef[i] = cos (180 / pi * (cos (180 / n * (i + 1 / 2)) * (b - a) / 2 + (b + a) / 2)) |
|||
. |
|||
for i range n |
|||
w = 0 |
|||
for j range n |
|||
w += coef[j] * cos (180 / n * i * (j + 1 / 2)) |
|||
. |
|||
cheby[i] = w * 2 / n |
|||
print cheby[i] |
|||
.</lang> |
|||
=={{header|Go}}== |
=={{header|Go}}== |
||