Fast Fourier transform: Difference between revisions
Content added Content deleted
(→{{header|REXX}}: added the REXX language. -- ~~~~) |
m (→{{header|REXX}}: changed imaginary suffix from "i' --> "j".) |
||
Line 818: | Line 818: | ||
call hdr; do i=0 for size |
call hdr; do i=0 for size |
||
say "FFT out" center(i+1,3) ' ' nice(#.1.i) nice(#.2.i,' |
say "FFT out" center(i+1,3) ' ' nice(#.1.i) nice(#.2.i,'j') |
||
end |
end |
||
exit |
exit |
||
Line 860: | Line 860: | ||
─────── ─── ───────── ────────────── |
─────── ─── ───────── ────────────── |
||
FFT out 1 4 |
FFT out 1 4 |
||
FFT out 2 1 -2. |
FFT out 2 1 -2.4142136j |
||
FFT out 3 0 |
FFT out 3 0 |
||
FFT out 4 1 -0. |
FFT out 4 1 -0.41421356j |
||
FFT out 5 0 |
FFT out 5 0 |
||
FFT out 6 1 0. |
FFT out 6 1 0.41421356j |
||
FFT out 7 0 |
FFT out 7 0 |
||
FFT out 8 1 2. |
FFT out 8 1 2.4142136j |
||
</pre> |
</pre> |
||