Chebyshev coefficients: Difference between revisions
m
→{{header|Raku}}: did not need .list coercion
SqrtNegInf (talk | contribs) m (→{{header|Raku}}: more Unicode, fewer sigils) |
SqrtNegInf (talk | contribs) m (→{{header|Raku}}: did not need .list coercion) |
||
Line 1,621:
my \bpa = ½ × (b + a);
my @pi-n = (
my @f = ( @pi_n».cos »×» bma »+» bpa )».&$func;
my @sums = (^n).map: { [+] @f »×« ( @pi-n »×» $_ )».cos };
| |||