Fast Fourier transform: Difference between revisions

Content added Content deleted
m (→‎{{header|Perl 6}}: minor beautification)
(→‎{{header|Perl}}: fix missing actual function call)
Line 1,974: Line 1,974:
}
}


print "$_\n" for qw(1 1 1 1 0 0 0 0);</lang>
print "$_\n" for fft qw(1 1 1 1 0 0 0 0);</lang>
{{out}}
{{out}}
<pre>4
<pre>4