Fast Fourier transform: Difference between revisions

Content added Content deleted
m (added whitespace.)
Line 1,988:
Here is a user-space definition for good measure.
 
<lang Mathematica>fft[{x_}] := {N@lx}
fft[l__] :=
Join[#, #] &@fft@l[[1 ;; ;; 2]] +