Jump to content

Fast Fourier transform: Difference between revisions

m (→‎{{header|APL}}: trimming spaces)
Line 1,988:
Here is a user-space definition for good measure.
 
<lang Mathematica>fft[l__ /; Length@l == 1{x_}] := {N@l}
fft[l__] :=
Join[#, #] &@fft@l[[1 ;; ;; 2]] +
1,934

edits

Cookies help us deliver our services. By using our services, you agree to our use of cookies.