Chebyshev coefficients: Difference between revisions

m
→‎{{header|Raku}}: typoed variable name
(Added Algol 60)
m (→‎{{header|Raku}}: typoed variable name)
Line 1,768:
 
my @pi-n = ( ^n »+» ½ ) »×» (π/n);
my @f = ( @pi_npi-n».cos »×» bma »+» bpa )».&$func;
my @sums = (^n).map: { [+] @f »×« ( @pi-n »×» $_ )».cos };
 
Line 1,787:
+6.5962992e-10
-1.0021994e-11</pre>
 
=={{header|REXX}}==
{{trans|C}}
10,333

edits