Chebyshev coefficients: Difference between revisions
Content deleted Content added
m →{{header|REXX}}: added another optimization. |
m →{{header|REXX}}: change variable name to the same as the C entry uses. |
||
Line 65:
do k=0 for n
y=cos(pi*(k+.5)/n)
end /*k*/
fac=2/n
Line 71:
piJ@n=pi*j/n
do m=0 for n
$=$+
end /*m*/
cheby.j=fac*$
| |||